tFix calculation of skin depth with specified diffusivity - cngf-pf - continuum model for granular flows with pore-pressure dynamics (renamed from 1d_fd_simple_shear)
 (HTM) git clone git://src.adamsgaard.dk/cngf-pf
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit a67f2e6117b50d1dfaf0d35e91bc612fd65be6b2
 (DIR) parent d708a8788c52a444e398488a77f8e5776d17370a
 (HTM) Author: Anders Damsgaard <anders@adamsgaard.dk>
       Date:   Thu,  9 Jul 2020 20:28:33 +0200
       
       Fix calculation of skin depth with specified diffusivity
       
       Diffstat:
         M max_depth_simple_shear.c            |       2 +-
       
       1 file changed, 1 insertion(+), 1 deletion(-)
       ---
 (DIR) diff --git a/max_depth_simple_shear.c b/max_depth_simple_shear.c
       t@@ -49,7 +49,7 @@ static double
        skin_depth(const struct simulation *sim)
        {
                if (sim->D > 0.0)
       -                return sqrt(sim->D * M_PI * sim->p_f_mod_freq);
       +                return sqrt(sim->D / (M_PI * sim->p_f_mod_freq));
                else
                        return sqrt(sim->k[0] / (sim->mu_f * (sim->alpha + sim->phi[0] * sim->beta_f) * M_PI * sim->p_f_mod_freq));
        }