Changeset 173 for trunk/NEMO/LIM_SRC

Timestamp:

2004-11-05T14:59:16+01:00 (19 years ago)

Author:

opalod

Message:

CT : BUGFIX118 : remove the test on the restart_ice_in.nc file existence, it does not work when using key_mpp_mpi cpp key

File:

• trunk/NEMO/LIM_SRC/limrst.F90 (modified) (2 diffs)

trunk/NEMO/LIM_SRC/limrst.F90

@@ -182 +182 @@
          inumrst, it0, it1, itime, ibvar, ifice
       LOGICAL :: &
-         llbon, llog
+         llog
       REAL(wp),DIMENSION(jpi,jpj) :: &
          zlamt, zphit
@@ -196 +196 @@
          clvnames(60)       
 
-      !Read inumrst
-      INQUIRE ( FILE = ccfile , EXIST = llbon)
-      IF( .NOT. llbon ) THEN
-         IF(lwp)WRITE(numout,cform_err)
-         IF(lwp)WRITE(numout,*) 'lim_rst_read : ===>>>> : Le fichier restart ',ccfile,' n''existe pas'
-         nstop = nstop + 1
-      ENDIF
 
       !Initialisations