source: trunk/WRF.COMMON/WRFV3/share/solve_em.int @ 3567

Last change on this file since 3567 was 2759, checked in by aslmd, 2 years ago

adding unmodified code from WRFV3.0.1.1, expurged from useless data +1M size

File size: 381 bytes
RevLine 
[2759]1SUBROUTINE solve_em      ( grid , config_flags     &
2!
3#include <dummy_new_args.inc>
4!
5                 )
6
7   USE module_domain
8   USE module_configure
9   USE module_driver_constants
10
11   !  Input data.
12   TYPE(domain) , INTENT(INOUT)                  :: grid
13   TYPE (grid_config_rec_type) , INTENT(IN)      :: config_flags
14
15#include <dummy_new_decl.inc>
16
17END SUBROUTINE solve_em
18
Note: See TracBrowser for help on using the repository browser.