:fix un atl qui n'a pas d'erreur

This commit is contained in:
Guillotin Damien 2021-12-04 12:27:00 +01:00
parent 8bd86e75a8
commit ce1f9c5798
2 changed files with 3 additions and 3 deletions

View file

@ -3,7 +3,7 @@ create OUT: petrinet from IN: game;
-- Obtenir la place correspondant au predecesseur d'une WorkSequence -- Obtenir la place correspondant au predecesseur d'une WorkSequence
helper def: network(): petrinet!Network = helper def: getNetwork() : petrinet!Network =
petrinet!Network.allInstances() petrinet!Network.allInstances()
->select(n | n.name = 'jeu') ->select(n | n.name = 'jeu')
->asSequence()->first(); ->asSequence()->first();
@ -29,7 +29,7 @@ rule Lieu2PetriNet {
p: petrinet!Place( p: petrinet!Place(
name <- 'lieu_' + l.nom, name <- 'lieu_' + l.nom,
tokens <- 0, tokens <- 0,
network <- p.network()) network <- p.getNetwork('jeu'))
} }
-- Traduire une WorkDefinition en un motif sur le réseau de Petri -- Traduire une WorkDefinition en un motif sur le réseau de Petri
@ -39,7 +39,7 @@ rule Chemin2PetriNet {
-- TRANSITIONS d'un Chemin -- TRANSITIONS d'un Chemin
t: petrinet!Transition( t: petrinet!Transition(
name <- 'chemin_' + c.nom, name <- 'chemin_' + c.nom,
network <- t.network()), network <- t.getNetwork()),
-- ARCS d'un Chemin -- ARCS d'un Chemin
arcIn: petrinet!Arc( arcIn: petrinet!Arc(
place <- c.getPlaceOf('lieu_' + c.lieuIn.nom), place <- c.getPlaceOf('lieu_' + c.lieuIn.nom),