+PROG   AQUA URS:1
NORM    DC  GB 50010
STEE    NO  TYPE    FY      ES
        1   S       275     206 $ S345
        2   S       215     206 $ S235

SECT    1   MNO 1   $ HOLLOW RECTANGULAR SECTION
LET#B   300[MM] $ WIDTH
LET#H   400[MM] $ HEIGHT
LET#TF  20[MM]  $ THICKNESS OF FLANGES
LET#TW  14[MM]  $ THICKNESS OF WEBS
LET#A   100[MM] $ SPACING
POLY    TYPE    O
VERT    1   0   0
        2   #B  0
        3   #B  #H
        4   0   #H
POLY    TYPE    O   MNO 0
VERT    5   #TW     #TF
        6   #B-#TW  #TF
        7   #B-#TW  #H-#TF
        8   #TW     #H-#TF
POLY    TYPE    O   YM  #A+#B
VERT    11   0   0
        12   #B  0
        13   #B  #H
        14   0   #H
POLY    TYPE    O   MNO 0   YM  #A+#B
VERT    15   #TW     #TF
        16   #B-#TW  #TF
        17   #B-#TW  #H-#TF
        18   #TW     #H-#TF
END

+PROG   SOFIMSHC urs:2
SYST    TYPE    3D  GDIR    NEGZ
SPT NO  X       Y   Z   FIX
    1   0       0   0   PPYM 
    2   10[M]   0   0   XPYM 
SLN NO  NPA NPE SNO SDIV
    1   1   2   1   10
END

+PROG   SOFILOAD urs:3
LC  1
BEPL    FROM    TO  TYPE    P     A
        1       1   PG      10    5
END

+PROG   ASE urs:4
LC  1
END