Changeset 11409


Ignore:
Timestamp:
2019-08-06T16:41:22+02:00 (14 months ago)
Author:
dancopsey
Message:

Fix compile errors.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/UKMO/NEMO_4.0_fix_cpl_oce_only/src/OCE/SBC/sbccpl.F90

    r11408 r11409  
    17121712      ENDIF 
    17131713 
    1714       IF ( TRIM( sn_rcv_emp%cldes == 'conservative' ) THEN 
     1714      IF ( TRIM( sn_rcv_emp%cldes ) == 'conservative' ) THEN 
    17151715         ! For conservative case zemp_ice has not been defined yet. Do it now. 
    1716          zemp_ice(:,:) = zevap_ice_total(:,:) - frcv(jpr_snow)%z3(:,:,1) ) * picefr(:,:) 
     1716         zemp_ice(:,:) = zevap_ice_total(:,:) - frcv(jpr_snow)%z3(:,:,1) * picefr(:,:) 
    17171717      END IF 
    17181718 
Note: See TracChangeset for help on using the changeset viewer.