occam-verify-cli 0.0.1002 → 0.0.1005

package/src/label.js

@@ -1,30 +1,73 @@
 "use strict";
 
-import { nodeAsString } from "./utilities/string";
+import Metavariable from "./metavariable";
+
+import { nodeQuery } from "./utilities/query";
+
+const metavariableNodeQuery = nodeQuery("//label/metavariable");
 
 export default class Label {
-  constructor(metavariableNode) {
-    this.metavariableNode = metavariableNode;
+  constructor(metavariable) {
+    this.metavariable = metavariable;
+  }
+
+  getMetavariable() {
+    return this.metavariable;
   }
 
-  getMetavariableNode() {
-    return this.metavariableNode;
+  getString() { return this.metavariable.getString(); }
+
+  matchMetavariableNode(metavariableNode) { return this.metavariable.matchMetavariableNode(metavariableNode); }
+
+  verify(fileContext) {
+    let verified = false;
+
+    const labelString = this.getString(); ///
+
+    fileContext.trace(`Verifying the '${labelString}' label...`);
+
+    const metavariableNode = this.metavariable.getNode(),
+          labelPresent = fileContext.isLabelPresentByMetavariableNode(metavariableNode);
+
+    if (labelPresent) {
+      fileContext.debug(`The '${labelString}' label is already present.`);
+    } else {
+      verified = true;
+    }
+
+    if (verified) {
+      fileContext.debug(`...verified the '${labelString}' label.`);
+    }
+
+    return verified;
   }
 
-  matchMetavariableNode(metavariableNode) {
-    const metavariableNodeMatches = this.metavariableNode.match(metavariableNode);
+  toJSON() {
+    const metavariableJSON = this.metavariable.toJSON(),
+          metavariable = metavariableJSON,  ///
+          json = {
+            metavariable
+          };
 
-    return metavariableNodeMatches;
+    return json;
   }
 
-  asString(tokens) {
-    const string = nodeAsString(this.metavariableNode, tokens);
+  static fromJSON(json, fileContext) {
+    let { metavariable } = json;
 
-    return string;
+    json = metavariable;  ///
+
+    metavariable = Metavariable.fromJSON(json, fileContext);
+
+    const label = new Label(metavariable);
+
+    return label;
   }
 
-  static fromMetavariableNode(metavariableNode) {
-    const label = new Label(metavariableNode);
+  static fromLabelNode(labelNode, fileContext) {
+    const metavariableNode = metavariableNodeQuery(labelNode),
+          metavariable = Metavariable.fromMetavariableNode(metavariableNode, fileContext),
+          label = new Label(metavariable);
 
     return label;
   }

package/src/log.js

@@ -4,7 +4,7 @@ import { levels } from "necessary";
 
 import { leastLineIndexFromNodeAndTokens, greatestLineIndexFromNodeAndTokens } from "./utilities/message";
 
-const { TRACE_LEVEL, DEBUG_LEVEL, INFO_LEVEL, WARNING_LEVEL, ERROR_LEVEL, FATAL_LEVEL } = levels;
+const { TRACE_LEVEL, DEBUG_LEVEL, INFO_LEVEL, WARNING_LEVEL, ERROR_LEVEL } = levels;
 
 export default class Log {
   constructor(messages, logLevel, follow) {
@@ -55,20 +55,13 @@ export default class Log {
     this.write(level, message, node, tokens, filePath);
   }
 
-  fatal(message, node, tokens, filePath) {
-    const level = FATAL_LEVEL;
-
-    this.write(level, message, node, tokens, filePath);
-  }
-
   write(level, message, node, tokens, filePath) {
     const levels = [
             TRACE_LEVEL,
             DEBUG_LEVEL,
             INFO_LEVEL,
             WARNING_LEVEL,
-            ERROR_LEVEL,
-            FATAL_LEVEL,
+            ERROR_LEVEL
           ],
           levelIndex = levels.indexOf(level),
           logLevelIndex = levels.indexOf(this.logLevel);

package/src/metaType.js

@@ -1,8 +1,10 @@
 "use strict";
 
+import shim from "./shim";
+
 import { metaTypeNameFromMetaTypeNode } from "./utilities/name";
 
-export default class MetaType {
+class MetaType {
   constructor(name) {
     this.name = name;
   }
@@ -17,13 +19,6 @@ export default class MetaType {
     return equalTo;
   }
 
-  match(metaType) {
-    const equalToMetaType = this.isEqualTo(metaType),
-          matches = equalToMetaType;  ///
-
-    return matches;
-  }
-
   matchName(name) {
     const nameMatches = (this.name === name);
 
@@ -44,21 +39,38 @@ export default class MetaType {
     return metaTypeNodeMatches;
   }
 
-  asString(tokens) {
-    const string = `${this.name}`;
+  toJSON() {
+    const name = this.name,
+          json = {
+            name
+          };
+
+    return json;
+  }
+
+  static fromJSON(json, fileContext) {
+    const { name } = json,
+          metaType = new MetaType(name);
 
-    return string;
+    return metaType;
   }
 
-  static fromMetaTypeName(metaTypeName) {
-    const name = metaTypeName,  ///
+  static fromMetaTypeNode(metaTypeNode, localContext) {
+    const metaTypeName = metaTypeNameFromMetaTypeNode(metaTypeNode),
+          name = metaTypeName,  ///
           metaType = new MetaType(name);
 
     return metaType;
   }
 }
 
-export function metaTypeFromJSONAndFileContext(json, fileContext) {
+Object.assign(shim, {
+  MetaType
+});
+
+export default MetaType;
+
+export function metaTypeFromJSON(json, fileContext) {
   let metaType;
 
   const { name } = json;

package/src/metavariable.js

@@ -1,15 +1,21 @@
 "use strict";
 
-import { nodeAsString } from "./utilities/string";
+import { metaTypeFromJSON } from "./metaType";
+import { metavariableNameFromMetavariableNode } from "./utilities/name";
 
 export default class Metavariable {
-  constructor(node, name, termType, metaType) {
+  constructor(string, node, name, termType, metaType) {
+    this.string = string;
     this.node = node;
     this.name = name;
     this.termType = termType;
     this.metaType = metaType;
   }
 
+  getString() {
+    return this.string;
+  }
+
   getNode() {
     return this.node;
   }
@@ -44,18 +50,60 @@ export default class Metavariable {
     return metavariableNodeMatches;
   }
 
-  asString(tokens) {
-    const metaTypeName = this.metaType.getName();
+  toJSON() {
+    const metaTypeJSON = (this.metaType !== null) ?
+                            this.metaType.toJSON() :
+                              null,
+          string = this.string,
+          metaType = metaTypeJSON,  ///
+          json = {
+            string,
+            metaType
+          };
+
+    return json;
+  }
+
+  static fromJSON(json, fileContext) {
+    const { string } = json,
+          lexer  = fileContext.getLexer(),
+          parser = fileContext.getParser(),
+          metavariableString = string,  ///
+          metavariableNode = metavariableNodeFromMetavariableString(metavariableString, lexer, parser),
+          node = metavariableNode;  ///
+
+    let { metaType } = json;
 
-    let string = nodeAsString(this.node, tokens);
+    json = metaType;  ///
 
-    string = `${string}:${metaTypeName}`; ///
+    metaType = metaTypeFromJSON(json, fileContext);
 
-    return string;
+    const metavariableName = metavariableNameFromMetavariableNode(metavariableNode),
+          name = metavariableName,  ///
+          termType = termTypeFromMetavariableNode(metavariableNode, fileContext),
+          metavariable = new Metavariable(string, node, name, termType, metaType);
+
+    return metavariable;
+  }
+
+  static fromMetavariableNode(metavariableNode, fileContext) {
+    const metavariableName = metavariableNameFromMetavariableNode(metavariableNode),
+          name = metavariableName,  ///
+          node = metavariableNode,  ///
+          string = fileContext.nodeAsString(node),
+          termType = null,
+          metaType = null,
+          metavariable = new Metavariable(string, node, name, termType, metaType);
+
+    return metavariable;
   }
 
-  static fromNodeNameTermTypeAndMetaType(node, name, termType, metaType) {
-    const metavariable = new Metavariable(node, name, termType, metaType);
+  static fromMetavariableNodeNameTermTypeAndMetaType(metavariableNode, termType, metaType, fileContext) {
+    const metavariableName = metavariableNameFromMetavariableNode(metavariableNode),
+          name = metavariableName,  ///
+          node = metavariableNode,  ///
+          string = fileContext.nodeAsString(node),
+          metavariable = new Metavariable(string, node, name, termType, metaType);
 
     return metavariable;
   }

package/src/mixins/statement/qualified/unify.js

@@ -0,0 +1,186 @@
+"use strict";
+
+import metavariableUnifier from "../../../unifier/metavariable";
+import StatementForMetavariableSubstitution from "../../../substitution/statementForMetavariable";
+
+import { trim } from "../../../utilities/string";
+import { metavariableNameFromMetavariableNode } from "../../../utilities/name";
+
+function unifyAWithRule(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithRule = false;
+
+  const reference = qualifiedStatement.getReference(),
+        rule = localContext.findRuleByReference(reference);
+
+  if (rule !== null) {
+    const referenceString = reference.getString(),
+          qualifiedStatementString = trim(qualifiedStatement.getString());  ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement with the '${referenceString}' rule...`);
+
+    const statement = qualifiedStatement.getStatement(),
+          statementUnified = rule.unifyStatement(statement, localContext);
+
+    unifiedWithRule = statementUnified;  ///
+
+    if (unifiedWithRule) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement with the '${referenceString}' rule.`);
+    }
+  }
+
+  return unifiedWithRule;
+}
+
+function unifyAWithAxiom(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithAxiom = false;
+
+  const reference = qualifiedStatement.getReference(),
+        axiom = localContext.findAxiomByReference(reference);
+
+  if (axiom !== null) {
+    const referenceString = reference.getString(),
+          qualifiedStatementString = trim(qualifiedStatement.getString());  ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement with the '${referenceString}' axiom...`);
+
+    const statement = qualifiedStatement.getStatement(),
+          statementUnified = axiom.unifyStatement(statement, localContext);
+
+    unifiedWithAxiom = statementUnified; ///
+
+    if (unifiedWithAxiom) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement with the '${referenceString}' axiom.`);
+    }
+  }
+
+  return unifiedWithAxiom;
+}
+
+function unifyAWithLemma(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithLemma = false;
+
+  const reference = qualifiedStatement.getReference(),
+        lemma = localContext.findLemmaByReference(reference);
+
+  if (lemma !== null) {
+    const referenceString = reference.getString(),
+          qualifiedStatementString = trim(qualifiedStatement.getString());  ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement with the '${referenceString}' lemma...`);
+
+    const statement = qualifiedStatement.getStatement(),
+          statementUnified = lemma.unifyStatement(statement, localContext);
+
+    unifiedWithLemma = statementUnified; ///
+
+    if (unifiedWithLemma) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement with the '${referenceString}' lemma.`);
+    }
+  }
+
+  return unifiedWithLemma;
+}
+
+function unifyAWithTheorem(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithTheorem = false;
+
+  const reference = qualifiedStatement.getReference(),
+        theorem = localContext.findTheoremByReference(reference);
+
+  if (theorem !== null) {
+    const referenceString = reference.getString(),
+          qualifiedStatementString = trim(qualifiedStatement.getString());  ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement with the '${referenceString}' theorem...`);
+
+    const statement = qualifiedStatement.getStatement(),
+          statementUnified = theorem.unifyStatement(statement, localContext);
+
+    unifiedWithTheorem = statementUnified; ///
+
+    if (unifiedWithTheorem) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement with the '${referenceString}' theorem.`);
+    }
+  }
+
+  return unifiedWithTheorem;
+}
+
+function unifyAWithConjecture(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithConjecture = false;
+
+  const reference = qualifiedStatement.getReference(),
+        conjecture = localContext.findConjectureByReference(reference);
+
+  if (conjecture !== null) {
+    const referenceString = reference.getString(),
+          qualifiedStatementString = trim(qualifiedStatement.getString());  ///
+
+    localContext.trace(`Unifying the '${qualifiedStatementString}' qualified statement with the '${referenceString}' conjecture...`);
+
+    const statement = qualifiedStatement.getStatement(),
+          statementUnified = conjecture.unifyStatement(statement, localContext);
+
+    unifiedWithConjecture = statementUnified; ///
+
+    if (unifiedWithConjecture) {
+      localContext.debug(`...unified the '${qualifiedStatementString}' qualified statement with the '${referenceString}' conjecture.`);
+    }
+  }
+
+  return unifiedWithConjecture;
+}
+
+function unifyAWithReference(qualifiedStatement, substitutions, localContext) {
+  let unifiedWithReference = false;
+
+  const reference = qualifiedStatement.getReference(),
+        metavariableNode = reference.getMetavariableNode(),
+        metavariableName = metavariableNameFromMetavariableNode(metavariableNode),
+        metavariable = localContext.findMetavariableByMetavariableName(metavariableName);
+
+  if (metavariable !== null) {
+    const statement = qualifiedStatement.getStatement(),
+          statementString = statement.getString(),
+          referenceString = reference.getString();
+
+    localContext.trace(`Unifying the '${statementString}' qualified statement with the '${referenceString}' reference...`);
+
+    const metavariableNode = metavariable.getNode(),
+          referenceMetavariableNode = reference.getMetavariableNode(),
+          metavariableNodeA = referenceMetavariableNode, ///
+          metavariableNodeB = metavariableNode, ///
+          unified = metavariableUnifier.unify(metavariableNodeA, metavariableNodeB, localContext);
+
+    if (unified) {
+      const statementNode = statement.getNode(),
+            metavariableNode = metavariableNodeA, ///
+            statementForMetavariableSubstitution = StatementForMetavariableSubstitution.fromStatementNodeAndMetavariableNode(statementNode, metavariableNode, localContextA, localContextB),
+            substitution = statementForMetavariableSubstitution, ///
+            localContextA = localContext, ///
+            localContextB = localContext; ///
+
+      substitutions.addSubstitution(substitution, localContextA, localContextB);
+
+      unifiedWithReference = true;
+    }
+
+    if (unifiedWithReference) {
+      localContext.debug(`...unified the '${statementString}' qualified statement with the '${referenceString}' reference.`);
+    }
+  }
+
+  return unifiedWithReference;
+}
+
+const unifyMixins = [
+  unifyAWithRule,
+  unifyAWithAxiom,
+  unifyAWithLemma,
+  unifyAWithTheorem,
+  unifyAWithConjecture,
+  unifyAWithReference
+];
+
+export default unifyMixins;
+

package/src/mixins/statement/unify.js

@@ -0,0 +1,70 @@
+"use strict";
+
+import BracketedCombinator from "../../ocmbinator/bracketed";
+import statementWithCombinatorUnifier from "../../unifier/statementWithCombinator";
+
+function unifyWithBracketedCombinator(statement, assignments, stated, localContext) {
+  let unifiedWithBracketedCombinator;
+
+  const statementNode = statement.getNode(),
+        statementString = statement.getString(),
+        bracketedCombinator = BracketedCombinator.fromNothing(),
+        bracketedCombinatorStatementNode = bracketedCombinator.getStatementNode(),
+        combinatorStatementNode = bracketedCombinatorStatementNode; ///
+
+  localContext.trace(`Unifying the '${statementString}' statement with the bracketed combinator...`);
+
+  unifiedWithBracketedCombinator = statementWithCombinatorUnifier.unify(statementNode, combinatorStatementNode, assignments, stated, localContext);
+
+  if (unifiedWithBracketedCombinator) {
+    localContext.debug(`...unified the '${statementString}' statement with the bracketed combinator.`);
+  }
+
+  return unifiedWithBracketedCombinator;
+}
+
+function unifyWithCombinators(statement, assignments, stated, localContext) {
+  let unifiedWithCombinators;
+
+  const combinators = localContext.getCombinators();
+
+  assignments = null; ///
+
+  stated = true;  ///
+
+  unifiedWithCombinators = combinators.some((combinator) => {
+    const unifiedWithCombinator = unifyStatementWithCombinator(statement, combinator, assignments, stated, localContext);
+
+    if (unifiedWithCombinator) {
+      return true;
+    }
+  });
+
+  return unifiedWithCombinators;
+}
+
+const unifyMixins = [
+  unifyWithBracketedCombinator,
+  unifyWithCombinators
+];
+
+export default unifyMixins;
+
+function unifyStatementWithCombinator(statement, combinator, assignments, stated, localContext) {
+  let unifiedWithCombinator;
+
+  const statementNode = statement.getNode(),
+        statementString = statement.getString(),
+        combinatorString = combinator.getString(),
+        combinatorStatementNode = combinator.getStatementNode();
+
+  localContext.trace(`Unifying the '${statementString}' statement with the '${combinatorString}' combinator...`);
+
+  unifiedWithCombinator = statementWithCombinatorUnifier.unify(statementNode, combinatorStatementNode, assignments, stated, localContext);
+
+  if (unifiedWithCombinator) {
+    localContext.debug(`...unified the '${statementString}' statement with the '${combinatorString}' combinator.`);
+  }
+
+  return unifiedWithCombinator;
+}