tMerge branch 'master' of src.adamsgaard.dk:1d_fd_simple_shear - cngf-pf - cont… | |
git clone git://src.adamsgaard.dk/cngf-pf | |
Log | |
Files | |
Refs | |
README | |
LICENSE | |
--- | |
commit 0bc432ae20a857af1cc3b8dfd9468e0f8b9154fc | |
parent 40b81f4ff1a7ae095135ff36a3510c03ff88096e | |
Author: Anders Damsgaard <[email protected]> | |
Date: Thu, 2 Apr 2020 10:54:47 +0200 | |
Merge branch 'master' of src.adamsgaard.dk:1d_fd_simple_shear | |
Diffstat: | |
M max_depth_simple_shear.c | 6 ++++-- | |
1 file changed, 4 insertions(+), 2 deletions(-) | |
--- | |
diff --git a/max_depth_simple_shear.c b/max_depth_simple_shear.c | |
t@@ -76,13 +76,15 @@ double zbrent(double d_s, | |
int iter; | |
double a, b, c, d, e, min1, min2, fa, fb, fc, p, q, r, s, tol1, xm; | |
- a = x1; b=x2; c=x2; | |
+ a = x1; | |
+ b = x2; | |
+ c = x2; | |
fa = (*f)(d_s, a); | |
fb = (*f)(d_s, b); | |
if ((fa > 0.0 && fb > 0.0) || (fa < 0.0 && fb < 0.0)) { | |
fprintf(stderr, | |
- "error: %s: no root of stress gradient in rang… | |
+ "error: %s: no root in range %g,%g m\n", | |
__func__, x1, x2); | |
exit(1); | |
} |