Ignore:
Timestamp:
Sep 11, 2024, 4:27:07 PM (9 days ago)
Author:
abarral
Message:

Replace REPROBUS CPP KEY by logical using handmade wonky wrapper

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Amaury_dev/libf/phylmd/cosp/mod_cosp_radar.F90

    r5158 r5185  
    144144
    145145      if ( &
    146          (gbx%surface_radar == 1 .and. hgt_descending) .or.  &
    147          (gbx%surface_radar == 0 .and. (.not. hgt_descending)) &
     146         (gbx%surface_radar == 1 .AND. hgt_descending) .or.  &
     147         (gbx%surface_radar == 0 .AND. (.not. hgt_descending)) &
    148148         ) &
    149149      then
Note: See TracChangeset for help on using the changeset viewer.