$
$*********************************************         read macros
$
&insert sfun.mac
$
$*********************************************         define
$
&describe -body check
*010  10  10  10
*100 100 100 100
&describe -body carl
*1c 0 0 0
*2c 1 1 1
&describe -body also
*1a 0 0 0
*2a 1 1 1
*tpor0       -20.0000        -20.0000         25.0008
*tstb0       -20.0000         20.0000         25.0000
*bpor0       -20.0000        -20.0000          0.0000
*bstb0       -20.0000         20.0000         00.0000
*tpor40       20.0000        -20.0000         25.0008
*tstb40       20.0000         20.0000         25.0000
*bpor40       20.0000        -20.0000          0.0000
*bstb40       20.0000         20.0000         00.0000
*nwt          0.0000         0.0000         -10.0000