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 11692 for NEMO/branches/2019/dev_r11514_HPC-02_single-core-extrahalo/src/OCE/step.F90 – NEMO

Ignore:
Timestamp:
2019-10-12T16:08:18+02:00 (4 years ago)
Author:
francesca
Message:

Update branch to integrate the development starting from the current v4.01 ready trunk

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/dev_r11514_HPC-02_single-core-extrahalo/src/OCE/step.F90

    r11416 r11692  
    112112      IF( ln_tide    )   CALL sbc_tide( kstp )                   ! update tide potential 
    113113      IF( ln_apr_dyn )   CALL sbc_apr ( kstp )                   ! atmospheric pressure (NB: call before bdy_dta which needs ssh_ib)  
    114       IF( ln_bdy     )   CALL bdy_dta ( kstp, time_offset=+1 )   ! update dynamic & tracer data at open boundaries 
     114      IF( ln_bdy     )   CALL bdy_dta ( kstp, kt_offset = +1 )   ! update dynamic & tracer data at open boundaries 
    115115                         CALL sbc     ( kstp )                   ! Sea Boundary Condition (including sea-ice) 
    116116 
     
    203203      ! diagnostics and outputs 
    204204      !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 
    205       IF( lk_floats  )   CALL flo_stp ( kstp )        ! drifting Floats 
     205      IF( ln_floats  )   CALL flo_stp ( kstp )        ! drifting Floats 
    206206      IF( ln_diacfl  )   CALL dia_cfl ( kstp )        ! Courant number diagnostics 
    207207      IF( lk_diahth  )   CALL dia_hth ( kstp )        ! Thermocline depth (20 degres isotherm depth) 
    208       IF( lk_diadct  )   CALL dia_dct ( kstp )        ! Transports 
     208      IF( ln_diadct  )   CALL dia_dct ( kstp )        ! Transports 
    209209                         CALL dia_ar5 ( kstp )        ! ar5 diag 
    210       IF( lk_diaharm )   CALL dia_harm( kstp )        ! Tidal harmonic analysis 
     210      IF( ln_diaharm )   CALL dia_harm( kstp )        ! Tidal harmonic analysis 
    211211                         CALL dia_wri ( kstp )        ! ocean model: outputs 
    212212      ! 
Note: See TracChangeset for help on using the changeset viewer.