From e114f342b51559acda24d509c8695972e59d1351 Mon Sep 17 00:00:00 2001 From: Silviu Marian Udrescu Date: Sat, 25 Apr 2020 21:08:31 -0400 Subject: [PATCH] Add files via upload --- Code/symbolic_regress1.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Code/symbolic_regress1.f b/Code/symbolic_regress1.f index 8dad3af..0faaccc 100644 --- a/Code/symbolic_regress1.f +++ b/Code/symbolic_regress1.f @@ -44,7 +44,7 @@ integer arities(21), nvar, nvarmax, nmax, lnblnk parameter(nvarmax=20, nmax=10000000) real*8 f, newloss, minloss, maxloss, rmsloss, xy(nvarmax+1,nmax), epsilon, DL, DL2, DL3 - parameter(epsilon=0.00000001) + parameter(epsilon=0.000000000000000000001) data arities /2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0/ data functions /"+*-/><~\OJLESCANTR01P"/ integer nn(0:2), ii(nmax), kk(nmax), radix(nmax)