+PROG   AQUA urs:1
    HEAD
    CTRL    FACE    NEG
    UNIT    5   DIG 3   SET OUT
    ECHO    SECT    EXTR
    NORM    GB 50010-2010
    STEE    NO  TYPE    CLAS    TMAX
        1   S   345 20
        2   Y   1860S
    CONC    NO  TYPE    FCN
        11  C   40

    SECT    NO  MNO TITL
            1  1   Solid
        CS  10
        PROF    TYPE    Z1  Z2  MNO YM          ZM          SYM
                L       180 18  1   -530[mm]    -960[mm]    QUAD
        CS  20
        TVAR    H   2[m]
        TVAR    B   1.2[m]
        POLY    TYPE    MNO
                O       11
        VERT    NO  Y   Z
                1   '=#B/2' '=#H/2'
                2   '=#B/2' '=-#H/2'
                3   '=-#B/2'    '=-#H/2'
                4   '=-#B/2'    '=#H/2'

    SECT    NO  MNO TITL
            2   1   Hollow
        CS  10
        PROF    TYPE    Z1  Z2  MNO YM          ZM          SYM
                L       180 18  1   -530[mm]    -960[mm]    QUAD
        CS  20
        TVAR    H   2[m]    $ height
        TVAR    B   1.2[m]  $ width
        TVAR    TF  0.3[m]  $ thickness of top and bottom slab
        TVAR    TW  0.3[m]  $ thickness of web
        TVAR    C   0.2[m]  $ chamfer
        POLY    TYPE    MNO
                O       11
        VERT    NO  Y   Z   REFP    REFD
                1   '=#B/2' '=#H/2'
                2   0   0   1   -1
                3   0   0   -1
                4   0   0   -2
        POLY    TYPE    MNO
                O   0
        VERT    NO  Y   Z   REFP    REFD
                11  '=(B/2-#TW-#C)' '=(#H/2-#TF)'
                12  '=(B/2-#TW)'    '=(#H/2-#TF-#C)'
                13  0   0   12  -12
                14  0   0   11  -11
                15  0   0   -11
                16  0   0   -12
                17  0   0   -13
                18  0   0   -14






    END