@@ -27,10 +27,10 @@ package CausationConnections {
2727
2828 private import SequenceFunctions::*;
2929
30- occurrence causes[1..*] :>> causes :> participant {
30+ ref occurrence causes[1..*] :>> causes :> participant {
3131 doc /* The causing occurrences. */
3232 }
33- occurrence effects[1..*] :>> effects :> participant {
33+ ref occurrence effects[1..*] :>> effects :> participant {
3434 doc /* The effect occurrences caused by the causing occurrences. */
3535 }
3636
@@ -54,19 +54,21 @@ package CausationConnections {
5454 doc
5555 /*
5656 * A Causation is a binary Multicausation in which a single cause occurrence
57- * causes a single effect occurrence.
57+ * causes a single effect occurrence. (However, a single cause can separately
58+ * have multiple effects, and a single effect can have separate Causation
59+ * connections with multiple causes.)
5860 */
5961
60- end occurrence theCause :>> causes :> source {
62+ end occurrence theCause[*] :>> causes :> source {
6163 doc /* The single causing occurrence. */
6264 }
6365
64- end occurrence theEffect :>> effects :> target {
66+ end occurrence theEffect[*] :>> effects :> target {
6567 doc /* The single effect occurrence resulting from the cause. */
6668 }
6769 }
6870
69- abstract connection causations : Causation[*] {
71+ abstract connection causations : Causation[*] :> multicausations {
7072 doc /* causations is the base feature for Causation ConnectionUsages. */
7173 }
7274}
0 commit comments