Changeset 1542 for trunk/NEMO/TOP_SRC/TRP

Timestamp:

2009-07-27T13:57:49+02:00 (15 years ago)

Author:

cetlod

Message:

rename namelist variable lrsttr to ln_rsttr, see ticket:493

File:

• trunk/NEMO/TOP_SRC/TRP/trdmld_trc.F90 (modified) (3 diffs)

trunk/NEMO/TOP_SRC/TRP/trdmld_trc.F90

@@ -537 +537 @@
       !     1      2     3     4    =5 e.g.                          =10
       !
-      IF( ( kt >= 2 ).OR.( lrsttr ) ) THEN                        ! ???
+      IF( ( kt >= 2 ).OR.( ln_rsttr ) ) THEN                        ! ???
          !
          nmoymltrd = nmoymltrd + 1
@@ -1043 +1043 @@
       !     1      2     3     4    =5 e.g.                          =10
       !
-      IF( ( kt >= 2 ).OR.( lrsttr ) ) THEN
+      IF( ( kt >= 2 ).OR.( ln_rsttr ) ) THEN
          !
          nmoymltrdbio = nmoymltrdbio + 1
@@ -1345 +1345 @@
 #endif
 
-      IF( lrsttr .AND. ln_trdmld_trc_restart ) THEN
+      IF( ln_rsttr .AND. ln_trdmld_trc_restart ) THEN
          CALL trd_mld_trc_rst_read
       ELSE