[cig-commits] [commit] master: the user is not a baby (a1652d1)

cig_noreply at geodynamics.org cig_noreply at geodynamics.org
Thu Sep 25 08:36:53 PDT 2014


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

On branch  : master
Link       : https://github.com/geodynamics/axisem/compare/0361d515e30d54ee730bf7ad1f87a0913b030cd2...eecbb659d1eabb84993eecf4916e0466cf6ed903

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

commit a1652d13e9bc279f7a7ce84dfb626d1b66cf36d8
Author: martinvandriel <martin at vandriel.de>
Date:   Thu Sep 25 17:36:13 2014 +0200

    the user is not a baby


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

a1652d13e9bc279f7a7ce84dfb626d1b66cf36d8
 SOLVER/parameters.F90 | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/SOLVER/parameters.F90 b/SOLVER/parameters.F90
index 49dcd86..f08bf63 100644
--- a/SOLVER/parameters.F90
+++ b/SOLVER/parameters.F90
@@ -737,11 +737,6 @@ subroutine check_basic_parameters
         '\nchange parameter realkind in global_parameters.f90'
   call pcheck((realkind /= sp .and. realkind /= dp), errmsg)
 
-  errmsg = "!!!!!! NOT GOING ANY FURTHER !!!!!!\n" &
-        // "  It's just too much to save 10 frames of strain & velocity\n" &
-        // "  per source period! Choose something reasonable."
-  call pcheck(strain_samp > 15, errmsg)
-
   errmsg = "Need indices for GLL points to dump xdmf. Set XDMF_GLL_* in inparam_advanced"
   call pcheck(dump_xdmf .and. (i_n_xdmf == -1 .or. j_n_xdmf == -1 ), errmsg)
 



More information about the CIG-COMMITS mailing list