Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Glasgow Haskell Compiler
nofib
Commits
3da6c432
Commit
3da6c432
authored
Nov 23, 1997
by
sof
Browse files
[project @ 1997-11-23 15:34:53 by sof]
Aux.hs
parent
95b855f8
Changes
3
Hide whitespace changes
Inline
Side-by-side
real/PolyGP/Aux.hs
View file @
3da6c432
{---------------------------------------------------------------
--
-- Aux.hs : contains supporting function defination for the system.
-- Aux
il
.hs : contains supporting function defination for the system.
-- T.Yu@cs.ucl.ac.uk September 25, 1997
--
--------------------------------------------------------------}
module
Aux
where
module
Aux
il
where
import
Local
(
args
,
retType
,
testData
,
myName
,
expectResults
,
maxScore
,
evalFitness
,
printFitness
)
import
Header
(
TypeExp
(
..
),
ParseTree
(
..
),
Expression
(
..
),
Population
(
..
))
import
Create
(
createTree
,
extract
)
...
...
real/PolyGP/Local.hs
View file @
3da6c432
...
...
@@ -10,7 +10,7 @@ import Header (Expression(..),TypeExp(..),ExpressionList(..))
import
Array
(
Array
,
array
)
import
Char
(
ord
)
--import Eval(atoi)
--import Aux(indexL)
--import Aux
il
(indexL)
-- termEnv -----------------------------------------------------------------------------------
-- This is the terminal set for Map program
...
...
real/PolyGP/Main.hs
View file @
3da6c432
...
...
@@ -7,7 +7,7 @@
module
Main
where
import
Header
(
Expression
(
..
),
TypeExp
(
..
))
import
Aux
(
getParas
,
create
,
evolve
,
displayPop
)
import
Aux
il
(
getParas
,
create
,
evolve
,
displayPop
)
import
System
(
getArgs
)
import
Random
(
randomInts
,
randomDoubles
)
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment