$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
$
$        ----------    RESIZE SAMPLES    ------------
$
$    This set of commands will automatically resize the model to obtain
$ the minimum weight. It uses a macros which is defined in the file
$ rszmac.dat
$
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
$
$
$*********************************************      SET BASIC PARAMETERS
$
&dimen -DIMEN FEET KIPS
&TITLE AISC BEAM EXAMPLES 1 TO 3
$
$*********************************************      define macros
$
&MACRO str_basic
   LCASE  -static BASIC
   S_REST ~FIXED1 ~FIXED2
&ENDMACRO
&m_act str_basic lcase
$
$*********************************************      read model
$
INMODEL
$
$*********************************************      resize
$
&apply -force -percen #live 100
&env basic
&stat force
RESIZE UPDOWN 3 str_basic
$
$*********************************************      all done
$
&FINISH