module Modelling.ActivityDiagram.SelectAs.Config where
import Modelling.ActivityDiagram.Config (AdConfig(..))
import Modelling.ActivityDiagram.SelectAS (SelectASConfig(..))
task2023_33 :: SelectASConfig
task2023_33 :: SelectASConfig
task2023_33 = SelectASConfig {
adConfig :: AdConfig
adConfig = AdConfig {
actionLimits :: (Int, Int)
actionLimits = (Int
10, Int
10),
objectNodeLimits :: (Int, Int)
objectNodeLimits = (Int
2, Int
2),
maxNamedNodes :: Int
maxNamedNodes = Int
12,
decisionMergePairs :: Int
decisionMergePairs = Int
2,
forkJoinPairs :: Int
forkJoinPairs = Int
1,
activityFinalNodes :: Int
activityFinalNodes = Int
0,
flowFinalNodes :: Int
flowFinalNodes = Int
2,
cycles :: Int
cycles = Int
2
},
hideBranchConditions :: Bool
hideBranchConditions = Bool
True,
maxInstances :: Maybe Integer
maxInstances = Integer -> Maybe Integer
forall a. a -> Maybe a
Just Integer
500,
objectNodeOnEveryPath :: Maybe Bool
objectNodeOnEveryPath = Bool -> Maybe Bool
forall a. a -> Maybe a
Just Bool
True,
numberOfWrongAnswers :: Int
numberOfWrongAnswers = Int
6,
answerLength :: (Int, Int)
answerLength = (Int
10, Int
10),
printSolution :: Bool
printSolution = Bool
True,
extraText :: Maybe (Map Language String)
extraText = Maybe (Map Language String)
forall a. Maybe a
Nothing
}
task2023_34 :: SelectASConfig
task2023_34 :: SelectASConfig
task2023_34 = SelectASConfig {
adConfig :: AdConfig
adConfig = AdConfig {
actionLimits :: (Int, Int)
actionLimits = (Int
10, Int
10),
objectNodeLimits :: (Int, Int)
objectNodeLimits = (Int
5, Int
5),
maxNamedNodes :: Int
maxNamedNodes = Int
15,
decisionMergePairs :: Int
decisionMergePairs = Int
2,
forkJoinPairs :: Int
forkJoinPairs = Int
2,
activityFinalNodes :: Int
activityFinalNodes = Int
0,
flowFinalNodes :: Int
flowFinalNodes = Int
2,
cycles :: Int
cycles = Int
1
},
hideBranchConditions :: Bool
hideBranchConditions = Bool
True,
maxInstances :: Maybe Integer
maxInstances = Integer -> Maybe Integer
forall a. a -> Maybe a
Just Integer
500,
objectNodeOnEveryPath :: Maybe Bool
objectNodeOnEveryPath = Maybe Bool
forall a. Maybe a
Nothing,
numberOfWrongAnswers :: Int
numberOfWrongAnswers = Int
9,
answerLength :: (Int, Int)
answerLength = (Int
9, Int
9),
printSolution :: Bool
printSolution = Bool
True,
extraText :: Maybe (Map Language String)
extraText = Maybe (Map Language String)
forall a. Maybe a
Nothing
}
task2024_39 :: SelectASConfig
task2024_39 :: SelectASConfig
task2024_39 = SelectASConfig
task2023_33
task2024_40 :: SelectASConfig
task2024_40 :: SelectASConfig
task2024_40 = SelectASConfig
task2023_34