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 6686 for branches/UKMO/dev_5518_tide_analysis_restart/NEMOGCM/NEMO/OPA_SRC/DIA/diaharmana.F90 – NEMO

Ignore:
Timestamp:
2016-06-13T09:38:23+02:00 (8 years ago)
Author:
deazer
Message:

Added extra option to compute final harmonic analysis or not

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/dev_5518_tide_analysis_restart/NEMOGCM/NEMO/OPA_SRC/DIA/diaharmana.F90

    r6370 r6686  
    153153 
    154154 
    155  
     155      if(ln_harm_ana_compute) then 
     156               WRITE(numout,*) "Computing harmonics at last step" 
    156157! 
    157158        cosampu=0.0_wp 
    … …  
    227228! 
    228229        CALL harm_ana_out     ! output analysis (last time step) 
     230     ELSE ! ln_harmana_compute  
     231         WRITE(numout,*) "Skipping Computing harmonics at last step" 
     232     ENDIF 
    229233        
    230234    ENDIF 
Note: See TracChangeset for help on using the changeset viewer.