! M05 - Punto de partida
/CLEAR,START
/FILNAME,m05_start,1
/UNITS,SI

beam_l=1.0
beam_h=0.10
beam_b=0.05
mesh_h=0.05
tip_force=-1000

! TODO 1: construye la malla estructurada heredada de M04.
! TODO 2: crea fixed_nodes y tip_nodes sin IDs.
! TODO 3: entra en /SOLU y aplica el empotramiento.
!   D fija grados de libertad (restricciones) en nodos seleccionados.
! TODO 4: reparte tip_force entre los nodos de la punta.
!   F aplica fuerzas nodales concentradas en la direccion indicada.
! TODO 5: usa DLIST, FLIST y una auditoria mediante *GET.
!   DLIST y FLIST documentan BC aplicadas como evidencia legible.
!   NDNEXT recorre nodos sin IDs; *GET lee D y F almacenados en la BD.
! No utilices ANTYPE, SOLVE, /POST1 ni FSUM.

FINISH