Variable "total2sws" is used before it is defined (PISCES)

[mathiot]

Context

By looking in detail the compilation report, the variable total2SWS in sed_chem_cst (sedchem.F90) is used before to be defined.

Analysis

For ji == 1, total2SWS is not initialised, then used first to compute zckf (and other stuff), zckf is used later on to compute akf3s, then free2SWS and then total2SWS. For ji > 1, total2SWS computed at ji-1 will be used to compute zckf.

   SUBROUTINE sed_chem_cst
      ...
      REAL(wp) ::   total2free, free2SWS, total2SWS, SWS2total
      ...
      ! CHEMICAL CONSTANTS - DEEP OCEAN
      ! -------------------------------
      DO ji = 1, jpoce
         ...
         ! K1, K2 OF CARBONIC ACID, KB OF BORIC ACID, KW (H2O) (LIT.?)
         zak1    = 10**(zck1) * total2SWS
         zak2    = 10**(zck2) * total2SWS
         zakb    = EXP( zckb ) * total2SWS
         ...
         zckf    = zckf * total2SWS
         ...
         akf3s(ji) = zckf * EXP( zbuf1 * zcpexp + zbuf2 * zcpexp2 )
         ...
         ! CONVERT FROM DIFFERENT PH SCALES
         total2free  = 1.0/(1.0 + zst/aks3s(ji))
         free2SWS    = 1. + zst/aks3s(ji) + zft/akf3s(ji)
         total2SWS   = total2free * free2SWS
         SWS2total   = 1.0 / total2SWS
         ...
      END DO

Fix

No idea

[cetlod]

In 10356:

Error: Failed to load processor CommitTicketReference

No macro or processor named 'CommitTicketReference' found