mod_assemb_prep
!
mod_coord_system,0,1,1,1,0,0,0
!
et,1,shell93
!
csys,cs1_
!
*do,i,0,270,90
    k,,2,i,0
*enddo
!
create_lines,1
!
k,,2,0,2
!
init_entity_num
!
lstr,km-4,km
!
init_entity_num
!
adrag,lm-4,lm-3,lm-2,lm-1,,,lm
!
nummrg,kp
!
init_entity_num
!
!
!
*do,i,0,270,90
    k,,2,i,-0.25
*enddo
!
create_lines,1
!
k,,2,0,2.25
!
init_entity_num
!
lstr,km-4,km
!
init_entity_num
!
adrag,lm-4,lm-3,lm-2,lm-1,,,lm
!
nummrg,kp
!
init_entity_num
!
lplot
!
!
asel,s,area,,am-7,am-4,1
!
msh_algorithm,1,1,1,,,,1,,0.1
!
asel,s,area,,am-3,am,1
!
msh_algorithm,1,1,1,,,,1,,0.15
!
!
asel,s,area,,am-7   !,am-4,1
cm,fred,area
!
asel,s,area,,am-3   !,am,1
cm,barney,area
!
init_entity_num
!
cpl_nodes,'fred','barney',cs1_,0.05,'ux'


nplot
!
/PSF,DEFA, ,1,0
/PBF,DEFA, ,1
/PSYMB,CS,1
/PSYMB,DOT,1
/PSYMB,PCONV,
/PBC,ALL, ,1
/REP