&dimen -save -dimen meters m-tons
&describe body barge barge
pgen 
     plane   0    -cart 0 5     15.85 5     15.85 7.3  0 7.3 
     plane   1.83 -cart 0 4     15.85 4     15.85 7.3  0 7.3 
     plane   3.66 -cart 0 3     15.85 3     15.85 7.3  0 7.3 
     plane   5.49 -cart 0 2     15.85 2     15.85 7.3  0 7.3 
     plane   7.32 -cart 0 1     15.85 1     15.85 7.3  0 7.3 
     plane   9.15 -cart 0 0     15.85 0     15.85 7.3  0 7.3 
     plane  10.98 -cart 0 0     15.85 0     15.85 7.3  0 7.3 
     plane 111.56 -cart 0 0     15.85 0     15.85 7.3  0 7.3 
end pgen
$
$ *****
$
&describe body tanker vessel
pgen
   plane   0     -cart 0  0    27.3  0    27.3  30     0    30   
   plane  17     -cart 0  0    27.3  0    27.3  30     0    30    
   plane  34     -cart 0  0    27.3  0    27.3  30     0    30   
   plane  51     -cart 0  0    27.3  0    27.3  30     0    30   
   plane  68     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 107     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 145     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 184     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 222     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 240     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 257     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 274     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 291     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 308     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 325     -cart 0  0    27.3  0    27.3  30     0    30   
   plane 342     -cart 0  0    27.3  0    27.3  30     0    30   
end pgen
$
&dimen -remember
&eofile