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 800 – NEMO

Changeset 800


Ignore:
Timestamp:
2008-01-17T11:22:33+01:00 (16 years ago)
Author:
rblod
Message:

Correct a mistake in jki routine suppression, see ticket #49

Location:
trunk/NEMO/OPA_SRC/DYN
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • trunk/NEMO/OPA_SRC/DYN/dynspg_exp.F90

    r789 r800  
    3333   !! * Accessibility 
    3434   PUBLIC dyn_spg_exp  ! routine called by step.F90 
     35   PUBLIC exp_rst      ! routine called by istate.F90 
    3536 
    3637   !! * Substitutions 

  • trunk/NEMO/OPA_SRC/DYN/dynspg_flt.F90

    r789 r800  
    5151 
    5252   PUBLIC dyn_spg_flt  ! routine called by step.F90 
     53   PUBLIC flt_rst      ! routine called by istate.F90 
    5354 
    5455   !! * Substitutions 

  • trunk/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r789 r800  
    4141 
    4242   PUBLIC dyn_spg_ts  ! routine called by step.F90 
     43   PUBLIC ts_rst      ! routine called by istate.F90 
    4344 
    4445   REAL(wp), DIMENSION(jpi,jpj) ::  ftnw, ftne,   &  ! triad of coriolis parameter 
Note: See TracChangeset for help on using the changeset viewer.