units ft
enter pm
create hull\hull.c
 ends 0 50
 bot 0
 top 10
 out 25
/
create TWR_FS\TWR_FS.S
 class hull
 ends 0 10
 bot 10
 top 25
 in 15
 out 25
/
create TWR_AS\TWR_AS.S
 class hull
 ends 40 50
 bot 10
 top 25
 in 15
 out 25
/
create TWR_FP\TWR_FS.P
 class hull
 shape TWR_FS.S
/
create TWR_AP\TWR_AS.P
 class hull
 shape TWR_AS.S
` ends 90 100
` bot 10
` top 20
` in 40
` out 50
/
surface (HULL)
surface (TWR_FS)
surface (TWR_AS)
surface (TWR_FP)
surface (TWR_AP)
write table.gf
quit
di