- Added Ticket basic term type. Note that this only has consequences for

the Arachne type checking. The net result is that a variable of type
  'Ticket' can always contain any term, even with -m0 or -m1 matching.

src/arachne.c

@@ -30,6 +30,7 @@
 #include "binding.h"
 #include "warshall.h"
 #include "timer.h"
+#include "type.h"
 
 extern Term CLAIM_Secret;
 extern Term CLAIM_Nisynch;
@@ -2650,6 +2651,18 @@ prune_theorems ()
   List bl;
   int run;
 
+  // Check all types of the local agents according to the matching type
+  if (!checkTypeLocals (sys))
+    {
+      if (sys->output == PROOF)
+	{
+	  indentPrint ();
+	  eprintf
+	    ("Pruned because some local variable was incorrectly subsituted.\n");
+	}
+      return 1;
+    }
+
   // Check if all agents are agents (!)
   run = 0;
   while (run < sys->maxruns)