Ignore:
Timestamp:
Jul 19, 2024, 5:41:58 PM (4 months ago)
Author:
abarral
Message:

(lint) Fix obsolete boolean operators

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/printflag.F90

    r3317 r5082  
    3030    &  ************'
    3131  PRINT 100
    32   PRINT 10, iflag_cycle_diurne.GE.1, soil_model
     32  PRINT 10, iflag_cycle_diurne>=1, soil_model
    3333  PRINT 100
    3434
    … …  
    9797  END IF
    9898
    99   IF (cycle_diurn0 .AND. .NOT. (iflag_cycle_diurne.GE.1) .OR. .NOT. cycle_diurn0 .AND. &
    100       (iflag_cycle_diurne.GE.1) ) THEN
     99  IF (cycle_diurn0 .AND. .NOT. (iflag_cycle_diurne>=1) .OR. .NOT. cycle_diurn0 .AND. &
     100      (iflag_cycle_diurne>=1) ) THEN
    101101    PRINT 13, cycle_diurn0, iflag_cycle_diurne
    102102    PRINT 100
Note: See TracChangeset for help on using the changeset viewer.