$
$*********************************************      basics
$
&dimen -dimen feet kips
$
$*********************************************      read model
$
inmodel
&apply -load @ 100 -force @ 100
struct
    lcase -dead load 0 0 1
    ssolve -nonl
end
strpost
   joint
   rest -detail
   beam load  -detail
   bmo tube|001 tube|002 tube|003 tube|006 tube|005 tube|004
      view -hard -s @ -heading 'Moments and Shears'
      end
   bmo *1 *1m *1mm *2 *2mm *2m *3
      view -hard -s @ -heading 'Moments and Shears'
      end
   bmo &n_2node(*1  *3)
      view -hard -s @ -heading 'Moments and Shears'
      end
end
$
$*********************************************      all done
$
&fini
