$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                      Converted STRUDL Model                         @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
$
$****************************************          Set Dimensions
$
&dimen -save -dimen Meters   M-Tons
$
$****************************************          Defaults
$
&LOCAL xfac = 1 yfac = 1 zfac = 1
&default -save
&default -fyield 248.04 -alpha 3.6111E-6 -spgravit 7.8492 -emodulus 1.9981E5 \ 
       -poi_ratio 0.3 -kfac 1 1 -cmfac 0.85 0.85 -flood no -use @
$
$****************************************          Macros
$
use_mac strudl.mac
$
$****************************************          doload?
$
&if .not. &v_exist(doload) &then
   &local doload = .true.
&endif
$
$****************************************          flood?
$
&if .not. &v_exist(flood) &then
   &local flood = yes
&endif
$
$****************************************          Strudl Axis
$
&default -stgaxis 0 1 0 -1 0 0
$
$****************************************          plate local axes
$
&default -dir_pla nodes
$
$****************************************          load cat
$
&default -ext_cat load000
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                           Ignored Cards                             @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
$STRUDL
$TYPE SPACE FRAME
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                              Classes                                @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
~107701 PLATE 6
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                               Nodes                                 @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
*107101    194.299*%xfac     4.700*%yfac   112.370*%zfac
*107102    202.299*%xfac     4.700*%yfac   112.370*%zfac
*107105    194.299*%xfac    10.900*%yfac   112.370*%zfac
*107106    202.299*%xfac    10.900*%yfac   112.370*%zfac
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                             Elements                                @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
PLATE 107701 ~107701 *107105 *107106 *107102 *107101
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                           Loads Factors                             @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
&local wt_air  = .false.
&local smargin = 1.
&local use_comments = .true.
&local load000 = &number(real 1.00/%smargin)
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@                                                                     @
$@                               Loads                                 @
$@                                                                     @
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
&if %doload &then
&endif
$
$****************************************          Finish Up
$
&dimen -remember
&default -remember