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 14137 for NEMO/trunk/src/SWE/stprk3.F90 – NEMO

Ignore:
Timestamp:
2020-12-09T10:55:03+01:00 (4 years ago)
Author:
techene
Message:

#2385 : swe is now working (SWE/restart.F90 and SWE/stpctl.F90 moved as subroutines of OCE/IOM/restart.F90 and OCE/stpctl.F90)

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/trunk/src/SWE/stprk3.F90

    r14053 r14137  
    355355      ! Control 
    356356      !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 
    357                          CALL stp_ctl      ( kstp, Nnn ) 
     357                         CALL stp_ctl_SWE  ( kstp, Nnn ) 
    358358 
    359359      IF( kstp == nit000 ) THEN                          ! 1st time step only 
Note: See TracChangeset for help on using the changeset viewer.