Changes in src/timemanager_mpi.f90 [0f7835d:3b80e98] in flexpart.git

File:

• src/timemanager_mpi.f90 (modified) (1 diff)

src/timemanager_mpi.f90

@@ -275 +275 @@
     if (mp_measure_time.and..not.(lmpreader.and.lmp_use_reader)) call mpif_mtime('getfields',1)
 
+! For validation and tests: call the function below to set all fields to simple
+! homogeneous values
+!    if (mp_dev_mode) call set_fields_synthetic
+
+!*******************************************************************************
+
     if (lmpreader.and.nstop1.gt.1) stop 'NO METEO FIELDS AVAILABLE'