Changeset 3928 for LMDZ6/branches/IPSL-CM6A-MR/libf

Timestamp:

Jun 11, 2021, 4:05:15 PM (4 years ago)

Author:

musat

Message:

Change the number of cfsites from 120 to 122, adding the
St.Helen and EUREC4A's one
IM

File:

• LMDZ6/branches/IPSL-CM6A-MR/libf/phylmd/physiq_mod.F90 (modified) (1 diff)

LMDZ6/branches/IPSL-CM6A-MR/libf/phylmd/physiq_mod.F90

@@ -1114 +1114 @@
     INTEGER, SAVE :: nCFMIP
     !$OMP THREADPRIVATE(nCFMIP)
-    INTEGER, PARAMETER :: npCFMIP=120
+    INTEGER, PARAMETER :: npCFMIP=122
     INTEGER, ALLOCATABLE, SAVE :: tabCFMIP(:)
     REAL, ALLOCATABLE, SAVE :: lonCFMIP(:), latCFMIP(:)