#define project= spregnuti_rostilj
$ ******************* CSM Design Manager **************
$
$ An overview over the created loadcases numbers
$ will be given in the first MAXIMA run.
$
$ ******************* CSM Design Manager **************
$
$ *************************************************************
PROG TEMPLATE
HEAD Design Concept
<text> <u><b> Overview used actions </u></b>
Type   usage
G    : taken from the CSM CS table
C    : taken from the CSM CS table
B    : taken from the CSM CS table
L_U  : UDL traffic "Uniform distributed load"
L_T  : traffic tandem axle
ZW   : Wind on traffic [without vertikal load]
SW   : Wind without traffic
T    : temperature
.
</text>
<text>
<u><b> Superposition and design concept: </u></b>
  In a first presuperposition, the variable actions are combined
  without  GPC (G=dead load, P=prestress, C=creep+shrinkage)
  in a first separate MAXIMA run.
  For the rare action combination RARE the
  produced max-min forces are stored in a presuperposition
  KOMB ... TYPE Y_1  ans stored with load case numbers 1141-1152.
    Is some codes with LC 1161-1172 an additional combination
    traffic + wind without temperature is created also TYPE Y_1,
    LC 1141-1152 then contains temperature without wind.
  For wind without traffic a further presuperposition Y_1
    is created (e.g. loadcase number 1181-1192).
.
  A following Maxima run then creates the final combination RARE
  with the precombinations Y_1 and the permanent actions
  GPC (G=dead load, P=prestress, C=C+S.) in loadcase 1121-1132.
.
  In the same way precombinations and final  MAXIMA combinations for
  nonfrequent with Y_2 LC 1200ff, frequent with Y_3 LC 1300ff,
  permanent with Y_4 LC 1400ff and if necessary for Y_9 1900ff
  with 1.0 psi-values for reaction forces are created.
  For design inclusive the load safety factors GAMU the
  combination DESI (presuperposition Y_D ) with LC 2100.ff is created,
  for a simplified stress range check FATI with LC 2500.ff.
.
  These final combinations are used directly for QUAD elements
  e.g. for a design in  BEMESS - LF DESI.
.
  Using prestressed or composite sections, the load parts GPC
  must be assigned to cross section construction stages (netto, ideell).
  Thus the parts GPC must be defined in AQB separately,
  e.g.  LC 5010  TYPE 'G_1 ' CT CS0 REF PART
  These LC definitions are summarized in block #include loadca_aqb.
  The corresponding variable actions are then added with the prepared
  precombination Y_1 to Y_D , e.g.
  COMB MAXR   LC1 G  LC2 P  LC3 C  LC4 Y_1 1.0   LCST
.
. For graphical checks the forces and stresses of the
. AQB combinations are stored with COMB LCST. For this the following
. sceme will be used:
.
<u><b> Overview created loadcases and design numbers </u></b>
convention loadcase numbering:
      1100 = rare        combination  1700 = in construction stages
      1200 = nonfrequent combination
      1300 = frequent    combination
      1400 = permanent   combination  1800 = in construction stages
      1900 = 1.0 superposition
      2100 = design                   2200 = in construction stages
      2500 = accidential
      2600 = earthquake
      2800 = Fatigue LM3    2900 = Fatigue simplified stress range LM1
    For WINGRAF-views: MAXIMA superpostion results start with  MAX or MIN
    in the loadcase title, all other titles come from AQB combinations!
    Only for the BEAM-AQB-combinations the LC number is further devided in:
      10-th number:   00 = 100 % prestress
                      70 =  75 % prestress -> loadcase 9000...
                      90 =  90 % prestress -> loadcase 9000...
                      10 = 110 % prestress -> loadcase 9000...
                   20+30 =  90 % prestress fatigue LM1+LM3 -> 9000...
       1-th number:  0+1 = maximum/minimum value uncracked design I
                     5+6 = maximum/minimum value   cracked design II
With this convention the following BEAM-AQB-loadcase numbers appear:
.
combination              prestress     uncracked     cracked II
                                       max LC min    max LC min
SLS rare                 Pk,inf  90%   9190  9191    9195  9196
                         Pm     100%   1100  1101    1105  1106
                         Pk,sub 110%   9110  9111    9115  9116
.
SLS nonfrequent          Pk,inf  90%   9290  9291    9295  9296
                         Pm     100%   1200  1201    1205  1206
                         Pk,sub 110%   9210  9211    9215  9216
.
SLS frequent             Pk,inf  90%   9390  9391    9395  9396
                         Pm     100%   1300  1301    1305  1306
                         Pk,sub 110%   9310  9311    9315  9316
 Fatigue weld+couplings  Pk,inf  75%   9370  9371    9375  9376
   stress range  LM1     Pk,inf  90%   9320  9321    9325  9326
     " LM3 midspan       Pk,inf  90%   9330  9331    9335  9336
     " LM3 innersupports Pk,inf  90%   9340  9341    9345  9346
.
SLS permanent            Pk,inf  90%   9490  9491    9495  9496
                         Pm     100%   1400  1401    1405  1406
                         Pk,sub 110%   9410  9411    9415  9416
. 9000- LC for prestress ne. 100% !
ULS             [desi]   Pm     100%      -     -    2105  2106
.
</text>
END
$ *************************************************************
PROG SOFILOAD urs:sofilo_1
HEAD Definition actions for presuperpositions
$ The following Y_ actions
$ are used only for a temporary superposition
$ Please dont use them for anything else!
ACT Y_1 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' rare without gpc'
ACT Y_2 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' nonf without gpc'
ACT Y_3 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' freq without gpc'
ACT Y_4 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' perm without gpc'
ACT Y_5 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' L_5  without gpc'
ACT Y_6 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' L_6  without gpc'
ACT Y_7 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' L_7  without gpc'
ACT Y_8 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' L_8  without gpc'
ACT Y_9 GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' 1.0* without gpc'
ACT Y_D GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' desi without gpc'
ACT Y_A GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' acci without gpc'
ACT Y_E GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' earq without gpc'
ACT Y_F GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' fati without gpc'
ACT Y_G GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' stress range L+Q'
ACT Y_X GAMU 1.0 0 1 1 1 1 SUP EXEX TITL ' extra-temporary '
END
$ *************************************************************
PROG MAXIMA urs:csmmax_3
HEAD presuperposition actions without GPC
echo full no  ; echo tabs yes
$ echo chck yes  $ activate this line for checks
$
$ In that case please activate an element for checking in
$ the superposition lines SUPP  e.g. for beam no. 5  with:
$     'BEAM' MY from 5   and activate echo load,fact yes
$
<text> <u><b> Superpositioning combinations: </u></b>
      rare, nonf, freq, perm, 1.0*, desi, acci, earq, fatigue
  LC  1100, 1200, 1300, 1400, 1900, 2100, 2500, 2600, 2800, 2900
  Type=Y_1,  Y_2,  Y_3,  Y_4,  Y_9,  Y_D,  Y_A,  Y_E,  Y_F,  Y_G
.
</text>
                              $ presuperposition actions without GPC
COMB   1 rare BASE - TYPE Y_1 $ combination rare
  #define comb_serv
  ACT L_U
  LC (101 106 1) TYPE COND
  ACT L_T
  LC (201 206 1) TYPE EXCL
  ACT ZW
  ACT T
  #enddef
  #include comb_serv
$ *************************************************************
                              $ presuperposition actions without GPC
COMB   2 nonf BASE - TYPE Y_2 $ combination nonfrequent
  #include comb_serv
                              $ presuperposition actions without GPC
COMB   3 freq BASE - TYPE Y_3 $ combination frequent
  #include comb_serv
                              $ presuperposition actions without GPC
COMB   4 perm BASE - TYPE Y_4 $ combination permanent
  #include comb_serv
$ *************************************************************
                              $ presuperposition actions without GPC
COMB   5 rare BASE - TYPE Y_9 $ combination stan_1.0
  #define comb_GAM1
  ACT L_U GAMU 1 0 1 1 1 1
  LC (101 106 1) TYPE COND
  ACT L_T GAMU 1 0 1 1 1 1
  LC (201 206 1) TYPE EXCL
  ACT ZW GAMU 1 0 1 1 1 1
  ACT T GAMU 1 0 1 1 1 1
  #enddef
  #include comb_GAM1
$ *************************************************************
                              $ presuperposition actions without GPC
COMB   6 desi BASE - TYPE Y_D $ combination design
  #define comb_desi
  ACT L_U
  LC (101 106 1) TYPE COND
  ACT L_T
  LC (201 206 1) TYPE EXCL
  ACT ZW
  ACT T
  #enddef
  #include comb_desi
$ *************************************************************
                              $ presuperposition actions without GPC
COMB   7 rare BASE - TYPE Y_G $ combination simplefatigue
  #define comb_FATG
  ACT L_U
  LC (101 106 1) TYPE COND
  ACT L_T
  LC (201 206 1) TYPE EXCL
  #enddef
  #include comb_FATG
$ *************************************************************
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=1
  'BEAM'   MY  1141         1
  'BEAM'   VZ  1143    999999
  'BEAM'   MT  1145    999999
  'BEAM'    N  1147    999999
  'BEAM'   MZ  1149    999999
  'BEAM'   VY  1151    999999
  'NODE'   PX  1141    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1143    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1145    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1147    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1149    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1151    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1153    999999  '_temporary  '
  'NODE' PHIY  1155    999999  '_temporary  '
  'NODE' PHIZ  1157    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=2
  'BEAM'   MY  1241    999999
  'BEAM'   VZ  1243    999999
  'BEAM'   MT  1245    999999
  'BEAM'    N  1247    999999
  'BEAM'   MZ  1249    999999
  'BEAM'   VY  1251    999999
  'NODE'   PX  1241    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1243    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1245    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1247    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1249    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1251    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1253    999999  '_temporary  '
  'NODE' PHIY  1255    999999  '_temporary  '
  'NODE' PHIZ  1257    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=3
  'BEAM'   MY  1341    999999
  'BEAM'   VZ  1343    999999
  'BEAM'   MT  1345    999999
  'BEAM'    N  1347    999999
  'BEAM'   MZ  1349    999999
  'BEAM'   VY  1351    999999
  'NODE'   PX  1341    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1343    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1345    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1347    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1349    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1351    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1353    999999  '_temporary  '
  'NODE' PHIY  1355    999999  '_temporary  '
  'NODE' PHIZ  1357    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=4
  'BEAM'   MY  1441    999999
  'BEAM'   VZ  1443    999999
  'BEAM'   MT  1445    999999
  'BEAM'    N  1447    999999
  'BEAM'   MZ  1449    999999
  'BEAM'   VY  1451    999999
  'NODE'   PX  1441    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1443    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1445    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1447    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1449    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1451    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1453    999999  '_temporary  '
  'NODE' PHIY  1455    999999  '_temporary  '
  'NODE' PHIZ  1457    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=5
  'BEAM'   MY  1941    999999
  'BEAM'   VZ  1943    999999
  'BEAM'   MT  1945    999999
  'BEAM'    N  1947    999999
  'BEAM'   MZ  1949    999999
  'BEAM'   VY  1951    999999
  'NODE'   PX  1941    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1943    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1945    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1947    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1949    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1951    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1953    999999  '_temporary  '
  'NODE' PHIY  1955    999999  '_temporary  '
  'NODE' PHIZ  1957    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=6
  'BEAM'   MY  2141         1
  'BEAM'   VZ  2143    999999
  'BEAM'   MT  2145    999999
  'BEAM'    N  2147    999999
  'BEAM'   MZ  2149    999999
  'BEAM'   VY  2151    999999
  'NODE'   PX  2141    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  2143    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  2145    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  2147    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  2149    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  2151    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  2153    999999  '_temporary  '
  'NODE' PHIY  2155    999999  '_temporary  '
  'NODE' PHIZ  2157    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=7
  'BEAM'   MY  2941    999999
  'BEAM'   VZ  2943    999999
  'BEAM'   MT  2945    999999
  'BEAM'    N  2947    999999
  'BEAM'   MZ  2949    999999
  'BEAM'   VY  2951    999999
  'NODE'   PX  2941    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  2943    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  2945    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  2947    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  2949    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  2951    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  2953    999999  '_temporary  '
  'NODE' PHIY  2955    999999  '_temporary  '
  'NODE' PHIZ  2957    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
END
$ *************************************************************
PROG MAXIMA urs:csmmax_3
HEAD presuperposition actions with wind without traffic
echo full no  ; echo tabs yes
$ echo chck yes  $ activate this line for checks
$
$ In that case please activate an element for checking in
$ the superposition lines SUPP  e.g. for beam no. 5  with:
$     'BEAM' MY from 5   and activate echo load,fact yes
$
<text> <u><b> Superpositioning combinations: </u></b>
      rare, nonf, freq, perm, 1.0*, desi, acci, earq, fatigue
  LC  1100, 1200, 1300, 1400, 1900, 2100, 2500, 2600, 2800, 2900
  Type=Y_1,  Y_2,  Y_3,  Y_4,  Y_9,  Y_D,  Y_A,  Y_E,  Y_F,  Y_G
.
</text>
                              $ presuperposition actions with wind without traffic
COMB   1 rare BASE - TYPE Y_1 $ combination rare
  #define comb_serv
  ACT SW
  ACT T
  #enddef
  #include comb_serv
$ *************************************************************
                              $ presuperposition actions with wind without traffic
COMB   2 nonf BASE - TYPE Y_2 $ combination nonfrequent
  #include comb_serv
                              $ presuperposition actions with wind without traffic
COMB   3 freq BASE - TYPE Y_3 $ combination frequent
  #include comb_serv
                              $ presuperposition actions with wind without traffic
COMB   4 perm BASE - TYPE Y_4 $ combination permanent
  #include comb_serv
$ *************************************************************
                              $ presuperposition actions with wind without traffic
COMB   5 rare BASE - TYPE Y_9 $ combination stan_1.0
  #define comb_GAM1
  ACT SW GAMU 1 0 1 1 1 1
  ACT T GAMU 1 0 1 1 1 1
  #enddef
  #include comb_GAM1
$ *************************************************************
                              $ presuperposition actions with wind without traffic
COMB   6 desi BASE - TYPE Y_D $ combination design
  #define comb_desi
  ACT SW
  ACT T
  #enddef
  #include comb_desi
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=1
  'BEAM'   MY  1161         1
  'BEAM'   VZ  1163    999999
  'BEAM'   MT  1165    999999
  'BEAM'    N  1167    999999
  'BEAM'   MZ  1169    999999
  'BEAM'   VY  1171    999999
  'NODE'   PX  1161    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1163    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1165    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1167    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1169    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1171    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1173    999999  '_temporary  '
  'NODE' PHIY  1175    999999  '_temporary  '
  'NODE' PHIZ  1177    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=2
  'BEAM'   MY  1261    999999
  'BEAM'   VZ  1263    999999
  'BEAM'   MT  1265    999999
  'BEAM'    N  1267    999999
  'BEAM'   MZ  1269    999999
  'BEAM'   VY  1271    999999
  'NODE'   PX  1261    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1263    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1265    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1267    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1269    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1271    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1273    999999  '_temporary  '
  'NODE' PHIY  1275    999999  '_temporary  '
  'NODE' PHIZ  1277    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=3
  'BEAM'   MY  1361    999999
  'BEAM'   VZ  1363    999999
  'BEAM'   MT  1365    999999
  'BEAM'    N  1367    999999
  'BEAM'   MZ  1369    999999
  'BEAM'   VY  1371    999999
  'NODE'   PX  1361    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1363    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1365    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1367    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1369    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1371    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1373    999999  '_temporary  '
  'NODE' PHIY  1375    999999  '_temporary  '
  'NODE' PHIZ  1377    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=4
  'BEAM'   MY  1461    999999
  'BEAM'   VZ  1463    999999
  'BEAM'   MT  1465    999999
  'BEAM'    N  1467    999999
  'BEAM'   MZ  1469    999999
  'BEAM'   VY  1471    999999
  'NODE'   PX  1461    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1463    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1465    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1467    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1469    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1471    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1473    999999  '_temporary  '
  'NODE' PHIY  1475    999999  '_temporary  '
  'NODE' PHIZ  1477    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=5
  'BEAM'   MY  1961    999999
  'BEAM'   VZ  1963    999999
  'BEAM'   MT  1965    999999
  'BEAM'    N  1967    999999
  'BEAM'   MZ  1969    999999
  'BEAM'   VY  1971    999999
  'NODE'   PX  1961    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  1963    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  1965    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  1967    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  1969    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  1971    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  1973    999999  '_temporary  '
  'NODE' PHIY  1975    999999  '_temporary  '
  'NODE' PHIZ  1977    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=6
  'BEAM'   MY  2161         1
  'BEAM'   VZ  2163    999999
  'BEAM'   MT  2165    999999
  'BEAM'    N  2167    999999
  'BEAM'   MZ  2169    999999
  'BEAM'   VY  2171    999999
  'NODE'   PX  2161    999999  'BEAM-MY_SPRI-P_temporary  '
  'NODE'   PY  2163    999999  'BEAM-VZ_SPRI-T_temporary  '
  'NODE'   PZ  2165    999999  'BEAM-MT_SPRI-M_temporary  '
  'NODE'   UX  2167    999999  'BEAM--N_SP-PTX_temporary  '
  'NODE'   UY  2169    999999  'BEAM-MZ_SP-PTY_temporary  '
  'NODE'   UZ  2171    999999  'BEAM-VY_SP-PTZ_temporary  '
  'NODE' PHIX  2173    999999  '_temporary  '
  'NODE' PHIY  2175    999999  '_temporary  '
  'NODE' PHIZ  2177    999999  '_temporary  '
  $ please use beam forces for nodal restraint moment!
END
-sys rem ********************************************
$
$ *************************************************************
$ *************************************************************
$ *************************************************************
$ *************************************************************
PROG MAXIMA urs:csmmax_3
HEAD Final Superposition SLS and ULS including GPC
echo full no  ; echo tabs yes
$ echo chck yes  $ activate this line for checks
$
$ In that case please activate an element for checking in
$ the superposition lines SUPP  e.g. for beam no. 5  with:
$     'BEAM' MY from 5   and activate echo load,fact yes
$
<text> <u><b> Superpositioning combinations: </u></b>
      rare, nonf, freq, perm, 1.0*, desi, acci, earq, fatigue
  LC  1100, 1200, 1300, 1400, 1900, 2100, 2500, 2600, 2800, 2900
  Type=Y_1,  Y_2,  Y_3,  Y_4,  Y_9,  Y_D,  Y_A,  Y_E,  Y_F,  Y_G
.
</text>
                     $ Final Superposition SLS and ULS including GPC
COMB  11 rare BASE - $ combination rare
  ACT G
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_1 GAMU 1 0 1 1 1 1
$ *************************************************************
                     $ Final Superposition SLS and ULS including GPC
COMB  12 nonf BASE - $ combination nonfrequent
  ACT G
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_2 GAMU 1 0 1 1 1 1
                     $ Final Superposition SLS and ULS including GPC
COMB  13 freq BASE - $ combination frequent
  ACT G
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_3 GAMU 1 0 1 1 1 1
                     $ Final Superposition SLS and ULS including GPC
COMB  14 perm BASE - $ combination permanent
  ACT G
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_4 GAMU 1 0 1 1 1 1
$ *************************************************************
                     $ Final Superposition SLS and ULS including GPC
COMB  15 rare BASE - TYPE Y_X $ combination stan_1.0
  ACT G GAMU 1 1 1 1 1 1
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C GAMU 1 1 1 1 1 1
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_9 GAMU 1 0 1 1 1 1
$ *************************************************************
                     $ Final Superposition SLS and ULS including GPC
COMB  16 desi BASE - $ combination design
  ACT G
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C GAMU     1.350 1 $ static determined part as G !!!
      LC 5004 TYPE G $ C+S til traffic opening = permanent
      LC 5007 TYPE  Q $ C+S after traffic opening = conditional
  ACT Y_D GAMU 1 0 1 1 1 1
$ *************************************************************
                     $ Final Superposition SLS and ULS including GPC
COMB  17 rare BASE - $ combination simplefatigue
  ACT G GAMU 1 1 1 1 1 1
      LC 5001 ; 5002 ; 5003 ; 5005 ; 5006
  ACT C GAMU 1 1 1 1 1 1
      LC 5004 TYPE G $ C+S fix til t-oo = permanent
      LC 5007 TYPE G $ C+S fix til t-oo = permanent
  ACT Y_G GAMU 1 0 1 1 1 1
$ *************************************************************
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=11
  'BEAM'   MY  1121         1
  'BEAM'   VZ  1123    999999
  'BEAM'   MT  1125    999999
  'BEAM'    N  1127    999999
  'BEAM'   MZ  1129    999999
  'BEAM'   VY  1131    999999
  'NODE'   PX  1121    999999  'BEAM-MY_SPRI-P_rare  '
  'NODE'   PY  1123    999999  'BEAM-VZ_SPRI-T_rare  '
  'NODE'   PZ  1125    999999  'BEAM-MT_SPRI-M_rare  '
  'NODE'   UX  1127    999999  'BEAM--N_SP-PTX_rare  '
  'NODE'   UY  1129    999999  'BEAM-MZ_SP-PTY_rare  '
  'NODE'   UZ  1131    999999  'BEAM-VY_SP-PTZ_rare  '
  'NODE' PHIX  1133    999999  '_rare  '
  'NODE' PHIY  1135    999999  '_rare  '
  'NODE' PHIZ  1137    999999  '_rare  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=12
  'BEAM'   MY  1221    999999
  'BEAM'   VZ  1223    999999
  'BEAM'   MT  1225    999999
  'BEAM'    N  1227    999999
  'BEAM'   MZ  1229    999999
  'BEAM'   VY  1231    999999
  'NODE'   PX  1221    999999  'BEAM-MY_SPRI-P_nonf  '
  'NODE'   PY  1223    999999  'BEAM-VZ_SPRI-T_nonf  '
  'NODE'   PZ  1225    999999  'BEAM-MT_SPRI-M_nonf  '
  'NODE'   UX  1227    999999  'BEAM--N_SP-PTX_nonf  '
  'NODE'   UY  1229    999999  'BEAM-MZ_SP-PTY_nonf  '
  'NODE'   UZ  1231    999999  'BEAM-VY_SP-PTZ_nonf  '
  'NODE' PHIX  1233    999999  '_nonf  '
  'NODE' PHIY  1235    999999  '_nonf  '
  'NODE' PHIZ  1237    999999  '_nonf  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=13
  'BEAM'   MY  1321    999999
  'BEAM'   VZ  1323    999999
  'BEAM'   MT  1325    999999
  'BEAM'    N  1327    999999
  'BEAM'   MZ  1329    999999
  'BEAM'   VY  1331    999999
  'NODE'   PX  1321    999999  'BEAM-MY_SPRI-P_freq  '
  'NODE'   PY  1323    999999  'BEAM-VZ_SPRI-T_freq  '
  'NODE'   PZ  1325    999999  'BEAM-MT_SPRI-M_freq  '
  'NODE'   UX  1327    999999  'BEAM--N_SP-PTX_freq  '
  'NODE'   UY  1329    999999  'BEAM-MZ_SP-PTY_freq  '
  'NODE'   UZ  1331    999999  'BEAM-VY_SP-PTZ_freq  '
  'NODE' PHIX  1333    999999  '_freq  '
  'NODE' PHIY  1335    999999  '_freq  '
  'NODE' PHIZ  1337    999999  '_freq  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=14
  'BEAM'   MY  1421    999999
  'BEAM'   VZ  1423    999999
  'BEAM'   MT  1425    999999
  'BEAM'    N  1427    999999
  'BEAM'   MZ  1429    999999
  'BEAM'   VY  1431    999999
  'NODE'   PX  1421    999999  'BEAM-MY_SPRI-P_perm  '
  'NODE'   PY  1423    999999  'BEAM-VZ_SPRI-T_perm  '
  'NODE'   PZ  1425    999999  'BEAM-MT_SPRI-M_perm  '
  'NODE'   UX  1427    999999  'BEAM--N_SP-PTX_perm  '
  'NODE'   UY  1429    999999  'BEAM-MZ_SP-PTY_perm  '
  'NODE'   UZ  1431    999999  'BEAM-VY_SP-PTZ_perm  '
  'NODE' PHIX  1433    999999  '_perm  '
  'NODE' PHIY  1435    999999  '_perm  '
  'NODE' PHIZ  1437    999999  '_perm  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=15
  'BEAM'   MY  1921    999999
  'BEAM'   VZ  1923    999999
  'BEAM'   MT  1925    999999
  'BEAM'    N  1927    999999
  'BEAM'   MZ  1929    999999
  'BEAM'   VY  1931    999999
  'NODE'   PX  1921    999999  'BEAM-MY_SPRI-P_1.0_  '
  'NODE'   PY  1923    999999  'BEAM-VZ_SPRI-T_1.0_  '
  'NODE'   PZ  1925    999999  'BEAM-MT_SPRI-M_1.0_  '
  'NODE'   UX  1927    999999  'BEAM--N_SP-PTX_1.0_  '
  'NODE'   UY  1929    999999  'BEAM-MZ_SP-PTY_1.0_  '
  'NODE'   UZ  1931    999999  'BEAM-VY_SP-PTZ_1.0_  '
  'NODE' PHIX  1933    999999  '_1.0_  '
  'NODE' PHIY  1935    999999  '_1.0_  '
  'NODE' PHIZ  1937    999999  '_1.0_  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT $ If you want to use ECHO CHCK, please
             $ replace following FROM number to  -
             $ Please do not touch the 999999 numbers.
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=16
  'BEAM'   MY  2121         1
  'BEAM'   VZ  2123    999999
  'BEAM'   MT  2125    999999
  'BEAM'    N  2127    999999
  'BEAM'   MZ  2129    999999
  'BEAM'   VY  2131    999999
  'NODE'   PX  2121    999999  'BEAM-MY_SPRI-P_desi  '
  'NODE'   PY  2123    999999  'BEAM-VZ_SPRI-T_desi  '
  'NODE'   PZ  2125    999999  'BEAM-MT_SPRI-M_desi  '
  'NODE'   UX  2127    999999  'BEAM--N_SP-PTX_desi  '
  'NODE'   UY  2129    999999  'BEAM-MZ_SP-PTY_desi  '
  'NODE'   UZ  2131    999999  'BEAM-VY_SP-PTZ_desi  '
  'NODE' PHIX  2133    999999  '_desi  '
  'NODE' PHIY  2135    999999  '_desi  '
  'NODE' PHIZ  2137    999999  '_desi  '
  $ please use beam forces for nodal restraint moment!
ECHO LOAD,FACT NO
$ SUPP FROM - enforces Test of superpos. with ECHO CHCK
SUPP ETYP TYPE   LC   FROM  TITL EXTR=MAMI COMB=17
  'BEAM'   MY  2921    999999
  'BEAM'   VZ  2923    999999
  'BEAM'   MT  2925    999999
  'BEAM'    N  2927    999999
  'BEAM'   MZ  2929    999999
  'BEAM'   VY  2931    999999
  'NODE'   PX  2921    999999  'BEAM-MY_SPRI-P_rare  '
  'NODE'   PY  2923    999999  'BEAM-VZ_SPRI-T_rare  '
  'NODE'   PZ  2925    999999  'BEAM-MT_SPRI-M_rare  '
  'NODE'   UX  2927    999999  'BEAM--N_SP-PTX_rare  '
  'NODE'   UY  2929    999999  'BEAM-MZ_SP-PTY_rare  '
  'NODE'   UZ  2931    999999  'BEAM-VY_SP-PTZ_rare  '
  'NODE' PHIX  2933    999999  '_rare  '
  'NODE' PHIY  2935    999999  '_rare  '
  'NODE' PHIZ  2937    999999  '_rare  '
  $ please use beam forces for nodal restraint moment!
END
$ *************************************************************
PROG SOFILOAD urs:sofilo_4
HEAD Rewrite loadcase titles
$ As CSM uses loadcasenumbers for MAXIMA twice,
$ e.g. QUAD-MXX_BEAM-MY_NODE-PX_SPRI-P
$ (differrent elementtypes to not conflict each other)
$ the titles are uniformed in this SOFILOAD run
$ temporary = without GPC
$ (G=dead load, P=prestress, C=creep+shrinkage)
$ R=rare, F=frequent, N=nonfrequent, P=permanent
LC  1121 TITL 'rare BEAM-MY_NODE-PX_SPRI-P'
LC  1122 TITL 'rare BEAM-MY_NODE-PX_SPRI-P'
LC  1123 TITL 'rare BEAM-VZ_NODE-PY_SPRI-T'
LC  1124 TITL 'rare BEAM-VZ_NODE-PY_SPRI-T'
LC  1125 TITL 'rare BEAM-MT_NODE-PZ_SPRI-M'
LC  1126 TITL 'rare BEAM-MT_NODE-PZ_SPRI-M'
LC  1127 TITL 'rare BEAM--N_NODE-UX_SP-PTX'
LC  1128 TITL 'rare BEAM--N_NODE-UX_SP-PTX'
LC  1129 TITL 'rare BEAM-MZ_NODE-UY_SP-PTY'
LC  1130 TITL 'rare BEAM-MZ_NODE-UY_SP-PTY'
LC  1131 TITL 'rare BEAM-VY_NODE-UZ_SP-PTZ'
LC  1132 TITL 'rare BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1133 TITL 'rare NODE-PHIX'
$ LC  1134 TITL 'rare NODE-PHIX'
$ LC  1135 TITL 'rare NODE-PHIY'
$ LC  1136 TITL 'rare NODE-PHIY'
$ LC  1137 TITL 'rare NODE-PHIZ'
$ LC  1138 TITL 'rare NODE-PHIZ'
LC  1141 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1142 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1143 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1144 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1145 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1146 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1147 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  1148 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  1149 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1150 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1151 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1152 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1153 TITL 'R_temp NODE-PHIX'
$ LC  1154 TITL 'R_temp NODE-PHIX'
$ LC  1155 TITL 'R_temp NODE-PHIY'
$ LC  1156 TITL 'R_temp NODE-PHIY'
$ LC  1157 TITL 'R_temp NODE-PHIZ'
$ LC  1158 TITL 'R_temp NODE-PHIZ'
LC  1161 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1162 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1163 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1164 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1165 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1166 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1167 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  1168 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  1169 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1170 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1171 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1172 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1173 TITL 'R_temp NODE-PHIX'
$ LC  1174 TITL 'R_temp NODE-PHIX'
$ LC  1175 TITL 'R_temp NODE-PHIY'
$ LC  1176 TITL 'R_temp NODE-PHIY'
$ LC  1177 TITL 'R_temp NODE-PHIZ'
$ LC  1178 TITL 'R_temp NODE-PHIZ'
LC  1221 TITL 'nonf BEAM-MY_NODE-PX_SPRI-P'
LC  1222 TITL 'nonf BEAM-MY_NODE-PX_SPRI-P'
LC  1223 TITL 'nonf BEAM-VZ_NODE-PY_SPRI-T'
LC  1224 TITL 'nonf BEAM-VZ_NODE-PY_SPRI-T'
LC  1225 TITL 'nonf BEAM-MT_NODE-PZ_SPRI-M'
LC  1226 TITL 'nonf BEAM-MT_NODE-PZ_SPRI-M'
LC  1227 TITL 'nonf BEAM--N_NODE-UX_SP-PTX'
LC  1228 TITL 'nonf BEAM--N_NODE-UX_SP-PTX'
LC  1229 TITL 'nonf BEAM-MZ_NODE-UY_SP-PTY'
LC  1230 TITL 'nonf BEAM-MZ_NODE-UY_SP-PTY'
LC  1231 TITL 'nonf BEAM-VY_NODE-UZ_SP-PTZ'
LC  1232 TITL 'nonf BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1233 TITL 'nonf NODE-PHIX'
$ LC  1234 TITL 'nonf NODE-PHIX'
$ LC  1235 TITL 'nonf NODE-PHIY'
$ LC  1236 TITL 'nonf NODE-PHIY'
$ LC  1237 TITL 'nonf NODE-PHIZ'
$ LC  1238 TITL 'nonf NODE-PHIZ'
LC  1241 TITL 'N_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1242 TITL 'N_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1243 TITL 'N_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1244 TITL 'N_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1245 TITL 'N_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1246 TITL 'N_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1247 TITL 'N_temp BEAM--N_NODE-UX_SP-PTX'
LC  1248 TITL 'N_temp BEAM--N_NODE-UX_SP-PTX'
LC  1249 TITL 'N_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1250 TITL 'N_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1251 TITL 'N_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1252 TITL 'N_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1253 TITL 'N_temp NODE-PHIX'
$ LC  1254 TITL 'N_temp NODE-PHIX'
$ LC  1255 TITL 'N_temp NODE-PHIY'
$ LC  1256 TITL 'N_temp NODE-PHIY'
$ LC  1257 TITL 'N_temp NODE-PHIZ'
$ LC  1258 TITL 'N_temp NODE-PHIZ'
LC  1261 TITL 'N_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1262 TITL 'N_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1263 TITL 'N_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1264 TITL 'N_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1265 TITL 'N_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1266 TITL 'N_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1267 TITL 'N_temp BEAM--N_NODE-UX_SP-PTX'
LC  1268 TITL 'N_temp BEAM--N_NODE-UX_SP-PTX'
LC  1269 TITL 'N_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1270 TITL 'N_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1271 TITL 'N_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1272 TITL 'N_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1273 TITL 'N_temp NODE-PHIX'
$ LC  1274 TITL 'N_temp NODE-PHIX'
$ LC  1275 TITL 'N_temp NODE-PHIY'
$ LC  1276 TITL 'N_temp NODE-PHIY'
$ LC  1277 TITL 'N_temp NODE-PHIZ'
$ LC  1278 TITL 'N_temp NODE-PHIZ'
LC  1321 TITL 'freq BEAM-MY_NODE-PX_SPRI-P'
LC  1322 TITL 'freq BEAM-MY_NODE-PX_SPRI-P'
LC  1323 TITL 'freq BEAM-VZ_NODE-PY_SPRI-T'
LC  1324 TITL 'freq BEAM-VZ_NODE-PY_SPRI-T'
LC  1325 TITL 'freq BEAM-MT_NODE-PZ_SPRI-M'
LC  1326 TITL 'freq BEAM-MT_NODE-PZ_SPRI-M'
LC  1327 TITL 'freq BEAM--N_NODE-UX_SP-PTX'
LC  1328 TITL 'freq BEAM--N_NODE-UX_SP-PTX'
LC  1329 TITL 'freq BEAM-MZ_NODE-UY_SP-PTY'
LC  1330 TITL 'freq BEAM-MZ_NODE-UY_SP-PTY'
LC  1331 TITL 'freq BEAM-VY_NODE-UZ_SP-PTZ'
LC  1332 TITL 'freq BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1333 TITL 'freq NODE-PHIX'
$ LC  1334 TITL 'freq NODE-PHIX'
$ LC  1335 TITL 'freq NODE-PHIY'
$ LC  1336 TITL 'freq NODE-PHIY'
$ LC  1337 TITL 'freq NODE-PHIZ'
$ LC  1338 TITL 'freq NODE-PHIZ'
LC  1341 TITL 'F_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1342 TITL 'F_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1343 TITL 'F_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1344 TITL 'F_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1345 TITL 'F_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1346 TITL 'F_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1347 TITL 'F_temp BEAM--N_NODE-UX_SP-PTX'
LC  1348 TITL 'F_temp BEAM--N_NODE-UX_SP-PTX'
LC  1349 TITL 'F_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1350 TITL 'F_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1351 TITL 'F_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1352 TITL 'F_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1353 TITL 'F_temp NODE-PHIX'
$ LC  1354 TITL 'F_temp NODE-PHIX'
$ LC  1355 TITL 'F_temp NODE-PHIY'
$ LC  1356 TITL 'F_temp NODE-PHIY'
$ LC  1357 TITL 'F_temp NODE-PHIZ'
$ LC  1358 TITL 'F_temp NODE-PHIZ'
LC  1361 TITL 'F_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1362 TITL 'F_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1363 TITL 'F_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1364 TITL 'F_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1365 TITL 'F_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1366 TITL 'F_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1367 TITL 'F_temp BEAM--N_NODE-UX_SP-PTX'
LC  1368 TITL 'F_temp BEAM--N_NODE-UX_SP-PTX'
LC  1369 TITL 'F_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1370 TITL 'F_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1371 TITL 'F_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1372 TITL 'F_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1373 TITL 'F_temp NODE-PHIX'
$ LC  1374 TITL 'F_temp NODE-PHIX'
$ LC  1375 TITL 'F_temp NODE-PHIY'
$ LC  1376 TITL 'F_temp NODE-PHIY'
$ LC  1377 TITL 'F_temp NODE-PHIZ'
$ LC  1378 TITL 'F_temp NODE-PHIZ'
LC  1421 TITL 'perm BEAM-MY_NODE-PX_SPRI-P'
LC  1422 TITL 'perm BEAM-MY_NODE-PX_SPRI-P'
LC  1423 TITL 'perm BEAM-VZ_NODE-PY_SPRI-T'
LC  1424 TITL 'perm BEAM-VZ_NODE-PY_SPRI-T'
LC  1425 TITL 'perm BEAM-MT_NODE-PZ_SPRI-M'
LC  1426 TITL 'perm BEAM-MT_NODE-PZ_SPRI-M'
LC  1427 TITL 'perm BEAM--N_NODE-UX_SP-PTX'
LC  1428 TITL 'perm BEAM--N_NODE-UX_SP-PTX'
LC  1429 TITL 'perm BEAM-MZ_NODE-UY_SP-PTY'
LC  1430 TITL 'perm BEAM-MZ_NODE-UY_SP-PTY'
LC  1431 TITL 'perm BEAM-VY_NODE-UZ_SP-PTZ'
LC  1432 TITL 'perm BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1433 TITL 'perm NODE-PHIX'
$ LC  1434 TITL 'perm NODE-PHIX'
$ LC  1435 TITL 'perm NODE-PHIY'
$ LC  1436 TITL 'perm NODE-PHIY'
$ LC  1437 TITL 'perm NODE-PHIZ'
$ LC  1438 TITL 'perm NODE-PHIZ'
LC  1441 TITL 'P_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1442 TITL 'P_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1443 TITL 'P_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1444 TITL 'P_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1445 TITL 'P_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1446 TITL 'P_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1447 TITL 'P_temp BEAM--N_NODE-UX_SP-PTX'
LC  1448 TITL 'P_temp BEAM--N_NODE-UX_SP-PTX'
LC  1449 TITL 'P_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1450 TITL 'P_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1451 TITL 'P_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1452 TITL 'P_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1453 TITL 'P_temp NODE-PHIX'
$ LC  1454 TITL 'P_temp NODE-PHIX'
$ LC  1455 TITL 'P_temp NODE-PHIY'
$ LC  1456 TITL 'P_temp NODE-PHIY'
$ LC  1457 TITL 'P_temp NODE-PHIZ'
$ LC  1458 TITL 'P_temp NODE-PHIZ'
LC  1461 TITL 'P_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1462 TITL 'P_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1463 TITL 'P_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1464 TITL 'P_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1465 TITL 'P_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1466 TITL 'P_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1467 TITL 'P_temp BEAM--N_NODE-UX_SP-PTX'
LC  1468 TITL 'P_temp BEAM--N_NODE-UX_SP-PTX'
LC  1469 TITL 'P_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1470 TITL 'P_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1471 TITL 'P_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1472 TITL 'P_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1473 TITL 'P_temp NODE-PHIX'
$ LC  1474 TITL 'P_temp NODE-PHIX'
$ LC  1475 TITL 'P_temp NODE-PHIY'
$ LC  1476 TITL 'P_temp NODE-PHIY'
$ LC  1477 TITL 'P_temp NODE-PHIZ'
$ LC  1478 TITL 'P_temp NODE-PHIZ'
LC  1921 TITL '1.0_ BEAM-MY_NODE-PX_SPRI-P'
LC  1922 TITL '1.0_ BEAM-MY_NODE-PX_SPRI-P'
LC  1923 TITL '1.0_ BEAM-VZ_NODE-PY_SPRI-T'
LC  1924 TITL '1.0_ BEAM-VZ_NODE-PY_SPRI-T'
LC  1925 TITL '1.0_ BEAM-MT_NODE-PZ_SPRI-M'
LC  1926 TITL '1.0_ BEAM-MT_NODE-PZ_SPRI-M'
LC  1927 TITL '1.0_ BEAM--N_NODE-UX_SP-PTX'
LC  1928 TITL '1.0_ BEAM--N_NODE-UX_SP-PTX'
LC  1929 TITL '1.0_ BEAM-MZ_NODE-UY_SP-PTY'
LC  1930 TITL '1.0_ BEAM-MZ_NODE-UY_SP-PTY'
LC  1931 TITL '1.0_ BEAM-VY_NODE-UZ_SP-PTZ'
LC  1932 TITL '1.0_ BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1933 TITL '1.0_ NODE-PHIX'
$ LC  1934 TITL '1.0_ NODE-PHIX'
$ LC  1935 TITL '1.0_ NODE-PHIY'
$ LC  1936 TITL '1.0_ NODE-PHIY'
$ LC  1937 TITL '1.0_ NODE-PHIZ'
$ LC  1938 TITL '1.0_ NODE-PHIZ'
LC  1941 TITL '1_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1942 TITL '1_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1943 TITL '1_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1944 TITL '1_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1945 TITL '1_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1946 TITL '1_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1947 TITL '1_temp BEAM--N_NODE-UX_SP-PTX'
LC  1948 TITL '1_temp BEAM--N_NODE-UX_SP-PTX'
LC  1949 TITL '1_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1950 TITL '1_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1951 TITL '1_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1952 TITL '1_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1953 TITL '1_temp NODE-PHIX'
$ LC  1954 TITL '1_temp NODE-PHIX'
$ LC  1955 TITL '1_temp NODE-PHIY'
$ LC  1956 TITL '1_temp NODE-PHIY'
$ LC  1957 TITL '1_temp NODE-PHIZ'
$ LC  1958 TITL '1_temp NODE-PHIZ'
LC  1961 TITL '1_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1962 TITL '1_temp BEAM-MY_NODE-PX_SPRI-P'
LC  1963 TITL '1_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1964 TITL '1_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  1965 TITL '1_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1966 TITL '1_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  1967 TITL '1_temp BEAM--N_NODE-UX_SP-PTX'
LC  1968 TITL '1_temp BEAM--N_NODE-UX_SP-PTX'
LC  1969 TITL '1_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1970 TITL '1_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  1971 TITL '1_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  1972 TITL '1_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  1973 TITL '1_temp NODE-PHIX'
$ LC  1974 TITL '1_temp NODE-PHIX'
$ LC  1975 TITL '1_temp NODE-PHIY'
$ LC  1976 TITL '1_temp NODE-PHIY'
$ LC  1977 TITL '1_temp NODE-PHIZ'
$ LC  1978 TITL '1_temp NODE-PHIZ'
LC  2121 TITL 'desi BEAM-MY_NODE-PX_SPRI-P'
LC  2122 TITL 'desi BEAM-MY_NODE-PX_SPRI-P'
LC  2123 TITL 'desi BEAM-VZ_NODE-PY_SPRI-T'
LC  2124 TITL 'desi BEAM-VZ_NODE-PY_SPRI-T'
LC  2125 TITL 'desi BEAM-MT_NODE-PZ_SPRI-M'
LC  2126 TITL 'desi BEAM-MT_NODE-PZ_SPRI-M'
LC  2127 TITL 'desi BEAM--N_NODE-UX_SP-PTX'
LC  2128 TITL 'desi BEAM--N_NODE-UX_SP-PTX'
LC  2129 TITL 'desi BEAM-MZ_NODE-UY_SP-PTY'
LC  2130 TITL 'desi BEAM-MZ_NODE-UY_SP-PTY'
LC  2131 TITL 'desi BEAM-VY_NODE-UZ_SP-PTZ'
LC  2132 TITL 'desi BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  2133 TITL 'desi NODE-PHIX'
$ LC  2134 TITL 'desi NODE-PHIX'
$ LC  2135 TITL 'desi NODE-PHIY'
$ LC  2136 TITL 'desi NODE-PHIY'
$ LC  2137 TITL 'desi NODE-PHIZ'
$ LC  2138 TITL 'desi NODE-PHIZ'
LC  2141 TITL 'D_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2142 TITL 'D_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2143 TITL 'D_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2144 TITL 'D_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2145 TITL 'D_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2146 TITL 'D_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2147 TITL 'D_temp BEAM--N_NODE-UX_SP-PTX'
LC  2148 TITL 'D_temp BEAM--N_NODE-UX_SP-PTX'
LC  2149 TITL 'D_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2150 TITL 'D_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2151 TITL 'D_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  2152 TITL 'D_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  2153 TITL 'D_temp NODE-PHIX'
$ LC  2154 TITL 'D_temp NODE-PHIX'
$ LC  2155 TITL 'D_temp NODE-PHIY'
$ LC  2156 TITL 'D_temp NODE-PHIY'
$ LC  2157 TITL 'D_temp NODE-PHIZ'
$ LC  2158 TITL 'D_temp NODE-PHIZ'
LC  2161 TITL 'D_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2162 TITL 'D_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2163 TITL 'D_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2164 TITL 'D_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2165 TITL 'D_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2166 TITL 'D_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2167 TITL 'D_temp BEAM--N_NODE-UX_SP-PTX'
LC  2168 TITL 'D_temp BEAM--N_NODE-UX_SP-PTX'
LC  2169 TITL 'D_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2170 TITL 'D_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2171 TITL 'D_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  2172 TITL 'D_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  2173 TITL 'D_temp NODE-PHIX'
$ LC  2174 TITL 'D_temp NODE-PHIX'
$ LC  2175 TITL 'D_temp NODE-PHIY'
$ LC  2176 TITL 'D_temp NODE-PHIY'
$ LC  2177 TITL 'D_temp NODE-PHIZ'
$ LC  2178 TITL 'D_temp NODE-PHIZ'
LC  2921 TITL 'rare BEAM-MY_NODE-PX_SPRI-P'
LC  2922 TITL 'rare BEAM-MY_NODE-PX_SPRI-P'
LC  2923 TITL 'rare BEAM-VZ_NODE-PY_SPRI-T'
LC  2924 TITL 'rare BEAM-VZ_NODE-PY_SPRI-T'
LC  2925 TITL 'rare BEAM-MT_NODE-PZ_SPRI-M'
LC  2926 TITL 'rare BEAM-MT_NODE-PZ_SPRI-M'
LC  2927 TITL 'rare BEAM--N_NODE-UX_SP-PTX'
LC  2928 TITL 'rare BEAM--N_NODE-UX_SP-PTX'
LC  2929 TITL 'rare BEAM-MZ_NODE-UY_SP-PTY'
LC  2930 TITL 'rare BEAM-MZ_NODE-UY_SP-PTY'
LC  2931 TITL 'rare BEAM-VY_NODE-UZ_SP-PTZ'
LC  2932 TITL 'rare BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  2933 TITL 'rare NODE-PHIX'
$ LC  2934 TITL 'rare NODE-PHIX'
$ LC  2935 TITL 'rare NODE-PHIY'
$ LC  2936 TITL 'rare NODE-PHIY'
$ LC  2937 TITL 'rare NODE-PHIZ'
$ LC  2938 TITL 'rare NODE-PHIZ'
LC  2941 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2942 TITL 'R_temp BEAM-MY_NODE-PX_SPRI-P'
LC  2943 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2944 TITL 'R_temp BEAM-VZ_NODE-PY_SPRI-T'
LC  2945 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2946 TITL 'R_temp BEAM-MT_NODE-PZ_SPRI-M'
LC  2947 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  2948 TITL 'R_temp BEAM--N_NODE-UX_SP-PTX'
LC  2949 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2950 TITL 'R_temp BEAM-MZ_NODE-UY_SP-PTY'
LC  2951 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
LC  2952 TITL 'R_temp BEAM-VY_NODE-UZ_SP-PTZ'
$ LC  2953 TITL 'R_temp NODE-PHIX'
$ LC  2954 TITL 'R_temp NODE-PHIX'
$ LC  2955 TITL 'R_temp NODE-PHIY'
$ LC  2956 TITL 'R_temp NODE-PHIY'
$ LC  2957 TITL 'R_temp NODE-PHIZ'
$ LC  2958 TITL 'R_temp NODE-PHIZ'
END
$
PROG WING urs:wing0009
HEAD Support reactions of 1.0 superposition
SIZE -urs SC 0 spli 2x1 hleg 1.5 sleg 1.5
VIEW EG3
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT MaxMin Support reactions times 1.0 superposition
LC 1925
NODE TYPE SZ SCHH 0.25
LC 1926
NODE TYPE SZ SCHH 0.25
LC 1921
NODE TYPE SX SCHH 0.25
LC 1922
NODE TYPE SX SCHH 0.25
LC 1923
NODE TYPE SY SCHH 0.25
LC 1924
NODE TYPE SY SCHH 0.25
END
$
$ *************************************************************
PROG AQB urs:desi13
HEAD Check print of single action components
$ Please look for "Analysis of Section" in the print file
ECHO SECT,COMB,FORC,REIN,STRE NO
ECHO TABS 2 $ 1+2 = print all tendons separately
BEAM    CS0   1 CS1   2
$
#define loadca_aqb
  CTRL SVRF   1.00000 $ take into account reinforcement for C+S
LC 5001 TYPE 'G_1 ' CST CS0 REF 'PART' SUP PERM
LC 5002 TYPE 'G_2 ' CST CS1 REF 'PART' SUP PERM
LC 5003 TYPE 'G_1 ' CST CS1 REF 'PART' SUP PERM $ building state B as type G_1 !
LC 5004 TYPE 'C_1 ' CST CS1 REF 'PART' SUP PERM GAMU     1.350 1 $ static determined part as G !!!
LC 6004 TYPE 'C_1 ' CST CS1 REF 'PART' SUP PERM GAMU 1 1
LC 5005 TYPE 'G_2 ' CST CS1 REF 'PART' SUP PERM
LC 5006 TYPE 'G_3 ' CST CS1 REF 'PART' SUP PERM
LC 5007 TYPE 'C_2 ' CST CS1 REF 'PART' SUP PERM GAMU     1.350 1 $ static determined part as G !!!
LC 6007 TYPE 'C_2 ' CST CS1 REF 'PART' SUP PERM GAMU 1 1
$ Further actions:
LC (101 106 1)     TYPE 'L_U ' CST CS1 REF GROS
LC (201 206 1)     TYPE 'L_T ' CST CS1 REF GROS
LC      TYPE 'ZW  ' CST CS1 REF GROS
LC      TYPE 'SW  ' CST CS1 REF GROS
LC      TYPE 'T   ' CST CS1 REF GROS
$ presuperpositions without gpc:
LC      TYPE 'Y_1 ' CST CS1 REF GROS
LC      TYPE 'Y_2 ' CST CS1 REF GROS
LC      TYPE 'Y_3 ' CST CS1 REF GROS
LC      TYPE 'Y_4 ' CST CS1 REF GROS
LC      TYPE 'Y_9 ' CST CS1 REF GROS
LC      TYPE 'Y_D ' CST CS1 REF GROS
LC      TYPE 'Y_G ' CST CS1 REF GROS
#enddef
#include loadca_aqb
$
$ stresses in single loadcases:
COMB EXTR SCOM TITL         LCST  LC1  LC2  LC3  LC4  LC5  LC6
     SUM  MY   G_1          1001  G_1
     SUM  MY   G_2          1002  G_2
     SUM  MY   G_3          1002  G_3
     SUM  MY   G            1003  G
                           $ G also includes B building stages
     SUM  MY   C_1          1005  C_1
     SUM  MY   C_2          1006  C_2
     SUM  MY   C            1007  C
COMB  SUM LC1 5001 F1 .000001 TITL ******************** $ creates separation line in listing
COMB EXTR SCOM TITL         LCST  LC1  LC2  LC3  LC4  LC5  LC6
$ stresses of actions:  ------------------------
     MAX  MY  'L_U  max-MY' 1011  L_U
     MAX  MY  'L_T  max-MY' 1012  L_T
     MAX  MY  'ZW   max-MY' 1013  ZW
     MAX  MY  'SW   max-MY' 1014  SW
     MAX  MY  'T    max-MY' 1015  T
     MAX  MY  'Y_1  max-MY' 1016  Y_1
     MAX  MY  'Y_2  max-MY' 1017  Y_2
     MAX  MY  'Y_3  max-MY' 1018  Y_3
     MAX  MY  'Y_4  max-MY' 1019  Y_4
     MAX  MY  'Y_9  max-MY' 1020  Y_9
     MAX  MY  'Y_D  max-MY' 1021  Y_D
     MAX  MY  'Y_G  max-MY' 1022  Y_G
COMB  SUM LC1 5001 F1 .000001 TITL ******************** $ creates separation line in listing
COMB EXTR SCOM TITL         LCST  LC1  LC2  LC3  LC4  LC5  LC6
$ MIN-MY for negative bending moments: ---------
     MIN  MY  'L_U  min-MY' 1023  L_U
     MIN  MY  'L_T  min-MY' 1024  L_T
     MIN  MY  'ZW   min-MY' 1025  ZW
     MIN  MY  'SW   min-MY' 1026  SW
     MIN  MY  'T    min-MY' 1027  T
     MIN  MY  'Y_1  min-MY' 1028  Y_1
     MIN  MY  'Y_2  min-MY' 1029  Y_2
     MIN  MY  'Y_3  min-MY' 1030  Y_3
     MIN  MY  'Y_4  min-MY' 1031  Y_4
     MIN  MY  'Y_9  min-MY' 1032  Y_9
     MIN  MY  'Y_D  min-MY' 1033  Y_D
     MIN  MY  'Y_G  min-MY' 1034  Y_G
COMB  SUM LC1 5001 F1 .000001 TITL ******************** $ creates separation line in listing
$ stresses in simple combinations:
COMB EXTR SCOM TITL         LCST  LC1  LC2  LC3  LC4  LC5  LC6
     SUM  MY   'G+C  '      1061  G    C
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL decompression+ LCST 9490 LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL decompression- LCST 9491 LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL decompres_sub+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL decompres_sub- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$
$ SLS Comb. RARE
$ with presuperposed actions from MAXIMA
COMB MAXR MY TITL SLS_RARE+ LCST 1100 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINR MY TITL SLS_RARE- LCST 1101 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
$
$
$ ULS Comb. DESI in uncracked state STRE -> LCST 2107,2108
$ with presuperposed actions from MAXIMA
COMB MAXD MY TITL ULS_SPAN_incl_P0+ LCST 2117 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MY TITL ULS_SPAN_incl_P0- LCST 2118 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$
STRE C $ prints linear stresses of combinations
$ Please look for "Analysis of Section" in the print file
$
$ with presuperposed actions from MAXIMA
COMB MAXD MY TITL ULS_DESIGN+ LCST 2105 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MY TITL ULS_DESIGN- LCST 2106 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
DESI STAT ULTI $ first ULS design
END
$
PROG AQUP -E urs:csmaqup3
HEAD Plot to Check print of single action components
LET#LF   1061
SIZE URS SC 0 AXIS pers
FILL F8 1326 1326
let#AQUP_sig      5.00 $ 1 cm corresponds to #AQUP_sig N/mm2
$
#define AQUP_1
  let#LCAQB #LF
  LET#N         1 ; LET#x   0.00000 ; REIN NO #N x #x CS 998 ; S LC #LCAQB NO #N x #x ; SECT - TYPE SIG FAC #AQUP_sig $ 1 cm = ... N/mm2
#enddef
#include AQUP_1
LET#LF   9490
#include AQUP_1
LET#LF   9491
#include AQUP_1
LET#LF   2105
#include AQUP_1
LET#LF   2106
#include AQUP_1
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi02
HEAD ULS Ultimate Limit State Design
$ Result-control: necessary reinforcement in following plot
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ $ ECHO LC,DESI YES $ activate for long print out
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD - $ stores the reinforcement for the first time
$ with presuperposed actions from MAXIMA
COMB MAXD MY TITL ULS_design+ LCST 2105 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MY TITL ULS_design- LCST 2106 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD VZ TITL ULS_design+ LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND VZ TITL ULS_design- LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD MT TITL ULS_design+ LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MT TITL ULS_design- LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD  N TITL ULS_design+ LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND  N TITL ULS_design- LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD VY TITL ULS_design+ LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND VY TITL ULS_design- LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD MZ TITL ULS_design+ LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MZ TITL ULS_design- LCST    - LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 2107 TITL ULS_design+
COMB GMIN LCST 2108 TITL ULS_design- $ GMIN only for WINGRAF - min-MY
DESI STAT ULTI $ ULS design
END
$
PROG WING urs:wing0001
HEAD Necessary reinforcement after ULS Design
#define WINGDATA
  SIZE  urs SC 100 spli 3x1 hleg 1.5 sleg 1.5
               $ spli 3x1=3 pictures over the heigth
               $  urs = landscape  -urs = portrait
  SIZ2 UMBR yes
$
  VIEW -XZ           $ view direction - alternativ:
                     $ VIEW EG3  $ direction 3D
  grp - yes
  GRP  AUSR,AUNS,ASTR,ALAN,AGEO  OFF $ no axes
  COLO C25 0 ; COLO C31 0 $ no tendons
  COLO C16 0 ; $ boundary elements
  COLO C23 0 ; COLO C24 0 $ SIR cuts
  GRP  -  OFF QUAD,BOUN,SPRI
  $ GRP  ...    $ group selection see  block center1
  BOX xmin ymin zmin  xmax ymax zmax $ BOX  if wanted
  CTRL MEAS 2D
  let#schr 0.35 ; SCHH H6 #schr $ Text height
  $ Common scaling factors für:
  let#fact_U        50 $ Enlarge factor displacements
  let#beam_MY    50000 $ scaling bending moments beams
  let#beam_N     50000 $   " normal forces    on beams
  let#beam_sig   10.00 $   " stresses         on beams N/mm2
  and 1 msca no      $ centers all pictures to system limits
  SCHH REVI 0        $ no overwriting of result text
  CTRL EMPT YES    $ if BEMESS errors - plot other values
#enddef
#include WINGDATA
  MOVE X DEL DTYP TEXT ; MOVE X 1 74 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Necessary reinforcement after ULS Design
LC DESI    1 $ reininforcement distribution no.
BEAM  AS  UNIT - SCHH #schr
MOVE X DEL DTYP TEXT
BEAM  AS1 UNIT - SCHH #schr
BEAM  AS2 UNIT - SCHH #schr
  SIZE spli 2x1
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT stirrups: on box girder sections ASS counts per side!
BEAM  ASU UNIT - SCHH #schr
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi03
HEAD Check of minimum reinforcement and crack width
$ Result-control: necessary reinforcement in following plot
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ $ ECHO LC,STRE,NSTR,USEP YES $ activate for long print out
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXF MY TITL frequent_Pk_inf+ LCST 9395 LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MY TITL frequent_Pk_inf- LCST 9396 LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF  N TITL frequent_Pk_inf+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF  N TITL frequent_Pk_inf- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF MZ TITL frequent_Pk_inf+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MZ TITL frequent_Pk_inf- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF MY TITL frequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MY TITL frequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF  N TITL frequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF  N TITL frequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF MZ TITL frequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MZ TITL frequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 9397 TITL frequent_Pk_inf+
$ COMB GMIN LCST 9398 TITL frequent_Pk_inf- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
STRE E RL $ Mindestbewehrung für Einheitsrissmoment
       $ Ist nur erforderlich falls unter seltener Einwirkung
       $ weniger als -1.0 N/mm2 Druckspannung verbleibt.
       $ Im Span-Ausdruck zu finden unter sig-t kleiner 1.00
$ Following STRE lines can be activated for a check
      $ of main tensile stress due to shear:
      $ ARS 12/2003 - ECHO SPAN FULL gives further results
$ STRE   12 SI   4.56147 $ fctk - main tensile stress due to shear
$ STRE   13 SI   4.56147 $ fctk - main tensile stress due to shear
NSTR S0 CW 0.20 $ crack width design
$ A check for reinforcement bar distances is not included
$ You can either define a minimum reinforcement,
$ calculate the steel stress and compare with the
$ allowable value.
$ Or make a design with ULTI  SC1 1 1 1 1 S1 1.2 S2 1.2
$ with a max. steel stress e.g. - 1.2*200000 = 240 N/mm2.
$ [for allowable stress 240 N/mm2 from table bar distance.
$
$ *************************************************************
$ A robustnes reinforcement acc. DIN 1045-1 (07.01) 13.1.1 (1)
$ can be choosen with:
$ lf Typ (P) $ Lastfälle des GZG Quasi-ständig
$ COMB MAMI MY LC1 (P) F1 0.01 LC2 MCR $ Min.crack moment fctm
$ desi ulti $ ^F1 0.01 to get a design with crack moment only
END
$
PROG WING urs:wing0001
HEAD Reinforcement after min-bew +crack design
#include WINGDATA
  MOVE X DEL DTYP TEXT ; MOVE X 1 74 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Reinforcement after min-bew +crack design
LC DESI    1 $ reininforcement distribution no.
BEAM  AS  UNIT - SCHH #schr
MOVE X DEL DTYP TEXT
BEAM  AS1 UNIT - SCHH #schr
BEAM  AS2 UNIT - SCHH #schr
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi04
HEAD Check nonfrequent concrete stess < 0.6 fck
$ Result-control: utilisation factor sig-comp in the longer
$              output and following plot of concrete stress.
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ $ ECHO LC,STRE,NSTR,USEP YES $ activate for long print out
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXN MY TITL nonfrequent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MY TITL nonfrequent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN  N TITL nonfrequent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN  N TITL nonfrequent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MZ TITL nonfrequent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MZ TITL nonfrequent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MY TITL    traffic_opening+ LCST 1205 LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MY TITL    traffic_opening- LCST 1206 LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN  N TITL    traffic_opening+ LCST    - LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN  N TITL    traffic_opening- LCST    - LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MZ TITL    traffic_opening+ LCST    - LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MZ TITL    traffic_opening- LCST    - LC1 G LC2 C_1 LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 1207 TITL    traffic_opening+
$ COMB GMIN LCST 1208 TITL    traffic_opening- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
NSTR CHKC -0.6 $ check concrete stress nonlinear <0.6 fck
END
$
PROG WING urs:wing0003
HEAD Nonlinear concrete stess - nonfrequent
#include WINGDATA
SIZE spli 2x1
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Nonlinear concrete stess - nonfrequent [0.6fck=0.6* 40.0 = 24.0  N/mm2]
LC DESI 1207 MAT  12 ; BEAM SIGD UNIT #beam_sig #schr
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Nonlinear concrete stess - nonfrequent [0.6fck=0.6* 40.0 = 24.0  N/mm2]
LC DESI 1207 MAT  13 ; BEAM SIGD UNIT #beam_sig #schr
END
$
PROG WING urs:wing0004
HEAD Reinforcement steel stress [0.75fyk=0.75* 500. = 375.  N/mm2]
#include WINGDATA
SIZE spli 2x1
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Reinforcement steel stress [0.75fyk=0.75* 500. = 375.  N/mm2]
LC DESI 1207 ; BEAM SZRF UNIT 200 #schr
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi05
HEAD Check permanent concrete stess < 0.45 fck
HEAD Check permanent tendon stress < 0.65 fpk
$ Result-control: utilisation factors compression and
$              tendon stress in the longer output
$              and following plot of stresses.
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ ECHO LC,STRE YES $ activate for long print out
$ ECHO COMB EXTR $ prints LC combination factors
$ ECHO TABS 2 $ 1+2 = print all tendons separately
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL permanent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL permanent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP  N TITL permanent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP  N TITL permanent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MZ TITL permanent_Pm_1.0+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MZ TITL permanent_Pm_1.0- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL traffic_opening+ LCST 1400 LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL traffic_opening- LCST 1401 LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP  N TITL traffic_opening+ LCST    - LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP  N TITL traffic_opening- LCST    - LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MZ TITL traffic_opening+ LCST    - LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MZ TITL traffic_opening- LCST    - LC1 G LC2 C_1 LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 1402 TITL traffic_opening+
$ COMB GMIN LCST 1403 TITL traffic_opening- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
  let#fck    40.0 ; STRE   12 SBBC 0.45*#fck $ MNO   12
  let#fck    40.0 ; STRE   13 SBBC 0.45*#fck $ MNO   13
STRE E BH $ check with these stress limits
END
$
PROG WING urs:wing0002
HEAD Permanent concrete stess
#include WINGDATA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Permanent concrete stess on top uniaxial
LC DESI 1400 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 1401 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom mno 12 [0.45fck=0.45* 40.0 = 18.0  N/mm2]
LC DESI 1400 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 1401 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
$ Please take into account allowance for
$ nonlinear temperature gradient stresses!
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Maximum value biaxial
LC DESI 1402 MAT  12 ; BEAM SIGD UNIT #beam_sig #schr
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Permanent concrete stess on top uniaxial
LC DESI 1400 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 1401 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom mno 13 [0.45fck=0.45* 40.0 = 18.0  N/mm2]
LC DESI 1400 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 1401 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
$ Please take into account allowance for
$ nonlinear temperature gradient stresses!
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Maximum value biaxial
LC DESI 1402 MAT  13 ; BEAM SIGD UNIT #beam_sig #schr
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi06
HEAD Check nonfrequent reinforcement stress < 0.8 fyk
$ Result-control: utilisation factors sig-tens of materialno.
$              reinforcement in the longer output
$              and following plot of stresses.
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ $ ECHO LC,STRE,NSTR,USEP YES $ activate for long print out
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXN MY TITL nonfrequent_Pk_inf+ LCST 9295 LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MY TITL nonfrequent_Pk_inf- LCST 9296 LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN  N TITL nonfrequent_Pk_inf+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN  N TITL nonfrequent_Pk_inf- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MZ TITL nonfrequent_Pk_inf+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MZ TITL nonfrequent_Pk_inf- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MY TITL nonfrequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MY TITL nonfrequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN  N TITL nonfrequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN  N TITL nonfrequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXN MZ TITL nonfrequent_Pk_sub+ LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINN MZ TITL nonfrequent_Pk_sub- LCST    - LC1 G LC2   C LC3 Y_2 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 9297 TITL nonfrequent_Pk_inf+
$ COMB GMIN LCST 9298 TITL nonfrequent_Pk_inf- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
NSTR CHKS 0.80 $ = steel stress < 0.80 fyk
END
$
PROG WING urs:wing0004
HEAD Nonfrequent reinforcement stress [0.8fyk=0.8* 500. = 400.  N/mm2]
#include WINGDATA
SIZE spli 2x1
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Nonfrequent reinforcement stress [0.8fyk=0.8* 500. = 400.  N/mm2]
LC DESI 9297 ; BEAM SZRF UNIT 200 #schr
END
$
-sys rem ********************************************
$ *************************************************************
-PROG AQB
HEAD Check decompression Pk,inf permanent
$ Result-control: checked values line decompression + tension
$              and following plot.
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ ECHO LC,STRE YES $ activate for long print out
$ ECHO COMB EXTR $ prints LC combination factors
$ ECHO TABS 2 $ 1+2 = print all tendons separately
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL decompression+ LCST 9490 LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL decompression- LCST 9491 LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP  N TITL decompression+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP  N TITL decompression- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MZ TITL decompression+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MZ TITL decompression- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MY TITL decompres_sub+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MY TITL decompres_sub- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP  N TITL decompres_sub+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP  N TITL decompres_sub- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXP MZ TITL decompres_sub+ LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINP MZ TITL decompres_sub- LCST    - LC1 G LC2   C LC3 Y_4 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 9492 TITL decompression+
$ COMB GMIN LCST 9493 TITL decompression- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
STRE E VH  $ Check decompression or tensile stress
END
$
-PROG WING urs:wing0002
HEAD Max. min stresses Pk,inf decompression permanent
#include WINGDATA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Max. min stresses Pk,inf decompression permanent on top uniaxial
LC DESI 9490 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 9491 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom material no 12
LC DESI 9490 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 9491 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Decompression check value
LC DESI 9492 MAT  12 ; BEAM DECO UNIT #beam_sig #schr
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Max. tensile stress biaxial
LC DESI 9492 MAT  12 ; BEAM SIGZ UNIT #beam_sig #schr
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Max. min stresses Pk,inf decompression permanent on top uniaxial
LC DESI 9490 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 9491 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom material no 13
LC DESI 9490 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 9491 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Decompression check value
LC DESI 9492 MAT  13 ; BEAM DECO UNIT #beam_sig #schr
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Max. tensile stress biaxial
LC DESI 9492 MAT  13 ; BEAM SIGZ UNIT #beam_sig #schr
END
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi08
HEAD welded connections and tendon couplings
HEAD Fatigue simplified (Limitation of stresses)
$ simplified check acc. german DIN 1045 10.8.4 load model 1:
$    stresses frequent combination and 75% prestress
$ Result-control: plot concrete stresses top+bottom:
$    are critical points [tendon couplings] under compression?
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ ECHO LC,STRE YES $ activate for long print out
$ ECHO COMB EXTR $ prints LC combination factors
$ ECHO TABS 2 $ 1+2 = print all tendons separately
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXF MY TITL Fat_freq__Pm_0.75+ LCST 9370 LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MY TITL Fat_freq__Pm_0.75- LCST 9371 LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF  N TITL Fat_freq__Pm_0.75+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF  N TITL Fat_freq__Pm_0.75- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF MZ TITL Fat_freq__Pm_0.75+ LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MZ TITL Fat_freq__Pm_0.75- LCST    - LC1 G LC2   C LC3 Y_3 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 9372 TITL Fat_freq__Pm_0.75+
$ COMB GMIN LCST 9373 TITL Fat_freq__Pm_0.75- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
STRE E VH  $ Check decompression
END
$
PROG WING urs:wing0002
HEAD Fatigue welded connect. + couplings 0.75p
#include WINGDATA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Fatigue welded connect. + couplings 0.75p on top uniaxial
LC DESI 9370 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 9371 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom material no 12
LC DESI 9370 MAT  12 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 9371 MAT  12 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Fatigue welded connect. + couplings 0.75p on top uniaxial
LC DESI 9370 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGU UNIT #beam_sig #schr ; and ; LC DESI 9371 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGU UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT bottom material no 13
LC DESI 9370 MAT  13 ; SCH2 MIN1 0 MAX1 999999 ; BEAM SIGL UNIT #beam_sig #schr ; and ; LC DESI 9371 MAT  13 ; SCH2 MIN1 -999999 MAX1 0 ; BEAM SIGL UNIT #beam_sig #schr ; SCH2 MIN1 DEFA MAX1 DEFA
END
PROG AQUP -E urs:csmaqup2
HEAD Plot to check if tendon coupling lies in tension zone
LET#LF   9370
#include AQUP_1
LET#LF   9371
#include AQUP_1
-sys rem ********************************************
$
$ *************************************************************
PROG AQB urs:desi09
HEAD Fatigue reinforcement stress range <70 MPa
$ simplified check acc. german DIN 1045 10.8.4:
$    with load model 1 without temperature and settlement.
$ Result-control: plot reinforcement stress range <70 MPa
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO DESI,USEP YES
$ ECHO LC,STRE YES $ activate for long print out
$ ECHO COMB EXTR $ prints LC combination factors
$ ECHO TABS 2 $ 1+2 = print all tendons separately
BEAM CS0   1 CS1   2
#include loadca_aqb
REIN LCR    1 RMOD ACCU $ if more reinforcement necessary, superpose
$ with presuperposed actions from MAXIMA
COMB MAXF MY TITL Fat_LM1_without_Temp..+ LCST 9925 LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MY TITL Fat_LM1_without_Temp..- LCST 9926 LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF  N TITL Fat_LM1_without_Temp..+ LCST    - LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF  N TITL Fat_LM1_without_Temp..- LCST    - LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXF MZ TITL Fat_LM1_without_Temp..+ LCST    - LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINF MZ TITL Fat_LM1_without_Temp..- LCST    - LC1 G LC2   C LC3 Y_G 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 9927 TITL Fat_LM1_without_Temp..+
$ COMB GMIN LCST 0928 TITL Fat_LM1_without_Temp..- $ please do not activate,
$      GMAX also produces maximum neg. concrete compression
NSTR FAT DINF SIGS 999 $ only check SIGS!
  $ 999, to avoid reinforcement increase!
  $ Output of checks with ECHO NSTR YES!
END
$
PROG WING urs:wing0004
HEAD Fatigue stress range LM1 simplified, target <70 MPa
#include WINGDATA
SIZE spli 2x1
  MOVE X DEL DTYP TEXT ; MOVE X 1 14 UNIT PR SCHH .5 C 1001 DTYP TEXT
TEXT Fatigue stress range LM1 simplified, target <70 MPa
LC DESI 9927 ; BEAM SWRF UNIT 50 #schr
END

+PROG AQB urs:9
HEAD SLS
$ Result-control: necessary reinforcement in following plot
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO comb,lc,rein,shea,DESI,USEP YES
echo stre no
$ $ ECHO LC,DESI YES $ activate for long print out



#define beam_aqbl
BEAM    CS0   1 CS1   2
#enddef

#include beam_aqbl

#include loadca_aqb
$REIN LCR    1 RMOD - $ stores the reinforcement for the first time
$ with presuperposed actions from MAXIMA
COMB MAXR MY TITL SLS_rare+ LCST 8101 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINR MY TITL SLS_rare- LCST 8102 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXR VZ TITL SLS_rare+ LCST 8103 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINR VZ TITL SLS_rare- LCST 8104 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXR MT TITL SLS_rare+ LCST 8105 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MINR MT TITL SLS_rare- LCST 8106 LC1 G LC2   C LC3 Y_1 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 8107
COMB GMIN LCST 8108 $ GMIN only for WINGRAF - min-MY
STRE C
$DESI STAT SERV $
END

+PROG AQB urs:18
HEAD ULS
$ Result-control: necessary reinforcement in following plot
ECHO FORC,STRE,NSTR,SECT,REIN,COMB,SHEA,LC,CRAC,DESI,USEP NO
ECHO comb,lc,rein,shea,DESI,USEP YES
echo stre no
$ $ ECHO LC,DESI YES $ activate for long print out

#include beam_aqbl

#include loadca_aqb

$REIN LCR    1 RMOD - $ stores the reinforcement for the first time
$ with presuperposed actions from MAXIMA
COMB MAXD MY TITL ULS_design+ LCST 8201 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MY TITL ULS_design- LCST 8202 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD VZ TITL ULS_design+ LCST 8203 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND VZ TITL ULS_design- LCST 8204 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
$ with presuperposed actions from MAXIMA
COMB MAXD MT TITL ULS_design+ LCST 8205 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB MIND MT TITL ULS_design- LCST 8206 LC1 G LC2   C LC3 Y_D 1.0 $ Y_ in MAXIMA presuperposed without gpc
COMB GMAX LCST 8207
COMB GMIN LCST 8208 $ GMIN only for WINGRAF - min-MY
STRE C
$DESI STAT SERV $
END