! ============================================================
! M07 - Punto de partida
! ============================================================
/CLEAR,START                        ! Convierte resultados en evidencia de validacion.
/FILNAME,m07_start,1
/UNITS,SI

beam_l=1.0
beam_h=0.10
beam_b=0.05
mesh_h=0.05
young=210E9
nu=0.30
tip_force=-1000

! TODO 1: reconstruye y resuelve el caso auditado de M06.
! TODO 2: comprueba que existe un set y activa SET,LAST.
!         /POST1 abre postprocesado; SET,LAST carga el ultimo resultado resuelto.
! TODO 3: calcula UY medio, minimo y maximo de tip_nodes.
!         *GET,NODE,...,U,Y extrae desplazamientos nodales del set activo.
! TODO 4: conserva el valor del nodo geometrico (L,0,0).
! TODO 5: calcula uy_ref mediante Euler-Bernoulli.
! TODO 6: extrae S,X superior e inferior en x=0.2*beam_l.
!         *GET,NODE,...,S,X lee tension normal en el sistema fijado por RSYS.
! TODO 7: revalida equilibrio de fuerza y momento.
! TODO 8: genera m07_validation_audit.csv.
! TODO 9 (opcional): PLDISP/PLNSOL/PLESOL documentan contornos; no sustituyen *GET.
!
! Referencias:
! uy_corner con KEYOPT(2)=3=-3.79470E-4 m
! uy_ref=-3.80952381E-4 m
! sigma_ref en x=0.2*L=9.60000E6 Pa

FINISH