$
$****************************************       
$
&device -pri device
&devi -fig_num yes 9
$
$****************************************       read model
$
inmodel
$
$****************************************       summary
$
&summ
    point  coor
    plate
end
$
$****************************************       pictures
$
&
&select :p -sel *qp@ *cp@
&channel gra -file mp.ans/plate_outline.ps
&title Plate Exterior Nodes
&picture top                -poin :p
&channel gra -file mp.ans/plate_subele.ps
&title Plate Subelements
&picture top   -type struct -poin :p
$
$****************************************       summary
$
&summ
    point  coor
    plate
end
$
$****************************************       all done 
$
&fini