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 190 for trunk/NEMO/OPA_SRC/opa.F90 – NEMO

Ignore:
Timestamp:
2004-12-22T16:32:49+01:00 (19 years ago)
Author:
opalod
Message:

CT : BUGFIX131 : suppress the use of ln_diaptr in opa.F90 and set the default value of ln_diaptr to FALSE in diaptr.F90

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/opa.F90

    r145 r190  
    200200      CALL flx_fwb_init                     ! FreshWater Budget correction 
    201201 
    202       IF( ln_diaptr ) CALL dia_ptr_init     ! Poleward TRansports initialization 
     202      CALL dia_ptr_init                     ! Poleward TRansports initialization 
    203203 
    204204      !                                     ! =============== ! 
Note: See TracChangeset for help on using the changeset viewer.