Origin for each line in GNUPLOT.red from check-in f2c04ccdad:

f2c04ccdad 2021-03-03 trnsz@pobox.c: ###################################
f2c04ccdad 2021-03-03 trnsz@pobox.c: #  GNUPLOT PLOTTING
f2c04ccdad 2021-03-03 trnsz@pobox.c: ###################################
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: # IMPORTANT: This file is for use in Plot
f2c04ccdad 2021-03-03 trnsz@pobox.c: # mode.
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset title
f2c04ccdad 2021-03-03 trnsz@pobox.c: set label 1 "Kuen's Surface" at screen 0.6, 0.9
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "Kuen's Surface"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set label 1 font "frscript,25"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style line 3  linetype -1 linewidth 0.5
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d depthorder hidden3d 3
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style fill  transparent solid 0.65 border
f2c04ccdad 2021-03-03 trnsz@pobox.c: set palette
f2c04ccdad 2021-03-03 trnsz@pobox.c: set hidden3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: set ticslevel 0
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset xtics
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset ytics
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset ztics
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset border
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset colorbox
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset key
f2c04ccdad 2021-03-03 trnsz@pobox.c: set lmargin at screen 0.1
f2c04ccdad 2021-03-03 trnsz@pobox.c: set bmargin at screen 0.1
f2c04ccdad 2021-03-03 trnsz@pobox.c: set rmargin at screen 0.9
f2c04ccdad 2021-03-03 trnsz@pobox.c: set tmargin at screen 0.9
f2c04ccdad 2021-03-03 trnsz@pobox.c: set parametric
f2c04ccdad 2021-03-03 trnsz@pobox.c: set dummy u,v
f2c04ccdad 2021-03-03 trnsz@pobox.c: set urange [-4.5:4.5]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set vrange [0.05:pi-0.05]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set isosamples 51,51
f2c04ccdad 2021-03-03 trnsz@pobox.c: set view 122, 357, 1.35, 1.08
f2c04ccdad 2021-03-03 trnsz@pobox.c: a = 1.0
f2c04ccdad 2021-03-03 trnsz@pobox.c: x(u,v) = 2.*a*(cos(u)+u*sin(u))*sin(v) / (1+u**2.*(sin(v))**2)
f2c04ccdad 2021-03-03 trnsz@pobox.c: y(u,v) = 2.*a*(sin(u)-u*cos(u))*sin(v) / (1+u**2.*(sin(v))**2)
f2c04ccdad 2021-03-03 trnsz@pobox.c: z(u,v) = a*log(tan(v/2.))+2.*cos(v)/(1+u**2.*(sin(v))**2)
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot x(u,v), y(u,v), z(u,v) with pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset surface
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "3D Log"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "3D Log"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set samples 30; set isosamples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style line 100 lt 5 lw 0.5
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d hidden3d 100
f2c04ccdad 2021-03-03 trnsz@pobox.c: set view 50,220
f2c04ccdad 2021-03-03 trnsz@pobox.c: set xrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set yrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot log(x*x*y*y)
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "Interlocking Torus"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "3D Torus"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set parametric
f2c04ccdad 2021-03-03 trnsz@pobox.c: set urange [-pi:pi]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set vrange [-pi:pi]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set isosamples 50,20
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset key
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset xtics
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset ytics
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset ztics
f2c04ccdad 2021-03-03 trnsz@pobox.c: set border 0
f2c04ccdad 2021-03-03 trnsz@pobox.c: set view 60, 30, 1.5, 0.9
f2c04ccdad 2021-03-03 trnsz@pobox.c: set origin 0.0,-0.1
f2c04ccdad 2021-03-03 trnsz@pobox.c: set size 0.9, 1.1
f2c04ccdad 2021-03-03 trnsz@pobox.c: set colorbox vertical user origin 0.9, 0.15 size 0.02, 0.50
f2c04ccdad 2021-03-03 trnsz@pobox.c: set format cb "%.1f"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d depthorder
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot cos(u)+.5*cos(u)*cos(v),sin(u)+.5*sin(u)*cos(v),.5*sin(v) with pm3d, 1+cos(u)+.5*cos(u)*cos(v),.5*sin(v),sin(u)+.5*sin(u)*cos(v) with pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset surface
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "3D Cosh"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "3D Cosh"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set samples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set isosamples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style line 100 lt 5 lw 0.5
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d hidden3d 100
f2c04ccdad 2021-03-03 trnsz@pobox.c: set view 50,220
f2c04ccdad 2021-03-03 trnsz@pobox.c: set xrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set yrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot cosh(x)+cosh(y)
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset surface
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "3D Exp"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "3D Exp"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set samples 30; set isosamples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set xrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set yrange [-2:2]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot exp(-x*x)*exp(-y*y)
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset surface
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "3D Sin"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "3D Sin"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set samples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set isosamples 30
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style line 100 lt 5 lw 0.5
f2c04ccdad 2021-03-03 trnsz@pobox.c: set pm3d hidden3d 100
f2c04ccdad 2021-03-03 trnsz@pobox.c: set view 50,220
f2c04ccdad 2021-03-03 trnsz@pobox.c: set xrange [-3:3]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set yrange [-3:3]
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot sin(x*x+y*y)
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: 
f2c04ccdad 2021-03-03 trnsz@pobox.c: # PM3D surfaces are not included in the calculation of hidden line removal.
f2c04ccdad 2021-03-03 trnsz@pobox.c: # However, you can approximate this by drawing the surface twice,
f2c04ccdad 2021-03-03 trnsz@pobox.c: # once "with pm3d" to produce the surface you want to show, and once 
f2c04ccdad 2021-03-03 trnsz@pobox.c: # "with lines lt -2" to include the same surface in hidden3d calculations.
f2c04ccdad 2021-03-03 trnsz@pobox.c: # The "lt -2" makes the hidden3d copy of the surface invisible.
f2c04ccdad 2021-03-03 trnsz@pobox.c: #
f2c04ccdad 2021-03-03 trnsz@pobox.c: reset
f2c04ccdad 2021-03-03 trnsz@pobox.c: set hidden3d front
f2c04ccdad 2021-03-03 trnsz@pobox.c: set isosamples 25,25
f2c04ccdad 2021-03-03 trnsz@pobox.c: set xyplane at 0
f2c04ccdad 2021-03-03 trnsz@pobox.c: unset key
f2c04ccdad 2021-03-03 trnsz@pobox.c: set palette rgbformulae 31,-11,32
f2c04ccdad 2021-03-03 trnsz@pobox.c: set style fill solid 0.5
f2c04ccdad 2021-03-03 trnsz@pobox.c: set cbrange [-1:1]
f2c04ccdad 2021-03-03 trnsz@pobox.c: set title "Mixing pm3d surfaces with hidden-line plots"
f2c04ccdad 2021-03-03 trnsz@pobox.c: set output "Mixing pm3d surfaces with hidden-line plots"
f2c04ccdad 2021-03-03 trnsz@pobox.c: f(x,y) = sin(-sqrt((x+5)**2+(y-7)**2)*0.5)
f2c04ccdad 2021-03-03 trnsz@pobox.c: splot f(x,y) with pm3d, x*x-y*y with lines lt 1 lc rgb "#000000", f(x,y) with lines lt -2 notitle;

iCAS Bundled REDUCE Scripts
Homepage | GitHub Mirror | SourceHut Mirror | NotABug Mirror | Chisel Mirror | Chisel RSS ]