mod_assemb_prep
!
/units,bin
!
et,1,shell63
!
k,,0,0
k,,10,0
k,,10,10
k,,0,10
!
create_area
!
k,,2,2
k,,7,2
k,,7,7
k,,2,7
!
create_area
!
k,,4,3
k,,6,3
k,,6,5
k,,4,5
!
create_area
!
aovlap,all
!
init_entity_num
!
view,'f'
!
lplot
!
!


*go,:skip3

asel,s,area,,3
msh_algorithm,1,0,,,,,1,,0.1,0.1

asel,s,area,,5
msh_algorithm,-1,0,,,,,1,,0.5,0.5

asel,s,area,,4
msh_algorithm,-1,0,,,,,1,,1.0,1.0


*go,:skip4

asel,s,area,,3
msh_algorithm,-1,1,,,,,1,,0.3,0.3

asel,s,area,,5
msh_algorithm,-1,1,,,,,1,,0.5,0.5

asel,s,area,,4
msh_algorithm,-1,1,,,,,1,,1.0,1.0


msh_algorithm,1,4,,,,,,1,0.1,0.1

:skip4


:skip3


!
!            (1)     (2)     (3)   (4)    (5)    (6)    (7)  (8)   (9)
! MSH_AREA, mstyp, mshdens, etpa, elmnl, elmxl, lszmsh, mat, real, ecs
!
!
!       *** (6) lszmsh = Options for line sizing and performing mesh operation:
!
!               When it is desired to resize the previously sized lines:
!
!         (default) 1 (or blank) = perform line sizing and mesh operation(s)
!                   2 = perform line sizing, DO NOT mesh
!
!               When it is desired to NOT resize the previously sized lines:
!
!                   -1 = perform line sizing and mesh operation(s)
!                   -2 = perform line sizing, DO NOT mesh
!
!                   3 = DO NOT perform line sizing, perform mesh operation
!

!*go,:skip2

asel,s,area,,3
msh_area,0,,1,0.1,0.1,-2

asel,s,area,,5
msh_area,0,,1,0.5,0.5,-2

asel,s,area,,4
msh_area,0,,1,1.0,1.0,-2

!:skip2




*go,:skip1

mat_select,'c17_4a','al6061a'
!
asel,s,loc,z,0
!
asel,r,loc,x,5,10
msh_standrd,3,1,,,1,2,0.5,,al6061a
!

:skip1