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 6140 for trunk/NEMOGCM/NEMO/OPA_SRC/FLO/florst.F90 – NEMO

Ignore:
Timestamp:
2015-12-21T12:35:23+01:00 (8 years ago)
Author:
timgraham
Message:

Merge of branches/2015/dev_merge_2015 back into trunk. Merge excludes NEMOGCM/TOOLS/OBSTOOLS/ for now due to issues with the change of file type. Will sort these manually with further commits.

Branch merged as follows:
In the working copy of branch ran:
svn merge svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/trunk@HEAD
Small conflicts due to bug fixes applied to trunk since the dev_merge_2015 was copied. Bug fixes were applied to the branch as well so these were easy to resolve.
Branch committed at this stage

In working copy run:
svn switch svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/trunk
to switch working copy

Run:
svn merge --reintegrate svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/branches/2015/dev_merge_2015
to merge the branch into the trunk and then commit - no conflicts at this stage.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/FLO/florst.F90

    r5836 r6140  
    2626   INTEGER, ALLOCATABLE, DIMENSION(:) :: iperproc   ! 1D workspace 
    2727 
    28    !! * Substitutions 
    29 #  include "domzgr_substitute.h90" 
    3028   !!---------------------------------------------------------------------- 
    3129   !! NEMO/OPA 3.2 , LODYC-IPSL  (2009) 
     
    5250      !! ** Purpose :   
    5351      !!              
    54       !!     
    5552      !!       
    5653      !! ** Method  :   The frequency of  ??? is nwritefl 
    5754      !!       
    5855      !!---------------------------------------------------------------------- 
    59       !! * Arguments 
    6056      INTEGER  :: kt                            ! time step 
    61  
    62       !! * Local declarations 
     57      ! 
    6358      CHARACTER (len=80)       :: clname             ! restart filename 
    6459      INTEGER                  :: ic , jc , jpn ,jfl ! temporary integer 
     
    125120            ENDIF 
    126121         ENDIF 
    127  
     122         ! 
    128123      ENDIF 
    129  
     124      ! 
    130125   END SUBROUTINE flo_rst 
    131  
    132126 
    133127#  else 
Note: See TracChangeset for help on using the changeset viewer.