DISPATCH
shared_mod.f90
1 !===============================================================================
2 !> This module is a placeholder for shared information, solving the problem of
3 !> making a piece of information available btw any two points in the code, without
4 !> having to worry about module dependency. Since this module does not depend
5 !> on anything else, we can put shared information here
6 !===============================================================================
7 MODULE shared_mod
8  implicit none
9  public
10  type, public:: shared_t
11  integer:: levelmin=99
12  integer:: levelmax=0
13  integer:: n_repeat(3) = 1
14  integer:: n_patch
15  integer:: n_initial = 0
16  integer:: n_add = 0
17  integer:: n_patch_total = 0
18  integer:: patch_n(3) = 0
19  real:: f_zoom(3)=1.0
20  end type
21  type(shared_t):: shared
22 END MODULE shared_mod
This module is a placeholder for shared information, solving the problem of making a piece of informa...
Definition: shared_mod.f90:7