Changeset 13479 for NEMO/releases/r4.0/r4.0-HEAD/src/NST/agrif_user.F90

Timestamp:

2020-09-16T18:56:46+02:00 (4 years ago)

Author:

clem

Message:

4.0-HEAD: update agrif routines so that it takes into account the pond lids (forgotten initially)

File:

• NEMO/releases/r4.0/r4.0-HEAD/src/NST/agrif_user.F90 (modified) (1 diff)

NEMO/releases/r4.0/r4.0-HEAD/src/NST/agrif_user.F90

@@ -519 +519 @@
    ind2 = 1 + nbghostcells
    ind3 = 2 + nbghostcells
-   CALL agrif_declare_variable((/2,2,0/),(/ind3,ind3,0/),(/'x','y','N'/),(/1,1,1/),(/nlci,nlcj,jpl*(8+nlay_s+nlay_i)/),tra_ice_id)
+   CALL agrif_declare_variable((/2,2,0/),(/ind3,ind3,0/),(/'x','y','N'/),(/1,1,1/),(/nlci,nlcj,jpl*(9+nlay_s+nlay_i)/),tra_ice_id)
    CALL agrif_declare_variable((/1,2/)  ,(/ind2,ind3/)  ,(/'x','y'/)    ,(/1,1/)  ,(/nlci,nlcj/)                      ,u_ice_id  )
    CALL agrif_declare_variable((/2,1/)  ,(/ind3,ind2/)  ,(/'x','y'/)    ,(/1,1/)  ,(/nlci,nlcj/)                      ,v_ice_id  )