! ============================================================
! M03 - Reto bimaterial
! Convierte solo la banda central en aluminio.
! No cambies la geometria ni resuelvas el modelo.
! ============================================================
/CLEAR,START
/FILNAME,m03_challenge,1
/TITLE,M03 - Reto bimaterial
/UNITS,SI

case_id=1
beam_l=1.0
beam_h=0.10
beam_b=0.05
mesh_h=0.025
young_steel=210E9
nu_steel=0.30
young_aluminum=70E9
nu_aluminum=0.33

/PREP7
ET,1,SOLID185
KEYOPT,1,2,0
MP,EX,1,young_steel
MP,PRXY,1,nu_steel
! TODO 1: define EX y PRXY del material 2.

TYPE,1
MAT,1
BLOCK,0,beam_l,0,beam_h,0,beam_b
ESIZE,mesh_h
VMESH,ALL

ESEL,S,CENT,X,0.4*beam_l,0.6*beam_l
CM,mid_elems,ELEM
*GET,n_mid_elems,ELEM,0,COUNT

! TODO 2: con la banda aun seleccionada, asigna MAT=2 mediante EMODIF.
! TODO 3: recupera el modelo y calcula n_elements, n_type1,
!         n_mat1 y n_mat2 mediante ESEL + *GET.
! TODO 4: genera m03_attribute_audit.csv con el mismo esquema
!         que 03_elements_materials.mac.
! Aprobara si:
! n_mat2=n_mid_elems
! n_mat1+n_mat2=n_elements
! n_mat1>0 y n_mat2>0
! n_type1=n_elements
! young_steel/young_aluminum=3

/COM,M03 CHALLENGE READY - inspect element attributes, not active pointers
FINISH