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 13524 for NEMO/branches/2020/dev_r12740_TOP-01_rlod_Antarctic_ice_Sheet_Fe_Source/src/OCE/nemogcm.F90 – NEMO

Ignore:
Timestamp:
2020-09-25T14:30:18+02:00 (4 years ago)
Author:
rlod
Message:

First step of nutrient sources from Antarctic Ice Sheet

File:
1 edited

Legend:

Unmodified
Added
Removed

  • NEMO/branches/2020/dev_r12740_TOP-01_rlod_Antarctic_ice_Sheet_Fe_Source/src/OCE/nemogcm.F90

    r12641 r13524  
    481481                           CALL dyn_spg_init         ! surface pressure gradient 
    482482 
     483      !                                      ! Icebergs 
     484                           CALL icb_init( rn_Dt, nit000)   ! initialise icebergs instance 
     485 
     486                                                ! ice shelf 
     487                           CALL isf_init( Nbb, Nnn, Naa ) 
     488 
    483489#if defined key_top 
    484490      !                                      ! Passive tracers 
    485491                           CALL     trc_init( Nbb, Nnn, Naa ) 
    486492#endif 
     493 
    487494      IF( l_ldfslp     )   CALL ldf_slp_init    ! slope of lateral mixing 
    488  
    489       !                                      ! Icebergs 
    490                            CALL icb_init( rn_Dt, nit000)   ! initialise icebergs instance 
    491  
    492                                                 ! ice shelf 
    493                            CALL isf_init( Nbb, Nnn, Naa ) 
    494495 
    495496      !                                      ! Misc. options 
Note: See TracChangeset for help on using the changeset viewer.