25 |
use GLOBAL_MAX_mod |
use GLOBAL_MAX_mod |
26 |
use GLOBAL_SUM_mod |
use GLOBAL_SUM_mod |
27 |
use GRID_mod |
use GRID_mod |
|
use GW_mod |
|
28 |
use MPI_INFO_mod |
use MPI_INFO_mod |
29 |
use SOLVE_FOR_PRESSURE3D_mod |
use SOLVE_FOR_PRESSURE3D_mod |
30 |
use SOLVE_FOR_PRESSURE_mod |
use SOLVE_FOR_PRESSURE_mod |
42 |
!$TEMPLATE_PRAGMA_DECLARATIONS |
!$TEMPLATE_PRAGMA_DECLARATIONS |
43 |
|
|
44 |
integer :: cp_loop_variable_1,cp_loop_variable_2, |
integer :: cp_loop_variable_1,cp_loop_variable_2, |
45 |
+ cp_loop_variable_3,cp_loop_variable_4 |
+ cp_loop_variable_3,cp_loop_variable_4,cp_loop_variable_5 |
46 |
|
|
47 |
type(modeType) :: our_orig_mode |
type(modeType) :: our_orig_mode |
48 |
|
|