Changeset 15023 for NEMO/trunk/tests/STATION_ASF/MY_SRC/nemogcm.F90

Timestamp:

2021-06-18T16:35:25+02:00 (3 years ago)

Author:

gsamson

Message:

merge ticket2680_C1D_PAPA branch back into the trunk; see ticket #2680 for details

File:

• NEMO/trunk/tests/STATION_ASF/MY_SRC/nemogcm.F90 (modified) (1 diff)

NEMO/trunk/tests/STATION_ASF/MY_SRC/nemogcm.F90

@@ -273 +273 @@
                            CALL     phy_cst         ! Physical constants
                            CALL     eos_init        ! Equation of state
-      IF( lk_c1d       )   CALL     c1d_init        ! 1D column configuration
+      IF( ln_c1d       )   CALL     c1d_init        ! 1D column configuration
                            CALL     dom_init( Nbb, Nnn, Naa ) ! Domain
       IF( sn_cfctl%l_prtctl )   &