!
!   TITLE:  ms_mesh_cut.mac
!
!   Read in Ansys DB file "mirror_support.db", mesh it and save it
!   as "ms_cut.db"
!
!   DEE 10/31/00
!

FINISH
/clear,start
resume,ms_cut,db
!
/prep7

et,3,solid92

! MSH_ALGORITHM, perflsz, perfmsh, mstyp, mshdens, elmszovr, atargov, etpa, etpv,
!
!                elmnl, elmxl, mtrl, rl, ecs, volsel, sprat, radrot, varcang
!                 (9)    (10)  (11) (12) (13)  (14)   (15)    (16)     (17)
!

! This finer mesh reduces stiffness by 3% and increases run time from
! 2 minutes to 24 minutes an prowler (Ultra 10).
! msh_algorithm,1,4,0,1,,,,3,.125,.250,1  

 msh_algorithm,1,4,0,1,,,,3,.25,.75,1

save,ms_cut_mesh,db