occam-verify-cli 0.0.1003 → 0.0.1006

package/src/rule.js

@@ -1,16 +1,31 @@
 "use strict";
 
+import Label from "./label";
+import Proof from "./proof";
+import Premise from "./premise";
+import Conclusion from "./conclusion";
+import LocalContext from "./context/local";
 import Substitutions from "./substitutions";
-import resolveSubstitutions from "./resolve/substitutions";
-import unifyPremisesWithProofSteps from "./unify/premisesWithProofSteps";
-import unifyConclusionWithStatement from "./unify/conclusionWithStatement";
+
+import { reverse, correlate } from "./utilities/array";
+import { nodeQuery, nodesQuery } from "./utilities/query";
+
+const proofNodeQuery = nodeQuery("/rule/proof"),
+      labelNodesQuery = nodesQuery("/rule/label"),
+      premiseNodesQuery = nodesQuery("/rule/premise"),
+      conclusionNodeQuery = nodeQuery("/rule/conclusion");
 
 export default class Rule {
-  constructor(labels, premises, conclusion, fileContext) {
+  constructor(fileContext, labels, premises, conclusion, proof) {
+    this.fileContext = fileContext;
     this.labels = labels;
     this.premises = premises;
     this.conclusion = conclusion;
-    this.fileContext = fileContext;
+    this.proof = proof;
+  }
+
+  getFileContext() {
+    return this.fileContext;
   }
 
   getLabels() {
@@ -25,50 +40,204 @@ export default class Rule {
     return this.conclusion;
   }
 
-  getFileContext() {
-    return this.fileContext;
+  getProof() {
+    return this.proof;
   }
 
-  unifyStatement(statementNode, localContext) {
-    let statementUnified = false;
+  matchMetavariableNode(metavariableNode) {
+    const metavariableNodeMatches = this.labels.some((label) => {
+      const metavariableNodeMatches = label.matchMetavariableNode(metavariableNode);
+
+      if (metavariableNodeMatches) {
+        return true;
+      }
+    });
 
-    const substitutions = Substitutions.fromNothing(),
-          proofSteps = localContext.getProofSteps(),
-          premisesA = this.premises,
-          proofStepsB = proofSteps, ///
-          fileContextA = this.fileContext,  ///
-          localContextB = localContext, ///
-          premisesUnified = unifyPremisesWithProofSteps(premisesA, proofStepsB, substitutions, fileContextA, localContextB);
+    return metavariableNodeMatches;
+  }
 
-    if (premisesUnified) {
-      const conclusionA = this.conclusion,  ///
-            conclusionUnified = unifyConclusionWithStatement(conclusionA, statementNode, substitutions, fileContextA, localContextB);
+  unifyStatement(statement, localContext) {
+    let statementUnified = false;
 
-      if (conclusionUnified) {
-        const substitutionsResolved = resolveSubstitutions(substitutions, fileContextA, localContextB);
+    const proofSteps = localContext.getProofSteps(),
+          substitutions = Substitutions.fromNothing(),
+          proofStepsUnified = this.unifyProofSteps(proofSteps, substitutions, localContext);
 
-        statementUnified = substitutionsResolved; ///
-      }
+    if (proofStepsUnified) {
+      statementUnified = this.conclusion.unifyStatement(statement, substitutions, localContext);
     }
 
     return statementUnified;
   }
 
-  matchMetavariableNode(metavariableNode) {
-    const metavariableNodeMatches = this.labels.some((label) => {
-      const metavariableNodeMatches = label.matchMetavariableNode(metavariableNode);
+  unifyProofSteps(proofSteps, substitutions, localContext) {
+    let proofStepsUnified;
 
-      if (metavariableNodeMatches) {
+    let premises = this.premises;
+
+    premises = reverse(premises); ///
+
+    proofSteps = reverse(proofSteps); ///
+
+    proofStepsUnified = correlate(premises, proofSteps, (premise, proofStep) => {
+      const proofStepUnified = premise.unifyProofStep(proofStep, substitutions, localContext);
+
+      if (proofStepUnified) {
         return true;
       }
     });
 
-    return metavariableNodeMatches;
+    return proofStepsUnified;
+  }
+
+  verify(fileContext) {
+    let verified = false;
+
+    const labelsString = labelsStringFromLabels(this.labels);
+
+    fileContext.trace(`Verifying the '${labelsString}' rule...`);
+
+    const labelsVerified = this.labels.every((label) => {
+      const labelVVerified = label.verify(fileContext);
+
+      if (labelVVerified) {
+        return true;
+      }
+    });
+
+    if (labelsVerified) {
+      const localContext = LocalContext.fromFileContext(fileContext),
+            premisesVerified = this.premises.every((premise) => {
+              const premiseVerified = premise.verify(localContext);
+
+              if (premiseVerified) {
+                return true;
+              }
+            });
+
+      if (premisesVerified) {
+        const conclusionVerified = this.conclusion.verify(localContext);
+
+        if (conclusionVerified) {
+          let proofVerified = true; ///
+
+          if (this.proof !== null) {
+            const substitutions = Substitutions.fromNothing();
+
+            proofVerified = this.proof.verify(substitutions, this.conclusion, localContext);
+          }
+
+          if (proofVerified) {
+            const rule = this;  ///
+
+            fileContext.addRule(rule);
+
+            verified = true;
+          }
+        }
+      }
+    }
+
+    if (verified) {
+      fileContext.debug(`...verified the '${labelsString}' rule.`);
+    }
+
+    return verified;
+  }
+
+  toJSON() {
+    const labelsJSON = this.labels.map((label) => {
+            const labelJSON = label.toJSON();
+
+            return labelJSON;
+          }),
+          premisesJSON = this.premises.map((premise) => {
+            const premiseJSON = premise.toJSON();
+
+            return premiseJSON;
+          }),
+          conclusionJSON = this.conclusion.toJSON(),
+          labels = labelsJSON,  ///
+          premises = premisesJSON,  ///
+          conclusion = conclusionJSON,  ///
+          json = {
+            labels,
+            premises,
+            conclusion
+          };
+
+    return json;
+  }
+
+  static fromJSON(json, fileContext) {
+    let rule;
+
+    let { labels } = json;
+
+    const labelsJSON = labels;  ///
+
+    labels = labelsJSON.map((labelJSON) => {
+      const json = labelJSON, ///
+            label = Label.fromJSON(json, fileContext);
+
+      return label;
+    });
+
+    let { premises } = json;
+
+    const premisesJSON = premises;  ///
+
+    premises = premisesJSON.map((premiseJSON) => {
+      const json = premiseJSON, ///
+            premise = Premise.fromJSON(json, fileContext);
+
+      return premise;
+    });
+
+    let { conclusion } = json;
+
+    const conclusionJSON = conclusion;  ///
+
+    json = conclusionJSON;  ///
+
+    conclusion = Conclusion.fromJSON(json, fileContext);
+
+    const proof = null;
+
+    rule = new Rule(fileContext, labels, premises, conclusion, proof);
+
+    return rule;
   }
 
-  static fromLabelsPremisesConclusionAndFileContext(labels, premises, conclusion, fileContext) {
-    const rule = new Rule(labels, premises, conclusion, fileContext);
+  static fromRuleNode(ruleNode, fileContext) {
+    const proofNode = proofNodeQuery(ruleNode),
+          labelNodes = labelNodesQuery(ruleNode),
+          premiseNodes = premiseNodesQuery(ruleNode),
+          conclusionNode = conclusionNodeQuery(ruleNode),
+          labels = labelNodes.map((labelNode) => {
+            const label = Label.fromLabelNode(labelNode, fileContext);
+
+            return label;
+          }),
+          premises = premiseNodes.map((premiseNode) => {
+            const premise = Premise.fromPremiseNode(premiseNode, fileContext);
+
+            return premise;
+          }),
+          conclusion = Conclusion.fromConclusionNode(conclusionNode, fileContext),
+          proof = Proof.fromProofNode(proofNode, fileContext),
+          rule = new Rule(fileContext, labels, premises, conclusion, proof);
 
     return rule;
   }
 }
+
+function labelsStringFromLabels(labels) {
+  const labelsString = labels.map((label) => {
+          const labelString = label.getString();
+
+          return labelString;
+        });
+
+  return labelsString;
+}

package/src/ruleNames.js

@@ -1,4 +1,4 @@
 "use strict";
 
 export const TERM_RULE_NAME = "term";
-export const STATEMENT_RULE_NAME = "statement";
+export const UNQUALIFIED_STATEMENT_RULE_NAME = "unqualifiedStatement";

package/src/statement/qualified.js

@@ -0,0 +1,104 @@
+"use strict";
+
+import Statement from "../statement";
+import Reference from "../reference";
+import unifyMixins from "../mixins/statement/qualified/unify";
+import LocalContext from "../context/local";
+
+import { trim } from "../utilities/string";
+import { nodeQuery } from "../utilities/query";
+import { assignAssignments } from "../utilities/assignments";
+
+const statementNodeQuery = nodeQuery("/qualifiedStatement/statement"),
+      referenceNodeQuery = nodeQuery("/qualifiedStatement/reference");
+
+export default class QualifiedStatement {
+  constructor(string, statement, reference) {
+    this.string = string;
+    this.statement = statement;
+    this.reference = reference;
+  }
+
+  getString() {
+    return this.string;
+  }
+
+  getStatement() {
+    return this.statement;
+  }
+
+  getReference() {
+    return this.reference;
+  }
+
+  getMetavariableNode() { return this.reference.getMetavariableNode(); }
+
+  verify(substitutions, localContext) {
+    let verified;
+
+    const qualifiedStatementString = trim(this.string); ///
+
+    localContext.trace(`Verifying the '${qualifiedStatementString}' qualified statement...`);
+
+    const stated = true,
+          assignments = [],
+          statementVerified = this.statement.verify(assignments, stated, localContext);
+
+    if (statementVerified) {
+      const unified = this.unify(substitutions, localContext);
+
+      if (unified) {
+        const assignmentsAssigned = assignAssignments(assignments, localContext);
+
+        verified = assignmentsAssigned; ///
+      }
+    }
+
+    if (verified) {
+      localContext.debug(`...verified the '${qualifiedStatementString}' qualified statement.`);
+    }
+
+    return verified;
+  }
+
+  unify(substitutions, localContext) {
+    let unified;
+
+    const qualifiedStatement = this,  ///
+          qualifiedStatementString = trim(this.string); ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement...`);
+
+    unified = unifyMixins.some((unifyMixin) => {
+      const unified = unifyMixin(qualifiedStatement, substitutions, localContext);
+
+      return unified;
+    });
+
+    if (unified) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement.`);
+    }
+
+    return unified;
+  }
+
+  static fromQualifiedStatementNode(qualifiedStatementNode, fileContext) {
+    let qualifiedStatement = null;
+
+    if (qualifiedStatementNode !== null) {
+      const statementNode = statementNodeQuery(qualifiedStatementNode),
+            referenceNode = referenceNodeQuery(qualifiedStatementNode),
+            localContext = LocalContext.fromFileContext(fileContext),
+            statement = (statementNode !== null) ?
+                          Statement.fromStatementNode(statementNode, localContext) :
+                            null,
+            reference = Reference.fromReferenceNode(referenceNode, fileContext),
+            node = qualifiedStatementNode,  ///
+            string = fileContext.nodeAsString(node);
+
+        qualifiedStatement = new QualifiedStatement(string, statement, reference);
+    }
+
+    return qualifiedStatement;
+  }
+}

package/src/statement/unqualified.js

@@ -0,0 +1,60 @@
+"use strict";
+
+import Statement from "../statement";
+import LocalContext from "../context/local";
+
+import { trim } from "../utilities/string";
+import { nodeQuery } from "../utilities/query";
+
+const statementNodeQuery = nodeQuery("/unqualifiedStatement/statement");
+
+export default class UnqualifiedStatement {
+  constructor(string, statement) {
+    this.string = string;
+    this.statement = statement;
+  }
+
+  getString() {
+    return this.string;
+  }
+
+  getStatement() {
+    return this.statement;
+  }
+
+  verify(assignments, stated, localContext) {
+    let verified;
+
+    const unqualifiedStatementString = trim(this.string); ///
+
+    localContext.trace(`Verifying the '${unqualifiedStatementString}' unqualified statement...`);
+
+    const statementVerified = this.statement.verify(assignments, stated, localContext);
+
+    verified = statementVerified; ///
+
+    if (verified) {
+      localContext.debug(`...verified the '${unqualifiedStatementString}' unqualified statement.`);
+    }
+
+    return verified;
+  }
+
+  static fromUnqualifiedStatementNode(unqualifiedStatementNode, fileContext) {
+    let unqualifiedStatement = null;
+
+    if (unqualifiedStatementNode !== null) {
+      const statementNode = statementNodeQuery(unqualifiedStatementNode),
+            localContext = LocalContext.fromFileContext(fileContext),
+            statement = (statementNode !== null) ?
+                          Statement.fromStatementNode(statementNode, localContext) :
+                            null,
+            node = unqualifiedStatementNode,  ///
+            string = fileContext.nodeAsString(node);
+
+      unqualifiedStatement = new UnqualifiedStatement(string, statement);
+    }
+
+    return unqualifiedStatement;
+  }
+}

package/src/statement.js

@@ -0,0 +1,179 @@
+"use strict";
+
+import shim from "./shim";
+import unifyMixins from "./mixins/statement/unify";
+import verifyMixins from "./mixins/statement/verify";
+import statementAsCombinatorVerifier from "./verifier/statementAsCombinator";
+
+import { statementNodeFromStatementString } from "./utilities/node";
+import { FRAME_META_TYPE_NAME, REFERENCE_META_TYPE_NAME, STATEMENT_META_TYPE_NAME } from "./metaTypeNames";
+
+class Statement {
+  constructor(string, node) {
+    this.string = string;
+    this.node = node;
+  }
+
+  getString() {
+    return this.string;
+  }
+
+  getNode() {
+    return this.node;
+  }
+
+  isEqualTo(statement) {
+    const node = statement.getNode(),
+          matches = this.node.match(node),
+          equalTo = matches;  ///
+
+    return equalTo;
+  }
+
+  verify(assignments, stated, localContext) {
+    let verified = false;
+
+    const statement = this, ///
+          statementString = this.string;  ///
+
+    localContext.trace(`Verifying the '${statementString}' statement...`);
+
+    if (!verified) {
+      verified = unifyMixins.some((unifyMixin) => { ///
+        const unified = unifyMixin(statement, assignments, stated, localContext);
+
+        if (unified) {
+          return true;
+        }
+      });
+    }
+
+    if (!verified) {
+      verified = verifyMixins.some((verifyMixin) => {
+        const verified = verifyMixin(statement, assignments, stated, localContext);
+
+        if (verified) {
+          return true;
+        }
+      });
+    }
+
+    if (verified) {
+      localContext.debug(`...verified the '${statementString}' statement.`);
+    }
+
+    return verified;
+  }
+
+  unifyWithMetaType(metaType, assignments, stated, localContext) {
+    let unifiedWithMetaType;
+
+    const verifiedGivenMetaType = this.verifyGivenMetaType(metaType, assignments, stated, localContext);
+
+    unifiedWithMetaType = verifiedGivenMetaType;  ///
+
+    return unifiedWithMetaType;
+  }
+
+  verifyAsCombinator(localContext) {
+    let verifiedAsCombinator;
+
+    const statementNode = this.node,  ///
+          statementString = this.string;  ///
+
+    localContext.trace(`Verifying the '${statementString}' statement as a combinator...`);
+
+    verifiedAsCombinator = statementAsCombinatorVerifier.verifyStatement(statementNode, localContext);
+
+    if (verifiedAsCombinator) {
+      localContext.debug(`...verified the '${statementString}' statement as a combinator.`, statementNode);
+    }
+
+    return verifiedAsCombinator;
+  }
+
+  verifyGivenMetaType(metaType, assignments, stated, localContext) {
+    let verifiedGivenMetaType;
+
+    const metaTypeName = metaType.getName();
+
+    switch (metaTypeName) {
+      case FRAME_META_TYPE_NAME:
+      case REFERENCE_META_TYPE_NAME: {
+        debugger
+
+        // verifiedGivenMetaType = false;
+        //
+        // const metavariableNode = metavariableNodeQuery(statementNode);
+        //
+        // if (metavariableNode !== null) {
+        //   const metavariableName = metavariableNameFromMetavariableNode(metavariableNode),
+        //     metavariable = localContext.findMetavariableByMetavariableName(metavariableName);
+        //
+        //   if (metavariable !== null) {
+        //     const metavariableMetaType = metavariable.getMetaType();
+        //
+        //     if (metavariableMetaType === metaType) {
+        //       verifiedGivenMetaType = true;
+        //     }
+        //   }
+        // }
+
+        break;
+      }
+
+      case STATEMENT_META_TYPE_NAME: {
+        const verified = this.verify(assignments, stated, localContext)
+
+        verifiedGivenMetaType = verified; ///
+
+        break;
+      }
+    }
+
+    return verifiedGivenMetaType;
+  }
+
+  toJSON() {
+    const string = this.string, ///
+          json = {
+            string
+          };
+
+    return json;
+  }
+
+  static fromJSON(json, fileContext) {
+    const { string } = json,
+          statementString = string, ///
+          lexer = fileContext.getLexer(),
+          parser = fileContext.getParser(),
+          statementNode = statementNodeFromStatementString(statementString, lexer, parser),
+          node = statementNode,  ///
+          statement = new Statement(string, node);
+
+    return statement;
+  }
+
+  static fromStatementNode(statementNode, localContext) {
+    let statement;
+
+    if (statementNode !== null) {
+      const node = statementNode, ///
+            string = localContext.nodeAsString(node);
+
+      statement = new Statement(string, node);
+    }
+
+    return statement;
+  }
+}
+
+Object.assign(shim, {
+  Statement
+});
+
+Object.assign(Statement.prototype, unifyMixins);
+
+export default Statement;
+

package/src/subDerivation.js

@@ -0,0 +1,52 @@
+"use strict";
+
+import shim from "./shim";
+
+import { last } from "./utilities/array";
+import { nodesQuery } from "./utilities/query";
+
+const proofStepNodesQuery = nodesQuery("/subDerivation/proofStep|lastProofStep");
+
+export default class SubDerivation {
+  constructor(proofSteps) {
+    this.proofSteps = proofSteps;
+  }
+
+  getProofSteps() {
+    return this.proofSteps;
+  }
+
+  getLastProofStep() {
+    const lastProofStep = last(this.proofSteps);
+
+    return lastProofStep;
+  }
+
+  verify(substitutions, localContext) {
+    let verified;
+
+    verified = this.proofSteps.every((proofStep) => { ///
+      const proofStepVerified = proofStep.verify(substitutions, localContext);
+
+      if (proofStepVerified) {
+        return true;
+      }
+    });
+
+    return verified;
+  }
+
+  static fromSubDerivationNode(subDerivationNode, fileContext) {
+    const { ProofStep } = shim,
+          proofStepNodes = proofStepNodesQuery(subDerivationNode),
+          proofSteps = proofStepNodes.map((proofStepNode) => {
+            const proofStep = ProofStep.fromProofStepNode(proofStepNode, fileContext);
+
+            return proofStep;
+          }),
+          subDerivation = new SubDerivation(proofSteps);
+
+    return subDerivation;
+
+  }
+}