Use module COORDINATES in INTEGRALS.
This commit is contained in:
parent
7f38a53bb2
commit
9596b29671
@ -136,12 +136,12 @@ module integrals
|
||||
subroutine store_integrals()
|
||||
|
||||
use blocks , only : block_meta, block_data, list_data
|
||||
use config , only : ib, ie, jb, je, kb, ke
|
||||
use coordinates, only : ib, ie, jb, je, kb, ke
|
||||
use coordinates, only : advol
|
||||
use evolution, only : n, t, dt
|
||||
#ifdef FORCE
|
||||
use forcing , only : fcor, finp
|
||||
#endif /* FORCE */
|
||||
use coordinates, only : advol
|
||||
use mpitools , only : master
|
||||
#ifdef MPI
|
||||
use mpitools , only : reduce_sum_real_array
|
||||
|
@ -218,8 +218,8 @@ evolution.o : evolution.F90 blocks.o boundaries.o config.o coordinates.o \
|
||||
scheme.o variables.o
|
||||
forcing.o : forcing.F90 config.o constants.o coordinates.o mpitools.o \
|
||||
random.o variables.o
|
||||
integrals.o : integrals.F90 blocks.o config.o coordinates.o evolution.o \
|
||||
mpitools.o variables.o
|
||||
integrals.o : integrals.F90 blocks.o coordinates.o evolution.o mpitools.o \
|
||||
variables.o
|
||||
interpolations.o : interpolations.F90 blocks.o coordinates.o parameters.o \
|
||||
variables.o
|
||||
io.o : io.F90 blocks.o coordinates.o error.o evolution.o \
|
||||
|
Loading…
x
Reference in New Issue
Block a user