source: lmdz_wrf/trunk/WRFV3/frame/wrf_shutdown.F @ 1414

Last change on this file since 1414 was 1, checked in by lfita, 10 years ago
  • -- --- Opening of the WRF+LMDZ coupling repository --- -- -

WRF: version v3.3
LMDZ: version v1818

More details in:

File size: 260 bytes
Line 
1!WRF:DRIVER_LAYER:UTIL
2!
3SUBROUTINE wrf_shutdown
4#ifdef DM_PARALLEL
5    LOGICAL wrf_dm_on_monitor
6    EXTERNAL wrf_dm_on_monitor
7    EXTERNAL wrf_dm_shutdown
8#endif
9#ifdef DM_PARALLEL
10    CALL wrf_dm_shutdown
11#else
12    STOP
13#endif
14END SUBROUTINE wrf_shutdown
15
Note: See TracBrowser for help on using the repository browser.