New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 2395 for branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfgls.F90 – NEMO

Ignore:
Timestamp:
2010-11-16T06:15:18+01:00 (13 years ago)
Author:
rblod
Message:

Add dummy routine zdf_gls_init

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfgls.F90

    r2346 r2395  
    13271327      WRITE(*,*) 'zdf_gls: You should not have seen this print! error?', kt 
    13281328   END SUBROUTINE zdf_gls 
     1329   SUBROUTINE zdf_gls_init          ! Empty routine 
     1330   END SUBROUTINE zdf_gls_init 
    13291331   SUBROUTINE gls_rst( kt,cdrw )          ! Empty routine 
    13301332      INTEGER         , INTENT(in) ::   kt         ! ocean time-step 
Note: See TracChangeset for help on using the changeset viewer.