Ignore:
Timestamp:
2017-12-18T17:33:07+01:00 (3 years ago)
Author:
nicolasmartin
Message:

Fix longer lines so should be harmless (passed SETTE compilations)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/LIM_SRC_3/icethd_zdf.F90

    r9019 r9119  
    119119      ENDIF 
    120120      ! 
    121       IF ( ( ln_cndi_U64 .AND. ln_cndi_P07 ) .OR. ( .NOT.ln_cndi_U64 .AND. .NOT.ln_cndi_P07 ) ) THEN 
    122          CALL ctl_stop( 'ice_thd_zdf_init: choose one and only one formulation for thermal conduction (ln_cndi_U64 or ln_cndi_P07)' ) 
     121      IF ( ( ln_cndi_U64 .AND. ln_cndi_P07 ) .OR. ( .NOT. ln_cndi_U64 .AND. .NOT. ln_cndi_P07 ) ) THEN 
     122         CALL ctl_stop( 'ice_thd_zdf_init: choose 1 and only 1 formulation for thermal conduction (ln_cndi_U64 or ln_cndi_P07)' ) 
    123123      ENDIF 
    124124      !                             !== set the choice of ice vertical thermodynamic formulation ==! 
Note: See TracChangeset for help on using the changeset viewer.