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 7657 for branches/UKMO/dev_r5518_pcbias_ipc/NEMOGCM/NEMO/OPA_SRC/ASM/bias.F90 – NEMO

Ignore:
Timestamp:
2017-02-08T16:04:04+01:00 (7 years ago)
Author:
isabella
Message:

adding more output messages

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_pcbias_ipc/NEMOGCM/NEMO/OPA_SRC/ASM/bias.F90

    r7656 r7657  
    395395         tbias_i(:,:,:) = 0.0_wp 
    396396         sbias_i(:,:,:) = 0.0_wp 
     397         IF(lwp) WRITE(numout,*) 'gru_pc and grv_pc are set to zero ' 
    397398         gru_pc(:,:)    = 0.0_wp 
    398399         grv_pc(:,:)    = 0.0_wp 
     
    548549 
    549550      IF ( ln_incpc) THEN 
    550        ! not sure if this should be a special case of nn_lat_ramp == 2 
     551       ! not sure if this should be a special case of nn_lat_ramp == 1 
    551552         minlat_bias = 3.0_wp 
    552553         maxlat_bias = 8.0_wp   
     
    814815                   ENDDO 
    815816               ENDIF 
    816  
    817  
    818  
    819817 
    820818            ENDIF 
Note: See TracChangeset for help on using the changeset viewer.