`Demonstrates a method of getting form coefficients separately fwd and aft
`of a given hull section.
project cpfcpa
read tanker.gf
lbp 0 47.25f 94.5f `<-- will use midsection as the dividing plane
macro slice
 create slicer
 class hull
 ends {mp} %2999
 top 100
 bot -100
 out 100
 //
 create hull\hull%1.c
 shape hull.c
 fit slicer
 //
 delete slicer
/
enter pm
.slice f
.slice a -
delete hull.c
write sliced.gf
quit pm
draft 6
macro comp
 comp hull\hull%1.c /form
/
.comp f
.comp a