Changeset 2264


Ignore:
Timestamp:
2010-10-14T13:14:33+02:00 (10 years ago)
Author:
rblod
Message:

Fix issue with gls restart in a ugly wat, see ticket #735

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfgls.F90

    r2236 r2264  
    13371337      WRITE(*,*) 'zdf_gls: You should not have seen this print! error?', kt 
    13381338   END SUBROUTINE zdf_gls 
     1339   SUBROUTINE gls_rst( kt,cdrw )          ! Empty routine 
     1340      INTEGER         , INTENT(in) ::   kt         ! ocean time-step 
     1341      CHARACTER(len=*), INTENT(in) ::   cdrw       ! "READ"/"WRITE" flag 
     1342      WRITE(*,*) 'gls_Rst: You should not have seen this print! error?', kt, cdrw 
     1343   END SUBROUTINE gls_rst 
    13391344#endif 
    13401345 
Note: See TracChangeset for help on using the changeset viewer.