Add files via upload
This commit is contained in:
parent
c338b6dc5f
commit
d7b3d8560b
8 changed files with 905 additions and 127 deletions
|
|
@ -40,13 +40,13 @@
|
|||
implicit none
|
||||
character*60 opsfile, templatefile, mysteryfile, outfile, usedfuncs
|
||||
character*60 comline, functions, ops, formula
|
||||
integer arities(19), nvar, nvarmax, nmax, lnblnk
|
||||
integer arities(21), nvar, nvarmax, nmax, lnblnk
|
||||
parameter(nvarmax=20, nmax=10000000)
|
||||
real*8 f, newloss, minloss, maxloss, rmsloss, xy(nvarmax+1,nmax), epsilon
|
||||
real*8 ymin, prefactor, DL, DL2, DL3, limit
|
||||
parameter(epsilon=0.000000000000000000001)
|
||||
data arities /2,2,2,2,1,1,1,1,1,1,1,1,1,1,1,1,0,0,0/
|
||||
data functions /"+*-/><~\LESCANTR01P"/
|
||||
parameter(epsilon=0.00001)
|
||||
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)
|
||||
integer ndata, i, j, n, jmin
|
||||
integer*8 nformulas
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue