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 5779 for branches/NERC/dev_r5589_is_oce_cpl/NEMOGCM/NEMO/OPA_SRC/TRA/trasbc.F90 – NEMO

Ignore:
Timestamp:
2015-10-06T18:28:13+02:00 (9 years ago)
Author:
mathiot
Message:

ISF coupling branch: correct some compilation issues, remove code related to MISOMIP/ISOMIP+ and polishing

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5589_is_oce_cpl/NEMOGCM/NEMO/OPA_SRC/TRA/trasbc.F90

    r5619 r5779  
    2222   USE sbcrnf          ! River runoff   
    2323   USE sbcisf          ! Ice shelf    
    24    USE sbc_iscpl       ! Ice sheet coupling 
     24   USE iscplini       ! Ice sheet coupling 
    2525   USE traqsr          ! solar radiation penetration 
    2626   USE trd_oce         ! trends: ocean variables 
     
    291291      !---------------------------------------- 
    292292      ! 
    293       IF( ln_iscpl .AND. ln_hfb) THEN         ! input of heat and salt due to river runoff  
     293      IF( ln_iscpl .AND. ln_hsb) THEN         ! input of heat and salt due to river runoff  
    294294         DO jk = 1,jpk 
    295295            DO jj = 2, jpj  
Note: See TracChangeset for help on using the changeset viewer.