Philippe 15/01/2024: bugfix: anel_balancen.f90: wrong dimension for ZTRIGSY

src/MNH/anel_balancen.f90

@@ -217,7 +217,7 @@ ELSE
   ALLOCATE(ZBFY(IJY,IIY,SIZE(XRHODJ,3)))
 ENDIF
 ALLOCATE(ZTRIGSX(3*(NIMAX_ll+2*JPHEXT)))
-ALLOCATE(ZTRIGSY(3*(NIMAX_ll+2*JPHEXT)))
+ALLOCATE(ZTRIGSY(3*(NJMAX_ll+2*JPHEXT)))
 ALLOCATE(ZBFB(IIU_B,IJU_B,IKU))
 
 ALLOCATE(ZBF_SXP2_YP1_Z(IIU_SXP2_YP1_Z_ll,IJU_SXP2_YP1_Z_ll,IKU_SXP2_YP1_Z_ll))
@@ -236,7 +236,7 @@ ELSE
   CALL MNH_MEM_GET( ZBFY, IJY, IIY, IKU )
 END IF
 CALL MNH_MEM_GET( ZTRIGSX, 3*(NIMAX_ll+2*JPHEXT) )
-CALL MNH_MEM_GET( ZTRIGSY, 3*(NIMAX_ll+2*JPHEXT) )
+CALL MNH_MEM_GET( ZTRIGSY, 3*(NJMAX_ll+2*JPHEXT) )
 CALL MNH_MEM_GET( IIFAXX,  19 )
 CALL MNH_MEM_GET( IIFAXY,  19 )
 CALL MNH_MEM_GET( ZBFB,    IIU_B, IJU_B, IKU )