You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
39 lines
1.3 KiB
39 lines
1.3 KiB
model ImplemOcaml { |
|
component ID (out tIDENT) |
|
component MID (out tMIDENT) |
|
component MODELE (in IP, in OP, in SC, out tMODELE) |
|
component PATTERN (in IP, in OP, in SC, out tPATTERN) |
|
ID.tIDENT -> MODELE.IP |
|
ID.tIDENT -> MODELE.OP |
|
MID.tMIDENT -> MODELE.SC |
|
MID.tMIDENT -> PATTERN.IP |
|
MID.tMIDENT -> PATTERN.OP |
|
MID.tMIDENT -> PATTERN.SC |
|
component UNFOLD_MAPPING (in UM, in PM, out tMODELE, out PMAP, out IMAP, out UM) { |
|
component UNFOLD (in PM, out o) |
|
component PATTERN_MAPPING (in UM, in PM, out o) |
|
component INSTANCE_MAPPING (in i1, in i2, out o) |
|
UNFOLD_MAPPING.UM -> PATTERN_MAPPING.UM |
|
UNFOLD_MAPPING.PM -> PATTERN_MAPPING.PM |
|
UNFOLD_MAPPING.PM -> UNFOLD.PM |
|
UNFOLD.o -> INSTANCE_MAPPING.i2 |
|
UNFOLD_MAPPING.PM -> INSTANCE_MAPPING.i1 |
|
PATTERN_MAPPING.o -> PMAP |
|
INSTANCE_MAPPING.o -> IMAP |
|
} |
|
MODELE.tMODELE -> UNFOLD_MAPPING.UM |
|
PATTERN.tPATTERN -> UNFOLD_MAPPING.PM |
|
component APPLY (in IM, in PM, in i, out tMODELE) { |
|
component SOMME (out o) |
|
component MSOMME (out o) |
|
component MSOMME2 (out o) |
|
component MODELE (in IP, in OP, in SC, out tMODELE) |
|
SOMME.o -> MODELE.IP |
|
MSOMME.o -> MODELE.OP |
|
MSOMME2.o -> MODELE.SC |
|
MODELE.tMODELE -> tMODELE |
|
} |
|
MODELE.tMODELE -> ImplemOcaml.APPLY.IM |
|
UNFOLD_MAPPING.tMODELE -> APPLY.PM |
|
UNFOLD_MAPPING.IMAP -> APPLY.i |
|
} |