-- |

module Modelling.PetriNet.PetriPickConcurrency.Config where

import Modelling.PetriNet.Types (
  AlloyConfig (..),
  BasicConfig (..),
  ChangeConfig (..),
  GraphConfig (..),
  PickConcurrencyConfig (..),
  )
import Data.GraphViz.Commands           (GraphvizCommand(..))

{-|
points: 0.1
average generation time per instance: 14:00min
CPU usage: 100%
-}
task2023_21 :: PickConcurrencyConfig
task2023_21 :: PickConcurrencyConfig
task2023_21 = PickConcurrencyConfig {
  $sel:basicConfig:PickConcurrencyConfig :: BasicConfig
basicConfig = BasicConfig {
    $sel:places:BasicConfig :: Int
places = Int
6,
    $sel:transitions:BasicConfig :: Int
transitions = Int
6,
    $sel:atLeastActive:BasicConfig :: Int
atLeastActive = Int
5,
    $sel:flowOverall:BasicConfig :: (Int, Int)
flowOverall = (Int
12, Int
18),
    $sel:maxTokensPerPlace:BasicConfig :: Int
maxTokensPerPlace = Int
2,
    $sel:maxFlowPerEdge:BasicConfig :: Int
maxFlowPerEdge = Int
2,
    $sel:tokensOverall:BasicConfig :: (Int, Int)
tokensOverall = (Int
5, Int
10),
    $sel:isConnected:BasicConfig :: Maybe Bool
isConnected = Bool -> Maybe Bool
forall a. a -> Maybe a
Just Bool
True
    },
  $sel:changeConfig:PickConcurrencyConfig :: ChangeConfig
changeConfig = ChangeConfig {
    $sel:tokenChangeOverall:ChangeConfig :: Int
tokenChangeOverall = Int
4,
    $sel:maxTokenChangePerPlace:ChangeConfig :: Int
maxTokenChangePerPlace = Int
2,
    $sel:flowChangeOverall:ChangeConfig :: Int
flowChangeOverall = Int
3,
    $sel:maxFlowChangePerEdge:ChangeConfig :: Int
maxFlowChangePerEdge = Int
1
    },
  $sel:graphConfig:PickConcurrencyConfig :: GraphConfig
graphConfig = GraphConfig {
    $sel:graphLayouts:GraphConfig :: [GraphvizCommand]
graphLayouts = [GraphvizCommand
Fdp, GraphvizCommand
Sfdp],
    $sel:hidePlaceNames:GraphConfig :: Bool
hidePlaceNames = Bool
True,
    $sel:hideTransitionNames:GraphConfig :: Bool
hideTransitionNames = Bool
True,
    $sel:hideWeight1:GraphConfig :: Bool
hideWeight1 = Bool
True
    },
  $sel:printSolution:PickConcurrencyConfig :: Bool
printSolution = Bool
True,
  $sel:prohibitSourceTransitions:PickConcurrencyConfig :: Bool
prohibitSourceTransitions = Bool
False,
  $sel:useDifferentGraphLayouts:PickConcurrencyConfig :: Bool
useDifferentGraphLayouts = Bool
True,
  $sel:alloyConfig:PickConcurrencyConfig :: AlloyConfig
alloyConfig = AlloyConfig {
    $sel:maxInstances:AlloyConfig :: Maybe Integer
maxInstances = Integer -> Maybe Integer
forall a. a -> Maybe a
Just Integer
2000,
    $sel:timeout:AlloyConfig :: Maybe Int
timeout = Maybe Int
forall a. Maybe a
Nothing
    },
  $sel:extraText:PickConcurrencyConfig :: Maybe (Map Language String)
extraText = Maybe (Map Language String)
forall a. Maybe a
Nothing
  }

{-|
points: 0.1
average generation time per instance: 15:28min
CPU usage: 102%
-}
task2024_29 :: PickConcurrencyConfig
task2024_29 :: PickConcurrencyConfig
task2024_29 = PickConcurrencyConfig
task2023_21