out of bound in dtadyn.F90

[mathiot]

Context

SETTE tests on the trunk failed on UGA cluster. The failed occurs during the mid year merge.

Analysis

After running sette in debug mode, it appears there is an out of bound in dtadyn.F90. The use of jf_ubl and jf_vbl need to be protected by ln_trabbl.

Fix

src/OFF/dtadyn.F90

@@ -295 +295 @@
       CALL fld_fill( sf_dyn, slf_d, cn_dir, 'dta_dyn_init', 'Data in file', 'namdta_dyn' )
       sf_dyn(jf_uwd)%cltype = 'U'   ;   sf_dyn(jf_uwd)%zsgn = -1._wp  
       sf_dyn(jf_vwd)%cltype = 'V'   ;   sf_dyn(jf_vwd)%zsgn = -1._wp  
-      sf_dyn(jf_ubl)%cltype = 'U'   ;   sf_dyn(jf_ubl)%zsgn =  1._wp  
-      sf_dyn(jf_vbl)%cltype = 'V'   ;   sf_dyn(jf_vbl)%zsgn =  1._wp  
       !
+      IF( ln_trabbl ) THEN
+         sf_dyn(jf_ubl)%cltype = 'U'   ;   sf_dyn(jf_ubl)%zsgn =  1._wp  
+         sf_dyn(jf_vbl)%cltype = 'V'   ;   sf_dyn(jf_vbl)%zsgn =  1._wp  
+      END IF
+      !
       ! Open file for each variable to get his number of dimension
       DO ifpr = 1, jfld
          CALL fld_def( sf_dyn(ifpr) )

How to avoid

• short term: for every important merge: run sette with debug mode few time step
• long term: fix sette to do it automatically

[mathiot]

In 13377:

Error: Failed to load processor CommitTicketReference

No macro or processor named 'CommitTicketReference' found