Add Szenario191
This commit is contained in:
parent
9559b7ada6
commit
483e1707c8
|
@ -37,8 +37,7 @@ library
|
||||||
exposed-modules: GA
|
exposed-modules: GA
|
||||||
, Seminar
|
, Seminar
|
||||||
, Pretty
|
, Pretty
|
||||||
, SS19
|
, Szenario191
|
||||||
, WS19
|
|
||||||
|
|
||||||
executable haga
|
executable haga
|
||||||
build-depends: base ^>=4.12.0.0
|
build-depends: base ^>=4.12.0.0
|
||||||
|
@ -59,8 +58,7 @@ executable haga
|
||||||
other-modules: GA
|
other-modules: GA
|
||||||
, Seminar
|
, Seminar
|
||||||
, Pretty
|
, Pretty
|
||||||
, SS19
|
, Szenario191
|
||||||
, WS19
|
|
||||||
|
|
||||||
executable haga-tests
|
executable haga-tests
|
||||||
build-depends: base ^>=4.12.0.0
|
build-depends: base ^>=4.12.0.0
|
||||||
|
@ -82,5 +80,4 @@ executable haga-tests
|
||||||
other-modules: GA
|
other-modules: GA
|
||||||
, Seminar
|
, Seminar
|
||||||
, Pretty
|
, Pretty
|
||||||
, SS19
|
, Szenario191
|
||||||
, WS19
|
|
|
@ -6,7 +6,7 @@ import Pipes
|
||||||
import Pretty
|
import Pretty
|
||||||
import Protolude hiding (for)
|
import Protolude hiding (for)
|
||||||
import System.IO
|
import System.IO
|
||||||
import WS19
|
import Szenario191
|
||||||
|
|
||||||
mkPop = population 100 (I prios [])
|
mkPop = population 100 (I prios [])
|
||||||
|
|
||||||
|
|
396
src/Szenario191.hs
Normal file
396
src/Szenario191.hs
Normal file
|
@ -0,0 +1,396 @@
|
||||||
|
{-# LANGUAGE NoImplicitPrelude #-}
|
||||||
|
{-# LANGUAGE OverloadedStrings #-}
|
||||||
|
|
||||||
|
module Szenario191
|
||||||
|
( module Seminar,
|
||||||
|
module Szenario191,
|
||||||
|
module GA,
|
||||||
|
)
|
||||||
|
where
|
||||||
|
|
||||||
|
import GA hiding (runTests)
|
||||||
|
import Protolude
|
||||||
|
import Seminar hiding (runTests)
|
||||||
|
|
||||||
|
prios :: Priorities
|
||||||
|
prios =
|
||||||
|
P
|
||||||
|
[ ( "A A anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 4),
|
||||||
|
("M3", 5),
|
||||||
|
("M4", 6),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 7),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 3),
|
||||||
|
("B7", 2),
|
||||||
|
("B8", 1),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "B B anonymous@anonym.ous",
|
||||||
|
[ ("M1", 11),
|
||||||
|
("M2", 18),
|
||||||
|
("M3", 10),
|
||||||
|
("M4", 17),
|
||||||
|
("M5", 12),
|
||||||
|
("M6", 16),
|
||||||
|
("M7", 13),
|
||||||
|
("M8", 15),
|
||||||
|
("M9", 14),
|
||||||
|
("B1", 3),
|
||||||
|
("B2", 8),
|
||||||
|
("B3", 4),
|
||||||
|
("B4", 7),
|
||||||
|
("B5", 2),
|
||||||
|
("B6", 6),
|
||||||
|
("B7", 1),
|
||||||
|
("B8", 9),
|
||||||
|
("B9", 5)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "C C anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 7),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 8),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 6),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 2),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 1),
|
||||||
|
("B5", 3),
|
||||||
|
("B6", 4),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 5),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "D D anonymous@anonym.ous",
|
||||||
|
[ ("M1", 6),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 5),
|
||||||
|
("M4", 8),
|
||||||
|
("M5", 9),
|
||||||
|
("M6", 3),
|
||||||
|
("M7", 14),
|
||||||
|
("M8", 2),
|
||||||
|
("M9", 15),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 12),
|
||||||
|
("B3", 13),
|
||||||
|
("B4", 7),
|
||||||
|
("B5", 11),
|
||||||
|
("B6", 10),
|
||||||
|
("B7", 4),
|
||||||
|
("B8", 1),
|
||||||
|
("B9", 16)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "E E anonymous@anonym.ous",
|
||||||
|
[ ("M1", 4),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 3),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 1),
|
||||||
|
("M8", 2),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 4),
|
||||||
|
("B5", 2),
|
||||||
|
("B6", 3),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 1),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "F F anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 1),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 4),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 3),
|
||||||
|
("B5", 1),
|
||||||
|
("B6", 2),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "G G anonymous@anonym.ous",
|
||||||
|
[ ("M1", 3),
|
||||||
|
("M2", 4),
|
||||||
|
("M3", 1),
|
||||||
|
("M4", 7),
|
||||||
|
("M5", 9),
|
||||||
|
("M6", 5),
|
||||||
|
("M7", 2),
|
||||||
|
("M8", 6),
|
||||||
|
("M9", 8),
|
||||||
|
("B1", 4),
|
||||||
|
("B2", 8),
|
||||||
|
("B3", 9),
|
||||||
|
("B4", 5),
|
||||||
|
("B5", 1),
|
||||||
|
("B6", 2),
|
||||||
|
("B7", 6),
|
||||||
|
("B8", 3),
|
||||||
|
("B9", 7)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "H H anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 100),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 3),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 2),
|
||||||
|
("B8", 1),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "I I anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 100),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 6),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 4),
|
||||||
|
("B5", 1),
|
||||||
|
("B6", 2),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 5),
|
||||||
|
("B9", 3)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "J J anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 100),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 3),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 2),
|
||||||
|
("B8", 1),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "K K anonymous@anonym.ous",
|
||||||
|
[ ("M1", 7),
|
||||||
|
("M2", 9),
|
||||||
|
("M3", 2),
|
||||||
|
("M4", 6),
|
||||||
|
("M5", 4),
|
||||||
|
("M6", 5),
|
||||||
|
("M7", 1),
|
||||||
|
("M8", 8),
|
||||||
|
("M9", 3),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "L L anonymous@anonym.ous",
|
||||||
|
[ ("M1", 7),
|
||||||
|
("M2", 1),
|
||||||
|
("M3", 2),
|
||||||
|
("M4", 6),
|
||||||
|
("M5", 5),
|
||||||
|
("M6", 8),
|
||||||
|
("M7", 3),
|
||||||
|
("M8", 4),
|
||||||
|
("M9", 9),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "M M anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 2),
|
||||||
|
("M3", 3),
|
||||||
|
("M4", 4),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 1),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "O O anonymous@anonym.ous",
|
||||||
|
[ ("M1", 3),
|
||||||
|
("M2", 7),
|
||||||
|
("M3", 2),
|
||||||
|
("M4", 5),
|
||||||
|
("M5", 4),
|
||||||
|
("M6", 8),
|
||||||
|
("M7", 9),
|
||||||
|
("M8", 1),
|
||||||
|
("M9", 6),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "P P anonymous@anonym.ous",
|
||||||
|
[ ("M1", 1),
|
||||||
|
("M2", 5),
|
||||||
|
("M3", 2),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 3),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 4),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "Q Q anonymous@anonym.ous",
|
||||||
|
[ ("M1", 3),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 3),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 100),
|
||||||
|
("M6", 1),
|
||||||
|
("M7", 4),
|
||||||
|
("M8", 2),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 5),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 6),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "R R anonymous@anonym.ous",
|
||||||
|
[ ("M1", 100),
|
||||||
|
("M2", 100),
|
||||||
|
("M3", 2),
|
||||||
|
("M4", 100),
|
||||||
|
("M5", 1),
|
||||||
|
("M6", 100),
|
||||||
|
("M7", 3),
|
||||||
|
("M8", 100),
|
||||||
|
("M9", 100),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
),
|
||||||
|
( "S S anonymous@anonym.ous",
|
||||||
|
[ ("M1", 5),
|
||||||
|
("M2", 6),
|
||||||
|
("M3", 1),
|
||||||
|
("M4", 2),
|
||||||
|
("M5", 3),
|
||||||
|
("M6", 7),
|
||||||
|
("M7", 100),
|
||||||
|
("M8", 8),
|
||||||
|
("M9", 4),
|
||||||
|
("B1", 100),
|
||||||
|
("B2", 100),
|
||||||
|
("B3", 100),
|
||||||
|
("B4", 100),
|
||||||
|
("B5", 100),
|
||||||
|
("B6", 100),
|
||||||
|
("B7", 100),
|
||||||
|
("B8", 100),
|
||||||
|
("B9", 100)
|
||||||
|
]
|
||||||
|
)
|
||||||
|
]
|
Loading…
Reference in New Issue
Block a user