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