V10/vol2/cip/spline1.pic

.PS
scale=100
define macro0 |
[ box invis ht 269 wid 146 with .sw at 0,0
line  from 114,58 to 67,0 
spline from 110,266\
to 110,266\
to 122,269\
to 111,256\
to 122,259
arc from 102,261 to 91,260 at 96,255
line  from 67,261 to 80,261 
ellipse ht 4 wid 16 at 51,260
box ht 7 wid 10 with .nw at 25,263 
circle rad 5 at 10,260
box ht 19 wid 19 with .nw at 0,269 
box ht 19 wid 19 with .nw at 20,269 
box ht 19 wid 20 with .nw at 41,269 
box ht 19 wid 19 with .nw at 63,269 
box ht 19 wid 20 with .nw at 85,269 
box ht 19 wid 18 with .nw at 106,269 
box ht 19 wid 19 with .nw at 126,269 
box ht 176 wid 146 with .nw at 0,249 
box ht 25 wid 64 with .nw at 82,70 
box ht 8 wid 18 with .nw at 85,57 
box ht 8 wid 18 with .nw at 124,58 
box ht 8 wid 10 with .nw at 108,57 
line  from 133,54 to 111,23 
] |

define macro1 |
[ box invis ht 22 wid 17 with .sw at 0,0
line <- from 17,22 to 0,0 
] |

box invis ht 333 wid 719 with .sw at 0,0
macro0 with .nw at 4,332
macro1 with .nw at 583,170
macro1 with .nw at 408,176
macro1 with .nw at 294,206
macro1 with .nw at 43,240
spline from 690,281\
to 625,235\
to 688,199\
to 616,166
line  from 494,204 to 422,175 
line  from 417,237 to 495,204 
line  from 493,283 to 417,237 
line  from 239,236 to 312,206 
line  from 312,266 to 239,236 
line  from 116,267 to 58,238 
macro0 with .nw at 573,333
macro0 with .nw at 381,333
macro0 with .nw at 192,333
"menu" at 679,75
"draw" at 638,49
"select" at 590,16
"end spline" at 507,75
"draw" at 444,47
"end spline" at 315,74
"draw" at 256,48
"menu" at 109,72
"draw" at 67,46
"select" at 20,14
line  from 668,117 to 592,30 
line  from 98,114 to 21,28 
.PE