Ignore:
Timestamp:
2016-06-13T09:38:23+02:00 (5 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.