/usr/share/axiom-20170501/input/ribbon.input is in axiom-test 20170501-3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | --Copyright The Numerical Algorithms Group Limited 1994.
--the first attempt
drawRibbons(flist,xrange) ==
sp := createThreeSpace()
y0 := 0
for f in flist repeat
makeObject(f,xrange,y=y0..y0+1,
space==sp, var2Steps ==1)
y0 := y0+1
vp:=makeViewport3D(sp,"Ribbons")
drawStyle(vp,"shade")
outlineRender(vp,"on")
showRegion(vp,"on")
n := # flist
zoom(vp,n,1,n)
rotate(vp,0,75)
vp
|