Changeset 1126

Timestamp:

2008-06-23T12:07:29+02:00 (16 years ago)

Author:

ctlod

Message:

trunk: change the name of a variable zntotime into totime which already exists, see ticket: #215

File:

• trunk/NEMO/OPA_SRC/BDY/bdydta.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/BDY/bdydta.F90

@@ -636 +636 @@
       REAL(wp) ::   dayfrac, zxy, zoffsett
       REAL(wp) ::   zoffsetu, zoffsetv
-      REAL(wp) ::   dayjul0, zdayjulini, zntotime
+      REAL(wp) ::   dayjul0, zdayjulini
       REAL(wp) ::   zinterval_s, zinterval_e                    ! First and last interval in time axis
       REAL(wp), DIMENSION(jpbtime)      ::   zstepr             ! REAL time array from data files
@@ -794 +794 @@
                END IF
 
-               IF ( zstepr(ntimes_bdy) + zinterval_e / 2.0 < zntotime ) THEN
+               IF ( zstepr(ntimes_bdy) + zinterval_e / 2.0 < totime ) THEN
                   IF(lwp) WRITE(numout,*) 'Last bdy time relative to nit000:', zstepr(ntimes_bdy)
                   IF(lwp) WRITE(numout,*) 'Interval between last two times: ', zinterval_e