Changeset 2177 for LMDZ5/trunk/libf


Ignore:
Timestamp:
Jan 8, 2015, 10:39:23 AM (10 years ago)
Author:
Laurent Fairhead
Message:

Modification pour retrouver l'exécution en OpenMP

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/pbl_surface_mod.F90

    r2159 r2177  
    10291029       IF (knon <= 0) THEN
    10301030         IF (prt_level >= 10) print *,' no grid point for nsrf= ',nsrf
    1031          cycle loop_nbsrf
     1031!         cycle loop_nbsrf
    10321032       ENDIF
    10331033!!!
Note: See TracChangeset for help on using the changeset viewer.