$
$
$*********************************************      set basics
$
&dimen -DIMEN FEET KIPS
&DEVICE -g_default device   -oecho no
&TITLE Test of "fixing" the load mapping of Panels
$
$*********************************************      read model
$
inmodel
&status map
medit
   map dfwt0001 :map
   m_pan_fix .5 .5
end
&export map
&status map
&status n_map
medit
   m_pan_fix .5 .5 -boundary
end
&status map
medit
   m_pan_fix 30 .5 -direct x -point *p@ -node no
end
&status map
$
$*********************************************      all done
$
&FINISH
