!WRF:DRIVER_LAYER:UTIL
!

SUBROUTINE wrf_shutdown 3,1
#ifdef DM_PARALLEL
    LOGICAL wrf_dm_on_monitor
    EXTERNAL wrf_dm_on_monitor
    EXTERNAL wrf_dm_shutdown
#endif
#ifdef DM_PARALLEL
    CALL wrf_dm_shutdown
#else
#endif
END SUBROUTINE wrf_shutdown