aboutsummaryrefslogtreecommitdiffstats
path: root/subprojects/store-reasoning/src/main/java/tools/refinery/store/reasoning/translator/multiplicity/InvalidMultiplicityErrorTranslator.java
blob: c5e5e83e99caa9d79fbc9a64b8fd1672ef88c1ae (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
/*
 * SPDX-FileCopyrightText: 2023 The Refinery Authors <https://refinery.tools/>
 *
 * SPDX-License-Identifier: EPL-2.0
 */
package tools.refinery.store.reasoning.translator.multiplicity;

import tools.refinery.store.model.ModelStoreBuilder;
import tools.refinery.store.model.ModelStoreConfiguration;
import tools.refinery.store.query.dnf.Query;
import tools.refinery.store.query.term.Variable;
import tools.refinery.store.query.term.int_.IntTerms;
import tools.refinery.store.reasoning.lifting.DnfLifter;
import tools.refinery.store.reasoning.literal.*;
import tools.refinery.store.reasoning.representation.PartialRelation;
import tools.refinery.store.reasoning.translator.PartialRelationTranslator;
import tools.refinery.store.reasoning.translator.TranslationException;
import tools.refinery.store.representation.cardinality.FiniteUpperCardinality;
import tools.refinery.store.representation.cardinality.UpperCardinalities;
import tools.refinery.store.representation.cardinality.UpperCardinality;

import java.util.List;

import static tools.refinery.store.query.literal.Literals.check;
import static tools.refinery.store.query.term.int_.IntTerms.greater;
import static tools.refinery.store.query.term.uppercardinality.UpperCardinalityTerms.constant;
import static tools.refinery.store.query.term.uppercardinality.UpperCardinalityTerms.less;
import static tools.refinery.store.reasoning.literal.PartialLiterals.candidateMust;
import static tools.refinery.store.reasoning.literal.PartialLiterals.must;

public class InvalidMultiplicityErrorTranslator implements ModelStoreConfiguration {
	private final PartialRelation nodeType;
	private final PartialRelation linkType;
	private final boolean inverse;
	private final Multiplicity multiplicity;

	public InvalidMultiplicityErrorTranslator(PartialRelation nodeType, PartialRelation linkType,
											  boolean inverse, Multiplicity multiplicity) {
		if (nodeType.arity() != 1) {
			throw new TranslationException(linkType, "Node type must be of arity 1, got %s with arity %d instead"
					.formatted(nodeType, nodeType.arity()));
		}
		if (linkType.arity() != 2) {
			throw new TranslationException(linkType, "Link type must be of arity 2, got %s with arity %d instead"
					.formatted(linkType, linkType.arity()));
		}
		this.nodeType = nodeType;
		this.linkType = linkType;
		this.inverse = inverse;
		this.multiplicity = multiplicity;
	}

	@Override
	public void apply(ModelStoreBuilder storeBuilder) {
		if (!(multiplicity instanceof ConstrainedMultiplicity constrainedMultiplicity)) {
			return;
		}

		var name = constrainedMultiplicity.errorSymbol().name();
		var cardinalityInterval = constrainedMultiplicity.multiplicity();
		var node = Variable.of("node");
		var other = Variable.of("other");
		List<Variable> arguments = inverse ? List.of(other, node) : List.of(node, other);
		var mustBuilder = Query.builder(DnfLifter.decorateName(name, Modality.MUST, Concreteness.PARTIAL))
				.parameter(node);
		var candidateMayBuilder = Query.builder(DnfLifter.decorateName(name, Modality.MAY, Concreteness.PARTIAL))
				.parameter(node);
		var candidateMustBuilder = Query.builder(DnfLifter.decorateName(name, Modality.MUST, Concreteness.PARTIAL))
				.parameter(node);

		int lowerBound = cardinalityInterval.lowerBound();
		if (lowerBound > 0) {
			var lowerBoundCardinality = UpperCardinalities.atMost(lowerBound);
			mustBuilder.clause(UpperCardinality.class, existingContents -> List.of(
					must(nodeType.call(node)),
					new CountUpperBoundLiteral(existingContents, linkType, arguments),
					check(less(existingContents, constant(lowerBoundCardinality)))
			));
			candidateMayBuilder.clause(Integer.class, existingContents -> List.of(
					candidateMust(nodeType.call(node)),
					new CountCandidateLowerBoundLiteral(existingContents, linkType, arguments),
					check(IntTerms.less(existingContents, IntTerms.constant(lowerBound)))
			));
			candidateMustBuilder.clause(Integer.class, existingContents -> List.of(
					candidateMust(nodeType.call(node)),
					new CountCandidateUpperBoundLiteral(existingContents, linkType, arguments),
					check(IntTerms.less(existingContents, IntTerms.constant(lowerBound)))
			));
		}

		if (cardinalityInterval.upperBound() instanceof FiniteUpperCardinality finiteUpperCardinality) {
			int upperBound = finiteUpperCardinality.finiteUpperBound();
			mustBuilder.clause(Integer.class, existingContents -> List.of(
					must(nodeType.call(node)),
					new CountLowerBoundLiteral(existingContents, linkType, arguments),
					check(greater(existingContents, IntTerms.constant(upperBound)))
			));
			candidateMayBuilder.clause(Integer.class, existingContents -> List.of(
					candidateMust(nodeType.call(node)),
					new CountCandidateUpperBoundLiteral(existingContents, linkType, arguments),
					check(greater(existingContents, IntTerms.constant(upperBound)))
			));
			candidateMustBuilder.clause(Integer.class, existingContents -> List.of(
					candidateMust(nodeType.call(node)),
					new CountCandidateLowerBoundLiteral(existingContents, linkType, arguments),
					check(greater(existingContents, IntTerms.constant(upperBound)))
			));
		}

		storeBuilder.with(PartialRelationTranslator.of(constrainedMultiplicity.errorSymbol())
				.mayNever()
				.must(mustBuilder.build())
				.candidateMay(candidateMayBuilder.build())
				.candidateMust(candidateMustBuilder.build()));
	}
}