!   concat_map_mesh.mac
!
mod_assemb_prep
view,'f'
!
et,1,plane42
!
w=5
h=5
r=2
es=0.15
div=200
!
csys,0
!
k,,0,0,0
k,,w,0,0
k,,w,h,0
k,,0,h,0
!
create_area
!
create_circle,r
create_area-lines
!
asba,am-1,am,,delete,delete
init_entity_num
!
lccat,lm-8,lm-7
!
lesize,all,,,div
lesize,2,,,div/2
lesize,3,,,div/2
!
!                  (1)     (2)     (3)   (4)    (5)    (6)    (7)  (8)   (9)
!       MSH_AREA, mstyp, mshdens, etpa, elmnl, elmxl, lszmsh, mat, real, ecs
!
!msh_area,1,,1,es,es
!
msh_algorithm,0,1,1,,,,1    !,,es,es,
!
eplot