[cig-commits] [commit] devel: Adds routine for SEP model in case of no MPI (269e53e)

[cig_noreply at geodynamics.org]

Repository : https://github.com/geodynamics/specfem3d

On branch  : devel
Link       : https://github.com/geodynamics/specfem3d/compare/9473eea83e6cad4b6bd8adbaee3e9c074ce3b975...95b31791a026eedc69a0970b245c691394cfbc71

>---------------------------------------------------------------

commit 269e53ea8accd72d8212191524a934911b3ab5c1
Author: Matthieu Lefebvre <ml15 at princeton.edu>
Date:   Thu Oct 2 15:50:25 2014 -0400

    Adds routine for SEP model in case of no MPI


>---------------------------------------------------------------

269e53ea8accd72d8212191524a934911b3ab5c1
 src/generate_databases/model_sep_nompi.f90 |  9 +++++++++
 src/generate_databases/rules.mk            | 24 +++++++++++++++++++++---
 2 files changed, 30 insertions(+), 3 deletions(-)

diff --git a/src/generate_databases/model_sep_nompi.f90 b/src/generate_databases/model_sep_nompi.f90
new file mode 100644
index 0000000..9c46a70
--- /dev/null
+++ b/src/generate_databases/model_sep_nompi.f90
@@ -0,0 +1,9 @@
+module model_sep_mod
+
+contains
+  
+subroutine model_sep()
+  stop "Using SEP models requires MPI."
+end subroutine model_sep
+
+end module model_sep_mod
diff --git a/src/generate_databases/rules.mk b/src/generate_databases/rules.mk
index 65e0402..e72d791 100644
--- a/src/generate_databases/rules.mk
+++ b/src/generate_databases/rules.mk
@@ -63,7 +63,6 @@ generate_databases_OBJECTS = \
 	$O/model_ipati.gen.o \
 	$O/parse_sep.genc.o \
 	$O/model_gll.gen.o \
-	$O/model_sep.gen.o \
 	$O/model_salton_trough.gen.o \
 	$O/model_tomography.gen.o \
 	$O/pml_set_local_dampingcoeff.gen.o \
@@ -120,6 +119,15 @@ generate_databases_SHARED_OBJECTS = \
 	$O/write_VTK_data.shared.o \
 	$(EMPTY_MACRO)
 
+# MPI stuffs
+ifeq ($(MPI),no)
+mpi_generate_databases_OBJECTS= \
+	$O/model_sep_nompi.gen.o
+else
+mpi_generate_databases_OBJECTS= \
+	$O/model_sep.mpi_gen.o
+endif
+generate_databases_OBJECTS += $(mpi_generate_databases_OBJECTS)
 
 # using ADIOS files
 
@@ -190,7 +198,11 @@ $O/finalize_databases.gen.o: $O/generate_databases_par.gen.o
 $O/get_absorbing_boundary.gen.o: $O/generate_databases_par.gen.o
 $O/get_coupling_surfaces.gen.o: $O/generate_databases_par.gen.o
 $O/get_MPI.gen.o: $O/generate_databases_par.gen.o
-$O/get_model.gen.o: $O/model_sep.gen.o
+ifeq ($(MPI),no)
+$O/get_model.gen.o: $O/model_sep_nompi.gen.o
+else
+$O/get_model.gen.o: $O/model_sep.mpi_gen.o
+endif
 $O/memory_eval.gen.o: $O/generate_databases_par.gen.o
 $O/model_1d_cascadia.gen.o: $O/generate_databases_par.gen.o
 $O/model_1d_prem.gen.o: $O/generate_databases_par.gen.o
@@ -199,7 +211,9 @@ $O/model_default.gen.o: $O/generate_databases_par.gen.o
 $O/model_external_values.gen.o: $O/generate_databases_par.gen.o
 $O/model_gll.gen.o: $O/generate_databases_par.gen.o
 $O/model_ipati.gen.o: $O/generate_databases_par.gen.o
-$O/model_sep.gen.o: $O/generate_databases_par.gen.o
+ifeq ($(MPI),yes)
+$O/model_sep.mpi_gen.o: $O/generate_databases_par.gen.o
+endif
 $O/model_salton_trough.gen.o: $O/generate_databases_par.gen.o
 $O/pml_set_local_dampingcoeff.gen.o: $O/generate_databases_par.gen.o
 $O/read_partition_files.gen.o: $O/generate_databases_par.gen.o
@@ -240,8 +254,12 @@ $O/adios_helpers.shared_adios.o: \
 
 
 $O/%.gen.o: $S/%.f90 $O/constants_mod.shared_module.o
+	${FCCOMPILE_CHECK} ${FCFLAGS_f90} -c -o $@ $<
+
+$O/%.mpi_gen.o: $S/%.f90 $O/constants_mod.shared_module.o
 	${MPIFCCOMPILE_CHECK} ${FCFLAGS_f90} -c -o $@ $<
 
+
 $O/%.genc.o: $S/%.c
 	${CC} ${CFLAGS} -c -o $@ $<