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 2843 for branches/2011/dev_r2802_MERCATOR9_floats/NEMOGCM/NEMO/OPA_SRC/FLO/floats.F90 – NEMO

Ignore:
Timestamp:
2011-09-19T18:32:43+02:00 (13 years ago)
Author:
cbricaud
Message:

comestic changes for flodom.F90, add call to flo_rst in floats.F90, minor correction in flo_rst

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2011/dev_r2802_MERCATOR9_floats/NEMOGCM/NEMO/OPA_SRC/FLO/floats.F90

    r2841 r2843  
    5757      IF( lk_mpp )   CALL mppsync   ! synchronization of all the processor 
    5858      ! 
    59       CALL flo_wri( kt )      ! trajectories file  
     59      CALL flo_wri( kt )      ! trajectories ouput  
     60      ! 
     61      CALL flo_rst( kt )      ! trajectories restart 
    6062      ! 
    6163      wb(:,:,:) = wn(:,:,:)         ! Save the old vertical velocity field 
Note: See TracChangeset for help on using the changeset viewer.