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 2676 for branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC – NEMO

Ignore:
Timestamp:
2011-03-09T13:00:11+01:00 (13 years ago)
Author:
rblod
Message:

Second set of change in OPA_SRC for compatibility with agrif

Location:
branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r2636 r2676  
    125125      IF( .NOT. ln_rnf ) THEN                      ! no specific treatment in vicinity of river mouths  
    126126         ln_rnf_mouth  = .false.                       
     127         IF( sbc_rnf_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_init : unable to allocate sbc_rnf arrays' ) 
    127128         nkrnf         = 0 
    128129         rnf     (:,:) = 0.e0 

  • branches/dev_r2586_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/SBC/sbcrnf.F90

    r2636 r2676  
    3131   PUBLIC   sbc_rnf       ! routine call in sbcmod module 
    3232   PUBLIC   sbc_rnf_div   ! routine called in sshwzv module 
     33   PUBLIC   sbc_rnf_alloc ! routine call in sbcmod module 
    3334 
    3435   !                                                     !!* namsbc_rnf namelist * 
Note: See TracChangeset for help on using the changeset viewer.