$
$*********************************************      basics
$
&set detail = -detail
&device  -limerr 0 -oecho no
&device -g_default device -oecho no
$
$*********************************************      read model
$
inmodel
&apply -load @ 100 -force @ 100
struct
   lc_doit load #load
   ssolve
end
strpost
   joint disp -node *@
   rest load
   beam loads stress -node *bp4  -detail
   plate %detail -node @
end
$
$*********************************************      all done
$
&fini
