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 2409 for branches/nemo_v3_3_beta/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfgls.F90 – NEMO

Ignore:
Timestamp:
2010-11-19T16:30:38+01:00 (13 years ago)
Author:
cetlod
Message:

Finalize the new organisation of 1D vertical configuration, see ticket #760

File:
1 edited

Legend:

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

    r2397 r2409  
    12681268   LOGICAL, PUBLIC, PARAMETER ::   lk_zdfgls = .FALSE.   !: TKE flag 
    12691269CONTAINS 
     1270   SUBROUTINE zdf_gls_init           ! Empty routine 
     1271      WRITE(*,*) 'zdf_gls_init: You should not have seen this print! error?' 
     1272   END SUBROUTINE zdf_gls_init 
    12701273   SUBROUTINE zdf_gls( kt )          ! Empty routine 
    12711274      WRITE(*,*) 'zdf_gls: You should not have seen this print! error?', kt 
Note: See TracChangeset for help on using the changeset viewer.