Ignore:
Timestamp:
Jul 10, 2020, 6:16:52 PM (4 years ago)
Author:
adurocher
Message:

Fixed compilation error without RRTM or without XIOS

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/Optimisation_LMDZ/libf/phylmd/iophy.F90

    r3752 r3755  
    10361036
    10371037  ELSE
     1038#ifdef CPP_XIOS
    10381039    IF (ok_all_xml) THEN
    10391040      !$omp barrier
    … …  
    10441045      IF(.not. is_active) RETURN
    10451046    ENDIF
     1047#endif
    10461048
    10471049    !Et sinon on.... écrit
    … …  
    12321234      CALL bcast_omp(swaerofree_diag)
    12331235  ELSE
     1236#ifdef CPP_XIOS
    12341237    IF (ok_all_xml) THEN
    12351238      !$omp barrier
    … …  
    12401243      IF(.not. is_active) RETURN
    12411244    ENDIF
     1245#endif
    12421246
    12431247    !Et sinon on.... écrit
Note: See TracChangeset for help on using the changeset viewer.