packages feed

cpsa 2.2.1 → 2.2.2

raw patch · 85 files changed

+9378/−38252 lines, 85 files

Files

ChangeLog view
@@ -1,3 +1,44 @@+2011-03-29  John D. Ramsdell  <ramsdell@mitre.org>++	* cpsa.cabal (Version):  Tagged as version 2.2.2.++	* src/CPSA/Lib/Cohort.hs (cowt): Added a duplicate substitution+	removal filter so as to resolve a large memory usage bug when+	analyzing Wang's Fair Exchange Protocol.++	* tst/wang.lisp ("Wang's Fair Exchange Protocol"): Added new+	test.++2011-03-22  John D. Ramsdell  <ramsdell@mitre.org>++	* doc/cpsaprimer.tex: Added the hashed value as key idea:+	(defmacro (hash x) (enc "hash" (cat "hash" x)))++	* tst/epmo-key-hash.scm, tst/epmo_acctnum-key-hash.lsp: Variants+	of epmo and empo_acctnum that use the hashed value as the key.++2011-02-02  John D. Ramsdell  <ramsdell@mitre.org>++	* src/CPSA/Lib/Cohort.hs (solved): Disabled condition 2a for+	protocols with role variables that are all atoms.  The use of+	condition 2a is never fruitful in this case.++2011-02-01  John D. Ramsdell  <ramsdell@mitre.org>++	* src/CPSA/Lib/Cohort.hs (solved): Added condition 2a to the+	solved predicate so that CPSA now finds the shape in targetterms8.++	* src/CPSA/Lib/Notation.hs (decl): The sort in a declaration is+	now printed after the variables, as in "a, b: name".++2010-12-27  John D. Ramsdell  <ramsdell@mitre.org>++	* src/CPSA/Lib/SExpr.hs (abort): Close input handle when reporting+	a failure.++	* src/CPSA/Lib/SExpr.hs (isSym, isStr): Non-ASCII characters are+	accepted as constituents of symbols and strings.+ 2010-12-20  John D. Ramsdell  <ramsdell@mitre.org>  	* cpsa.cabal (Version):  Tagged as version 2.2.1.
NEWS view
@@ -1,5 +1,20 @@ CPSA NEWS -- history of user-visible changes. +* Changes in version 2.2.2++** Completeness problem corrected+   Added an new condition to the solved filter so that CPSA now finds+   the shape in targetterms8.++** Performance problem corrected+   Corrected a memory consumption problem exhibited by Wang's Fair+   Exchange Protocol.  Before the correction, CPSA used 1.9GB of+   memory, afterwords, it uses 3MB.++** Non-ASCII accepted as input+   Non-ASCII letters are accepted as constituents of symbols and+   strings.+ * Changes in version 2.2.1  ** Web graph output extension changed from .xml to .xhtml
+ build.xml view
@@ -0,0 +1,104 @@+<project name="cpsaextras" default="all" basedir=".">++<!-- Directory names -->+<property name="src" value="src"/>+<!-- Directory for Scala libraries -->+<property name="lib" value="lib"/>+<property name="build" value="build"/>+<property name="dist" value="dist"/>+<property name="api" value="api"/>++<property name="proj" value="${ant.project.name}"/>+<property name="version" value="0.0.0"/>+<property name="pkg" value="${proj}"/>+<!-- Name of version resource -->+<property name="props" value="${src}/${proj}/version.properties"/>+<!-- Name of Scala library -->+<property name="library" value="${lib}/scala-library.jar"/>++<!-- One usually need not change anything below this comment -->+<!-- An exception might be the manifest in the jar task -->++<target name="init">+  <!-- Create the build directory structure used by compile -->+  <mkdir dir="${build}"/>+  <uptodate property="version_added" srcfile="build.xml"+	    targetfile="${props}"/>+  <path id="build.classpath">+    <pathelement location="${build}"/>+  </path>+  <taskdef resource="scala/tools/ant/antlib.xml">+    <classpath>+      <pathelement location="${lib}/scala-compiler.jar"/>+      <pathelement location="${lib}/scala-library.jar"/>+    </classpath>+  </taskdef>+</target>++<target name="version" depends="init" unless="version_added">+  <propertyfile file="${props}">+    <entry key="version" value="${version}" operation="="/>+    <entry key="program" value="${proj}" operation="="/>+  </propertyfile>+  <unjar src="${library}" dest="${build}"/>+</target>++<target name="compile" depends="version">+  <!-- Compile the scala code from ${src} into ${build} -->+  <scalac srcdir="${src}" destdir="${build}" deprecation="on"+	  classpathref="build.classpath"/>+</target>++<target name="resource" depends="init">+  <!-- Copy resources from ${src} into ${build} -->+  <copy todir="${build}">+    <fileset dir="${src}">+      <include name="**/*.properties"/>+    </fileset>+  </copy>+  <!-- Copy the license into ${build} -->+  <copy todir="${build}" file="license.txt"/>+</target>++<target name="all" depends="compile,version,resource">+  <jar jarfile="${proj}.jar" basedir="${build}">+    <manifest>+      <attribute name="Main-Class" value="${pkg}.Main"/>+      <attribute name="Specification-Title" value="${proj}"/>+      <attribute name="Specification-Version" value="${version}"/>+    </manifest>+  </jar>+</target>++<target name="doc" depends="version">+  <mkdir dir="${api}"/>+  <scaladoc srcdir="${src}" destdir="${api}"+	    classpathref="build.classpath">+    <include name="**/*.scala"/>+  </scaladoc>+</target>++<target name="dist" depends="all,doc">+  <mkdir dir="${dist}/${proj}"/>+  <copy todir="${dist}/${proj}">+    <fileset dir=".">+      <include name="${proj}.jar"/>+      <include name="${lib}/"/>+      <include name="${src}/**/*.scala"/>+      <include name="${src}/**/*.properties"/>+      <include name="${api}/"/>+    </fileset>+  </copy>+  <zip zipfile="${proj}-${version}.zip" basedir="${dist}"/>+</target>++<target name="clean">+  <!-- Delete the ${build} directory, the project jar file, -->+  <!-- the version resource file, and the ${dist} and ${api} directories -->+  <delete dir="${build}"/>+  <delete file="${proj}.jar"/>+  <delete file="${props}"/>+  <delete dir="${api}"/>+  <delete dir="${dist}"/>+</target>+</project>
cpsa.cabal view
@@ -1,5 +1,5 @@ Name:			cpsa-Version:		2.2.1+Version:		2.2.2 Maintainer:		ramsdell@mitre.org Cabal-Version:		>= 1.6 License:		BSD3@@ -56,6 +56,8 @@   src/index.html src/cpsacgi src/cpsacgi.py src/cpsa2svg   src/cpsa.el src/httpd_allow_execmem.te src/cpsaops.scm src/preskel   src/cpsa.pl src/pp.pl src/sexpr.pl src/zoom.js src/js2hs src/ghcmemlimit+  build.xml src/cpsaextras/Main.scala src/cpsaextras/Pretty.scala+  src/cpsaextras/Printer.scala src/cpsaextras/SExpr.scala   tst/README tst/Makefile   tst/Make.hs tst/checktst tst/cpsagraphall tst/cpsashapesall   tst/blanchet.scm tst/blanchet.tst tst/completeness-test.scm@@ -65,7 +67,7 @@   tst/deorig_contract.scm tst/deorig_contract.tst tst/dhke.scm   tst/dhke.tst tst/deorig_simple.scm  tst/deorig_simple.tst   tst/ds-short.lisp tst/dy.lsp tst/dy.tst tst/encsig.scm-  tst/encsig.tst tst/epmo_acctnum.lsp tst/epmo_acctnum.tst+  tst/encsig.tst tst/epmo_acctnum.scm tst/epmo_acctnum.tst   tst/epmo.scm tst/epmo.tst tst/ffgg.scm tst/ffgg.tst   tst/fragile_pruning.scm tst/fragile_pruning.tst tst/isoreject.scm   tst/isoreject.tst tst/kelly1.scm tst/kelly1.tst tst/kelly64.lisp@@ -79,18 +81,21 @@   tst/non_transforming.tst tst/nsl3.scm tst/nsl3.tst tst/nsl4cm1.lsp   tst/nsl4cm1.tst tst/nsl4.lisp tst/nsl4resp2.lisp tst/nsl5i.lisp   tst/nsl5.lisp tst/nslsk.scm tst/nslsk.tst tst/ns.scm tst/ns.tst-  tst/or.scm tst/or.tst tst/pca.lsp tst/pca.tst tst/pruning1.scm+  tst/or.scm tst/or.tst tst/pca.scm tst/pca.tst tst/pruning1.scm   tst/pruning1.tst tst/sigenc.scm tst/sigenc.tst-  tst/sorted_epmo_acctnum.lsp tst/sorted_epmo_acctnum.tst+  tst/sorted_epmo_acctnum.scm tst/sorted_epmo_acctnum.tst   tst/targetterms2.scm tst/targetterms2.tst tst/targetterms6.scm-  tst/targetterms6.tst tst/tnsl5.lisp tst/uncarried_keys.scm+  tst/targetterms6.tst tst/targetterms8.scm+  tst/targetterms8.tst tst/tnsl5.lisp tst/uncarried_keys.scm   tst/uncarried_keys.tst tst/uo.scm tst/uo.tst tst/updatetst   tst/weird.scm tst/weird.tst tst/wide-mouth-frog.lsp   tst/wide-mouth-frog.tst tst/wonthull2.scm tst/wonthull2.tst   tst/wonthull3.scm tst/wonthull3.tst tst/wonthull.scm   tst/wonthull.tst tst/woolam.scm tst/woolam.tst tst/yahalom-6.3.6.scm   tst/yahalom-6.3.6.tst tst/yahalom.scm tst/yahalom.tst tst/tor.scm-  tst/tor.tst+  tst/tor.tst tst/dh_cert.scm tst/dh_cert.tst+  tst/epmo_acctnum-key-hash.scm tst/epmo_acctnum-key-hash.tst+  tst/epmo-key-hash.scm tst/epmo-key-hash.tst tst/wang.lisp  -- Disable with -f-par option during configuration.
doc/bcasyntax.tex view
@@ -72,14 +72,13 @@ The contents of a file can be interpreted as a sequence of S-expressions.  The S-expressions used are restricted so that most dialects of Lisp can read them, and characters within symbols and-strings never need quoting.  Seven-bit \textsc{ascii} is used to-encode characters.  Every list is proper.  An S-expression atom is-either a \textsc{symbol}, an \textsc{integer}, or a \textsc{string}.-The characters that make up a symbol are the letters, the digits, and-the special characters in ``\verb|-*/<=>!?:$%_&~^+|''.  A symbol may-not begin with a digit or a sign followed by a digit.  The characters-that make up a string are the \textsc{ascii} printing characters-omitting double quote and backslash.  Double quotes delimit a string.-A comment\index{comments} begins with a semicolon, or is an-S-expression list at top-level that starts with the \texttt{comment}-symbol.+strings never need quoting.  Every list is proper.  An S-expression+atom is either a \textsc{symbol}, an \textsc{integer}, or+a \textsc{string}.  The characters that make up a symbol are the+letters, the digits, and the special characters in+``\verb|-*/<=>!?:$%_&~^+|''.  A symbol may not begin with a digit or a+sign followed by a digit.  The characters that make up a string are+the printing characters omitting double quote and backslash.  Double+quotes delimit a string.  A comment\index{comments} begins with a+semicolon, or is an S-expression list at top-level that starts with+the \texttt{comment} symbol.
doc/cpsadesign.pdf view

binary file changed (205754 → 205637 bytes)

doc/cpsaoverview.pdf view

binary file changed (77952 → 78159 bytes)

doc/cpsaprimer.pdf view

binary file changed (192274 → 192091 bytes)

doc/cpsaprimer.tex view
@@ -1106,14 +1106,17 @@ data, and sort \dom{text} for the other fields.  Protocols that make use of \index{hashing}hashing can be handled by-encoding the results of a hash function as an asymmetric encryption in-which no participant has access to the decryption key.  To use this-encoding in a role, encrypt the term to be hashed with an otherwise-unused asymmetric key, and declare its inverse to be non-originating.-Include an otherwise unused tag within the encryption so-as to ensure an encryption representing a hashed term cannot be-confused with an ordinary encryption.  Carefully check each role using-this encoding and make sure the decryption key is never used.+encrypting the tag \texttt{"hash"} using the value to be hashed as the+key.  If the hash value is a variable of sort \dom{mesg}, a tag must+be added to the key so as to force {\cpsa} to use symmetric+encryption.  The following {\cpsa} macro captures the usage pattern.++\begin{quote}+\begin{verbatim}+(defmacro (hash x)+  (enc "hash" (cat "hash" x)))+\end{verbatim}+\end{quote}  When looking at the output, try extracting the shapes first.  If the shapes only version of the output does not answer your questions, try
doc/cpsaspec.pdf view

binary file changed (348310 → 348303 bytes)

doc/cpsatheory.pdf view

binary file changed (291419 → 291485 bytes)

doc/cpsatheory.tex view
@@ -893,8 +893,10 @@ \item\label{enu:contract} $\anc(t',p) \cap T' \neq \emptyset$, or \item\label{enu:augment} for some $t_p\in\transpred_{k'}(n')$, $\mncow(t' \termat p,T',t_p)$, or-\item[2a.]\label{enu:augment2} $\fn{targ}(t'_c,T') \setminus-\sigma(\fn{targ}(t_c,T)) \neq \emptyset$, or+\item[2a.]\label{enu:augment2} +$\fn{targ}(t'_c,T') \setminus+\sigma(\fn{targ}(t_c,T)) \neq \emptyset$ and+there are variables in $k$'s protocol that are not atoms, or \item\label{enu:escape} for some $\enc{t_0}{t_1}\in T'$, $\pubmsg_{k'}(n')\vdash t_1^{-1}$, or \item\label{enu:crit} $t' \termat p=\enc{t_0}{t_1}$, and
doc/cpsauser.html view
@@ -548,16 +548,18 @@  <h2>S-expressions</h2> -<p>The S-expressions used are restricted so that most dialects of Lisp can read-them, and characters within symbols and strings never need quoting. ASCII is-used to encode characters. Every list is proper. An atom is either a symbol, an-integer, or a string. The characters that make up a symbol are the letters, the-digits, and the special characters in "<tt>-*/&lt;=&gt;!?:$%_&amp;~^</tt>". A-symbol may not begin with a digit or a sign followed by a digit. The characters-that make up a string are the ASCII printing characters omitting double quote-and backslash. Double quotes delimit a string. A comment begins with a-semicolon, or is an S-expression list at top-level that starts with the-<tt>comment</tt> symbol. </p>+<p>The S-expressions used are restricted so that most dialects of Lisp+can read them, and characters within symbols and strings never need+quoting. Every list is proper. An atom is either a symbol, an integer,+or a string. The characters that make up a symbol are the letters, the+digits, and the special characters in+"<tt>-*/&lt;=&gt;!?:$%_&amp;~^</tt>". A symbol may not begin with a+digit or a sign followed by a digit. The characters that make up a+string are the printing characters omitting double quote and+backslash. Double quotes delimit a string. A comment begins with a+semicolon, or is an S-expression list at top-level that starts with+the <tt>comment</tt> symbol. </p>+ <hr />  <p>Copyright (c) 2009 The MITRE Corporation. Permission to copy without fee all
doc/macros.tex view
@@ -1,5 +1,5 @@ \newcommand{\cpsa}{\textsc{cpsa}}-\newcommand{\version}{2.2.1}+\newcommand{\version}{2.2.2} \newcommand{\cpsacopying}{\begingroup   \renewcommand{\thefootnote}{}\footnotetext{{\copyright} 2010 The     MITRE Corporation.  Permission to copy without fee all or part of
src/CPSA/Lib/Cohort.hs view
@@ -132,6 +132,9 @@ -- 2. for some t in outpred(k', phi(v)), t' is not carried only within --    T in t, or --+-- 2a. targetterms(t', T) \ sigma(targetterms(t, esc(k, v, t)) /= empty +--    and there are variables in k's protocol that are not atoms, or+-- -- 3. the decryption key for an element of T is derivable, or -- -- 4. t' is an encryption and the encryption key for t' is derivable.@@ -147,9 +150,15 @@ solved :: Algebra t p g s e c => t -> p -> Maybe t -> Set t ->           Preskel t p g s e c -> Node -> s -> Bool solved ct pos ek escape k (s, p) subst =+    -- Condition 1     isAncestorInSet escape' t pos ||+    -- Condition 2     any (not . carriedOnlyWithin ct' escape') (S.toList ts) ||+    -- Condition 2a.+    not (varsAllAtoms (protocol k)) && not (S.null targetTermsDiff) ||+    -- Condition 3     any (maybe False (derivable a ts) . decryptionKey) (S.toList escape') ||+    -- Condition 4     maybe False (derivable a ts) ek     where       v = vertex k (s, p)       -- Look up vertex in k@@ -157,6 +166,8 @@       err = const $ error "Cohort.solved: got an outbound term"       ct' = substitute subst ct -- Mapped critical term       escape' = S.map (substitute subst) escape+      mappedTargetTerms = S.map (substitute subst) (targetTerms ct escape)+      targetTermsDiff = S.difference (targetTerms ct' escape') mappedTargetTerms       vs = addSendingBefore S.empty v       ts = S.map (evtTerm . event) vs -- Outbound predecessors       (a, _) = avoid k@@ -423,7 +434,7 @@     if useEcapeSetInTargetTerms then        targetTermsWithEscapeSet     else-       S.difference  targetTermsWithEscapeSet escape+       S.difference targetTermsWithEscapeSet escape     where       targetTermsWithEscapeSet = S.fold f (S.singleton ct) escape       f t ts =@@ -443,7 +454,12 @@ cowt :: Algebra t p g s e c => t -> Set t ->         Trace t p g s e c -> [(g, s)] -> [(g, s)] cowt ct escape c substs =-    concatMap (cowt0 ct escape c) substs+    nubSubst $ concatMap (cowt0 ct escape c) substs++-- Remove gen substs pairs with the same substs.+nubSubst :: Algebra t p g s e c => [(g, s)] -> [(g, s)]+nubSubst substs =+    L.nubBy (\(_, s) (_, s') -> s == s') substs  -- Handle one substitution at a time. cowt0 :: Algebra t p g s e c => t -> Set t ->
src/CPSA/Lib/Notation.hs view
@@ -79,7 +79,7 @@ -- Thus ((a b text) (k skey)) => (text a, b; skey k) decl :: Int -> SExpr a -> Pretty decl indent (L _ xs@(_:_:_)) =-    blo indent $ sort : str " " : aft "," "" vars+    blo indent (aft "," ":" vars ++ [brk 1, sort])     where       (sort, vars) = split [] xs       split vars [S _ sort] = (str sort, reverse vars)
src/CPSA/Lib/Protocol.hs view
@@ -10,7 +10,7 @@     tterms, originates, originationPos, acquiredPos, usedPos, Role,     rname, rvars, rtrace, rnon, runique, rcomment, rsearch, rnorig,     ruorig, mkRole, varSubset, varsInTerms, addVars, Prot, mkProt,-    pname, alg, pgen, roles, pcomment, flow) where+    pname, alg, pgen, roles, varsAllAtoms, pcomment, flow) where  import qualified Data.List as L import qualified Data.Set as S@@ -214,6 +214,7 @@              alg :: !String,    -- Name of the algebra              pgen :: !g,        -- Initial variable generator              roles :: ![Role t p g s e c],+             varsAllAtoms :: !Bool,   -- Are all role variables atoms?              pcomment :: [SExpr ()] }  -- Comments from the input     deriving Show @@ -222,4 +223,7 @@           g -> [Role t p g s e c] -> [SExpr ()] -> Prot t p g s e c mkProt name alg gen roles comment =     Prot { pname = name, alg = alg, pgen = gen,-           roles = roles, pcomment = comment }+           roles = roles, pcomment = comment,+           varsAllAtoms = all roleVarsAllAtoms roles }+    where+      roleVarsAllAtoms role = all isAtom (rvars role)
src/CPSA/Lib/SExpr.hs view
@@ -10,7 +10,7 @@ module CPSA.Lib.SExpr (SExpr(..), showQuoted, annotation, Pos,                        PosHandle, posHandle, load) where -import Data.Char (isSpace, isDigit, isAlphaNum, isPrint, isAscii)+import Data.Char (isSpace, isDigit, isAlphaNum, isPrint) import Data.IORef (IORef, newIORef, readIORef, writeIORef) import System.IO (Handle, hIsEOF, hGetChar, hLookAhead, hClose) @@ -105,7 +105,7 @@               setPosHandle p l c               return $ Just x         Rparen pos ->-            fail (shows pos "Close of unopened list")+            abort p (shows pos "Close of unopened list")         Eof ->             do               hClose $ pHandle p@@ -127,7 +127,7 @@               (l, c, x) <- list p pos' l c []               list p pos l c (x : xs)         Eof ->-            fail (shows pos "Unexpected end of input in list")+            abort p (shows pos "Unexpected end of input in list")  -- Read the next character returning Nothing on EOF get :: PosHandle -> IO (Maybe Char)@@ -203,7 +203,7 @@ atom p l c pos ch | isDigit ch = number p l c pos [ch] atom p l c pos ch | ch == '+' || ch == '-' = numOrSym p l c pos [ch] atom p l c pos ch | isSym ch = symbol p l c pos [ch]-atom _ _ _ pos _ = fail (shows pos "Bad char in atom")+atom p _ _ pos _ = abort p (shows pos "Bad char in atom")  -- Scan a quoted string of characters string :: PosHandle -> Int -> Int -> Pos -> String -> IO (Int, Int, Token)@@ -212,13 +212,13 @@       ch <- get p       case ch of         Nothing ->-            fail (shows pos "End of input in string")+            abort p (shows pos "End of input in string")         Just '"' ->             return (l, c + 1, Atom (Q pos (seqrev s)))         Just ch | isStr ch ->             string p l (c + 1) pos (ch : s)         Just _ ->-            fail (shows pos "Bad char for string")+            abort p (shows pos "Bad char for string")  -- Scan a sequence of digits number :: PosHandle -> Int -> Int -> Pos -> String -> IO (Int, Int, Token)@@ -233,7 +233,7 @@               _ <- hGetChar $ pHandle p               number p l (c + 1) pos (ch : s)         Just ch | isSym ch ->-            fail (shows pos "Bad char after number")+            abort p (shows pos "Bad char after number")         Just _ ->             return (l, c, Atom (N pos (read (seqrev s)))) @@ -272,14 +272,37 @@  -- A symbol is made from alphanumeric characters or special -- characters.  A symbol may not start with a digit, or with a plus or--- minus sign followed by a digit.-isSym :: Char -> Bool-isSym c =  isAlphaNum c || elem c specialChars+-- minus sign followed by a digit.  The special characters are+-- "+-*/<=>!?:$%_&~^". -specialChars :: String-specialChars = "+-*/<=>!?:$%_&~^"+isSym :: Char -> Bool+isSym '+' = True+isSym '-' = True+isSym '*' = True+isSym '/' = True+isSym '<' = True+isSym '=' = True+isSym '>' = True+isSym '!' = True+isSym '?' = True+isSym ':' = True+isSym '$' = True+isSym '%' = True+isSym '_' = True+isSym '&' = True+isSym '~' = True+isSym '^' = True+isSym c = isAlphaNum c --- A string is made from alphanumeric characters or an extension of the--- special characters.+-- A string is made from printable characters. isStr :: Char -> Bool-isStr c = isPrint c && isAscii c && c /= '"' && c /= '\\'+isStr '"' = False+isStr '\\' = False+isStr c = isPrint c++-- Close input handle and then report failure+abort :: PosHandle -> String -> IO a+abort p msg =+    do+      hClose $ pHandle p+      fail msg
+ src/cpsaextras/Main.scala view
@@ -0,0 +1,47 @@+package cpsaextras++import java.io._+import java.util.ResourceBundle;++object Main {++  /**+   * @param args the command line arguments+   */+  def main(args: Array[String]): Unit = {+    if (args.length != 1) {+      println("Usage: cpsaextras INPUT")+      println(getVersion())+    }+    else {+      val in = new BufferedReader(new FileReader(args(0)))+      val sr = new SExprReader(args(0), in)+      val out = new PrintWriter(System.out)+      while (true) {+	val x = sr.read()+	if (x == null) {+	  out.close()+	  return+	}+	Printer.pp(out, 80, 2, x)+	out.println()+	out.println()+      }+    }+  }++  private var resources: ResourceBundle = null++  private val VERSION_RESOURCES = "cpsaextras/version"++  /**+   * Get program name and a version number from a resource.+   */+  def getVersion() = {+    if (resources == null)+      resources = ResourceBundle.getBundle(VERSION_RESOURCES)+    val program = resources.getString("program")+    val version = resources.getString("version")+    program + " " + version+  }+}
+ src/cpsaextras/Pretty.scala view
@@ -0,0 +1,159 @@+/*+ * A simple pretty printer+ *+ * The alogithm is by Lawrence C. Paulson, who simplified an algorithm+ * by Derek C. Oppen.+ *+ * Derek C. Oppen, Prettyprinting, ACM Transactions on Programming+ * Languages and Systems, Vol 2, No. 4, October 1980, Pages 465-483.+ *+ * Copyright (c) 2010 The MITRE Corporation+ *+ * This program is free software: you can redistribute it and/or modify+ * it under the terms of the BSD License as published by the University+ * of California.+ */++/* A pretty printer based on ML programs with the following copyright++(**** ML Programs from Chapter 8 of++  ML for the Working Programmer, 2nd edition+  by Lawrence C. Paulson, Computer Laboratory, University of Cambridge.+  (Cambridge University Press, 1996)++Copyright (C) 1996 by Cambridge University Press.+Permission to copy without fee is granted provided that this copyright+notice and the DISCLAIMER OF WARRANTY are included in any copy.++DISCLAIMER OF WARRANTY.  These programs are provided `as is' without+warranty of any kind.  We make no warranties, express or implied, that the+programs are free of error, or are consistent with any particular standard+of merchantability, or that they will meet your requirements for any+particular application.  They should not be relied upon for solving a+problem whose incorrect solution could result in injury to a person or loss+of property.  If you do use the programs or functions in such a manner, it+is at your own risk.  The author and publisher disclaim all liability for+direct, incidental or consequential damages resulting from your use of+these programs or functions.+****)++*/++package cpsaextras++import java.io.PrintWriter++/** Abstract data type for pretty printing. */+sealed abstract class Pretty+private case class Str(s: String) extends Pretty+private case class Brk(n: Int) extends Pretty+private case class Blo(l: List[Pretty], indent: Int, n: Int) extends Pretty+private case class Grp(l: List[Pretty], indent: Int, n: Int) extends Pretty++object Pretty {+  // Exported constructors++  /** Create a string.+   * @param s string to be printed+   */+  def str(s: String): Pretty = {+    Str(s)+  }++  /** Create a break point.+   * @param n number of spaces+   */+  def brk(n: Int): Pretty = {+    Brk(n)+  }++  /** Create an indentation block.  When pretty printing, any of the+   * break points in the list can be used.+   * @param indent number of spaces to indent+   * @param es a list that includes break points+   */+  def blo(indent: Int, es: List[Pretty]): Pretty = {+    Blo(es, indent, len(es, 0))+  }++  /** Create an indentation group.  When pretty printing,+   * either all or none of the break points are used.+   * @param indent number of spaces to indent+   * @param es a list that includes break points+   */+  def grp(indent: Int, es: List[Pretty]): Pretty = {+    Grp(es, indent, len(es, 0))+  }++  private def len(es: List[Pretty], n: Int): Int = {+    es match {+      case Nil => n+      case e :: es => len(es, size(e) + n)+    }+  }++  private def size(e: Pretty): Int = {+    e match {+      case Str(s) => s.length+      case Brk(n) => n+      case Blo(_, _, n) => n+      case Grp(_, _, n) => n+    }+  }++  /** Print an object of type Pretty. */+  def pr(w: PrintWriter, margin: Int, e: Pretty): Unit = {+    printing(w, margin, List(e), margin, 0, false, margin)+  }++  private def printing(w: PrintWriter, margin: Int, es: List[Pretty],+		       blockspace:Int, after: Int, force: Boolean,+		       space: Int): Int = {+    es match {+      case Nil => space+      case e :: es =>+	val space1 = e match {+	  case Str(s) =>		// Place a string+	    w.print(s)+	    space - s.length+	  case Brk(n) =>		// Place breakable space+	    if (!force && n + breakdist(es, after) <= space)+	      blanks(w, n, space)	// Don't break+	    else {+	      w.println()		// Break+	      blanks(w, margin - blockspace, margin)+	    }+	  case Blo(bes, indent, _) =>	// Place a block+	    printing(w, margin, bes, space - indent,+		     breakdist(es, after), false, space)+	  case Grp(bes, indent, n) =>	// Place a group+	    val dist = breakdist(es, after)+	    printing(w, margin, bes, space - indent,+		     dist, n + dist > space, space)+	}+	printing(w, margin, es, blockspace, after, force, space1)+    }+  }++  // Find the distance to the nearest breakable space+  private def breakdist(es: List[Pretty], after: Int): Int = {+    es match {+      case Nil => after+      case Str(s) :: es => s.length + breakdist(es, after)+      case Brk(_) :: es => 0+      case Blo(_, _, n) :: es => n + breakdist(es, after)+      case Grp(_, _, n) :: es => n + breakdist(es, after)+    }+  }++  // Place spaces+  private def blanks(w: PrintWriter, n: Int, space: Int): Int = {+    if (n <= 0)+      space+    else {+      w.print(' ')+      blanks(w, n - 1, space - 1)+    }+  }+}
+ src/cpsaextras/Printer.scala view
@@ -0,0 +1,122 @@+/*+ * A CPSA specific pretty printer+ *+ * Copyright (c) 2009 The MITRE Corporation+ *+ * This program is free software: you can redistribute it and/or+ * modify it under the terms of the BSD License as published by the+ * University of California.+ */++package cpsaextras++import java.io.PrintWriter++object Printer {++  /** CPSA specific pretty printer.+   * The pretty printer that indents a constant amount for each list.  The+   * top-level lists are laid out specially.  Whenever some breaks+   * occur, all breaks are forced.  Also, breaks are only placed before+   * strings and lists.  CPSA protocols are handled specially.  Each+   * defrole is handled as are top-level lists.+   *+   * @param w the output writer+   * @param margin the width to be filled+   * @param indent the number of spaces in an indent+   * @param x the S-expression to be pretty printed+   */+  def pp[A](w: PrintWriter, margin: Int, indent: Int, x: SExpr[A]): Unit = {+    Pretty.pr(w, margin, pretty(indent, x))+  }++  private def pretty[A](indent: Int, x: SExpr[A]): Pretty = {+    x match {+      case L(_, (x@S(_, "defprotocol")) :: xs) =>+	roles(indent, xs, List(block(indent, x), Pretty.str("(")))+      case x@L(_, S(_, "defmacro") :: _) =>+	block(indent, x)+      case x@L(_, S(_, "herald") :: _) =>+	block(indent, x)+      case _ =>+	group(indent, x)+    }+  }++  // Role specific pretty printer+  private def roles[A](indent: Int, xs: List[SExpr[A]],+		       acc: List[Pretty]): Pretty = {+    xs match {+      case Nil =>+	Pretty.grp(indent, (Pretty.str(")") :: acc).reverse)+      case (x@S(_, _)) :: xs =>+	roles(indent, xs, block(indent, x) :: Pretty.str(" ") :: acc)+      case (x@Q(_, _)) :: xs =>+	roles(indent, xs, block(indent, x) :: Pretty.brk(1) :: acc)+      case (x@N(_, _)) :: xs =>+	roles(indent, xs, block(indent, x) :: Pretty.str(" ") :: acc)+      case (x@L(_, S(_, "defrole") :: _)) :: xs =>+	roles(indent, xs, group(indent, x) :: Pretty.brk(1) :: acc)+      case (x@L(_, _)) :: xs =>+	roles(indent, xs, block(indent, x) :: Pretty.brk(1) :: acc)+    }+  }++  // A pretty printer for top-level S-expressions+  private def group[A](indent: Int, x: SExpr[A]): Pretty = {+    x match {+      case L(a, l) => grouplist(indent, l)+      case _ => block(indent, x)+    }+  }++  private def grouplist[A](indent: Int, xs: List[SExpr[A]]): Pretty = {+    xs match {+      case Nil => Pretty.str("()")+      case x :: xs =>+	grouprest(indent, xs, List(block(indent, x), Pretty.str("(")))+    }+  }++  private def grouprest[A](indent: Int, xs: List[SExpr[A]],+			acc: List[Pretty]): Pretty = {+    xs match {+      case Nil =>+	Pretty.grp(indent, (Pretty.str(")") :: acc).reverse)+      case (x@S(_, _)) :: xs =>+	grouprest(indent, xs, block(indent, x) :: Pretty.str(" ") :: acc)+      case (x@Q(_, _)) :: xs =>+	grouprest(indent, xs, block(indent, x) :: Pretty.brk(1) :: acc)+      case (x@N(_, _)) :: xs =>+	grouprest(indent, xs, block(indent, x) :: Pretty.str(" ") :: acc)+      case (x@L(_, _)) :: xs =>+	grouprest(indent, xs, block(indent, x) :: Pretty.brk(1) :: acc)+    }+  }++  // A pretty printer for interior lists using block style breaking.+  private def block[A](indent: Int, x: SExpr[A]): Pretty = {+    x match {+      case L(a, l) => blocklist(indent, l)+      case _ => Pretty.str(x.toString())+    }+  }++  private def blocklist[A](indent: Int, xs: List[SExpr[A]]): Pretty = {+    xs match {+      case Nil => Pretty.str("()")+      case x :: xs =>+	blockrest(indent, xs, List(block(indent, x), Pretty.str("(")))+    }+  }++  private def blockrest[A](indent: Int, xs: List[SExpr[A]],+			acc: List[Pretty]): Pretty = {+    xs match {+      case Nil =>+	Pretty.blo(indent, (Pretty.str(")") :: acc).reverse)+      case x :: xs =>+	blockrest(indent, xs, block(indent, x) :: Pretty.brk(1) :: acc)+    }+  }+}
+ src/cpsaextras/SExpr.scala view
@@ -0,0 +1,282 @@+/*+ * S-expressions+ *+'* Copyright (c) 2010 The MITRE Corporation+ *+ * This program is free software: you can redistribute it and/or modify+ * it under the terms of the BSD License as published by the University+ * of California.+ */++package cpsaextras++import java.io._++/**+ * Annotated S-expressions.  Each S-expression can be annotated with+ * something of type A.+ */+sealed abstract class SExpr[A] {+  /** The annotation. */+  val a: A+}+/** Case of a symbol. */+case class S[A](a: A, s: String) extends SExpr[A] {+  override def toString(): String = {+    s.toString()+  }+}+/** Case of a string. */+case class Q[A](a: A, q: String) extends SExpr[A] {+  override def toString(): String = {+    "\"" + q.toString() + "\""+  }+}+/** Case of a number. */+case class N[A](a: A, n: Int) extends SExpr[A] {+  override def toString(): String = {+    n.toString()+  }+}+/** Case of a list of S-expressions. */+case class L[A](a: A, l: List[SExpr[A]]) extends SExpr[A] {+  override def toString(): String = {+    l.toString()+  }+}++/** The file position annotation. */+final case class Pos(file: String, line: Int, column: Int) {+  override def toString (): String = {+    file + ":" + line + ":" + column + ": "+  }+}++/** An S-expression reader.+ *+ * @param file name of the input file+ * @param in stream associated with the input file+ */+class SExprReader(file: String, in: Reader) {+  private var line = 1			// Stream line number+  private var column = 1		// Stream column++  // A scanner token+  private sealed abstract class Token+  // A token for a non-list S-expression+  private case class Atom(a: SExpr[Pos]) extends Token+  // A token for the left parenthesis+  private case class LParen(p: Pos) extends Token+  // A token for the right parenthesis+  private case class RParen(p: Pos) extends Token+  // A token for end-of-file+  private case object Eof extends Token++  /**+   * Reads an S-expression annotated with file positions.+   * @return an S-expression or null on end-of-file+   */+  def read(): SExpr[Pos] = {+    scan() match {+      case Atom(a) => a+      case LParen(p) => list(p, Nil)+      case RParen(p) =>+	in.close()+	throw new IOException(p + "Close of unopened list")+      case Eof =>+	in.close()+	null+    }+  }++  // Parse a non top-level list+  private def list(pos: Pos, acc: List[SExpr[Pos]]): SExpr[Pos] = {+    scan() match {+      case Atom(a) => list(pos, a :: acc)+      case LParen(p) => list(pos, list(p, Nil) :: acc)+      case RParen(_) => L(pos, acc.reverse)+      case Eof =>+	in.close()+	throw new IOException(pos + "Unexpected end of input in list")+    }+  }++  // Scanner++  // Consume white space and then dispatch on the first character+  private def scan(): Token = {+    val ch = get()+    if (Character.isWhitespace(ch))+      scan()+    else ch match {+      case -1 => Eof+      case '(' => LParen(Pos(file, line, column))+      case ')' => RParen(Pos(file, line, column))+      case ';' => comment()+      case _ => atom(ch)+    }+  }++  // Consume a comment and then resume scanning+  private def comment(): Token = {+    get() match {+      case -1 => Eof+      case '\n' => scan()+      case _ => comment()+    }+  }++  // Scan an atom+  private def atom(ch: Int): Token = {+    val p = Pos(file, line, column)	// Position of atom+    ch match {+      case '"' => string(p, new StringBuilder())+      case '+' => numOrSym(p, singleton(ch))+      case '-' => numOrSym(p, singleton(ch))+      case _ =>+	if (Character.isDigit(ch))+	  number(p, singleton(ch))+	else if (isSym(ch))+	  symbol(p, singleton(ch))+	else {+	  in.close()+	  throw new IOException(p + "Bad char in atom")+	}+    }+  }++  // Create a string buffer with one character+  private def singleton(ch: Int): StringBuilder = {+    val sb = new StringBuilder()+    sb.append(ch.toChar)+    sb+  }++  // Scan a string atom+  private def string(p: Pos, sb: StringBuilder): Token = {+    val ch = get()+    if (ch == -1) {+      in.close()+      throw new IOException(p + "End of input in string")+    }+    else if (ch == '"')+      Atom(Q(p, sb.toString().intern()))+    else if (isStr(ch)) {+      sb.append(ch.toChar)+      string(p, sb)+    }+    else {+      in.close()+      throw new IOException(p + "Bad char for string")+    }+  }++  // Scan a number atom+  private def number(p: Pos, sb: StringBuilder): Token = {+    val ch = peek()+    if (ch == -1)+      Atom(N(p, Integer.parseInt(sb.toString())))+    else if (Character.isDigit(ch)) {+      get()+      sb.append(ch.toChar)+      number(p, sb)+    }+    else if (isSym(ch)) {+      in.close()+      throw new IOException(p + "Bad char after number")+    }+    else+      Atom(N(p, Integer.parseInt(sb.toString())))+  }++  // See if an atom is an number or a symbol+  private def numOrSym(p: Pos, sb: StringBuilder): Token = {+    val ch = peek()+    if (ch == -1)+      symbol(p, sb)+    else if (Character.isDigit(ch))+      number(p, sb)+    else+      symbol(p, sb)+  }++  // Scan a symbol+  private def symbol(p: Pos, sb: StringBuilder): Token = {+    val ch = peek()+    if (ch == -1)+      Atom(S(p, sb.toString().intern()))+    else if (isSym(ch)) {+      get()+      sb.append(ch.toChar)+      symbol(p, sb)+    }+    else+      Atom(S(p, sb.toString().intern()))+  }++  // Is character a constituent of a symbol?+  private def isSym(ch: Int) = {+    ch match {+      case '+' => true+      case '-' => true+      case '*' => true+      case '/' => true+      case '<' => true+      case '=' => true+      case '>' => true+      case '!' => true+      case '?' => true+      case ':' => true+      case '$' => true+      case '%' => true+      case '_' => true+      case '&' => true+      case '~' => true+      case '^' => true+      case _ => Character.isLetterOrDigit(ch)+    }+  }++  // Is character a constituent of a string?+  private def isStr(ch: Int) = {+    ch match {+      case '"' => false+      case '\\' => false+      case _ => !Character.isISOControl(ch)+    }+  }++  // Character reader with look ahead++  private var peeked = false		// Is look ahead active?+  private var seen = 0			// peeked character++  // Get next character and set the current file position.+  private def get(): Int = {+    val next =+      if (peeked) {+	peeked = false+	seen+      }+      else+	in.read()+    if (next == '\n') {+      line += 1+      column = 1+    }+    else+      column += 1+    next+  }++  // Read ahead if need be+  private def peek(): Int = {+    if (peeked)+      seen+    else {+      peeked = true+      seen = in.read()+      seen+    }+  }+}
tst/blanchet.tst view
@@ -1,7 +1,7 @@ (herald "Blanchet's Simple Example Protocol"   (comment "There is a flaw in this protocol by design")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol blanchet basic
tst/completeness-test.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol completeness-test basic
tst/crushing.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol crushing basic
tst/dass_simple.tst view
@@ -1,6 +1,6 @@ (herald "Distributed Authentication Security Service Protocol Variants") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol dass-simple basic
tst/denning-sacco.tst view
@@ -1,6 +1,6 @@ (herald "Denning-Sacco Protocol") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol denning-sacco basic
tst/deorig_contract.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol deorig-contract basic
tst/deorig_simple.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol deorig-simple basic
+ tst/dh_cert.scm view
@@ -0,0 +1,51 @@+(herald "Diffie-Hellman with Certificate" (algebra diffie-hellman))++(defmacro (cert p ps-ltv)+  (enc "cert" p (exp (gen) ps-ltv) (privk "certify" ca)))++(defmacro (hash x) (enc "hash" x))++(defprotocol dh-cert diffie-hellman+  (defrole ca+    (vars (p ca name) (ps-ltv expn))+    (trace (send (cert p ps-ltv)))+    (uniq-orig ps-ltv))+  (defrole init+    (vars (a b ca name) (as-ltv bs-ltv x expn) (gB gy base) (hk akey))+    (trace (send (cat (exp (gen) as-ltv) (cert a as-ltv) (exp (gen) x)))+      (recv (cat gB (cert b bs-ltv) gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv) (cert a as-ltv) (exp (gen) x))+          (cat gB (cert b bs-ltv) gy)+          (hash (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv) (cert a as-ltv) (exp (gen) x))+          (cat gB (cert b bs-ltv) gy)+          (hash (cat (exp gB x) (exp gy as-ltv))))))+    (uniq-orig as-ltv x))+  (defrole resp+    (vars (a b ca name) (bs-ltv as-ltv y expn) (gB gA gx base)+      (hk akey))+    (trace (recv (cat gA (cert a as-ltv) gx))+      (send (cat (exp (gen) bs-ltv) (cert b bs-ltv) (exp (gen) y)))+      (recv+        (enc "tag1" (cat gA (cert a as-ltv) gx)+          (cat (exp (gen) bs-ltv) (cert b bs-ltv) (exp (gen) y))+          (hash (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2" (cat gA (cert a as-ltv) gx)+          (cat (exp (gen) bs-ltv) (cert b bs-ltv) (exp (gen) y))+          (hash (cat (exp gx bs-ltv) (exp gA y))))))+    (uniq-orig bs-ltv y)))++(defskeleton dh-cert+  (vars (ca name))+  (defstrand init 4 (ca ca))+  (non-orig (privk ca)))++(defskeleton dh-cert+  (vars (ca name))+  (defstrand resp 4 (ca ca))+  (non-orig (privk ca)))
+ tst/dh_cert.tst view
@@ -0,0 +1,2091 @@+(herald "Diffie-Hellman with Certificate" (algebra diffie-hellman))++(comment "CPSA 2.2.2")+(comment "All input read")++(defprotocol dh-cert diffie-hellman+  (defrole ca+    (vars (p ca name) (ps-ltv expn))+    (trace+      (send (enc "cert" p (exp (gen) ps-ltv) (privk "certify" ca))))+    (uniq-orig ps-ltv))+  (defrole init+    (vars (a b ca name) (as-ltv bs-ltv x expn) (gB gy base))+    (trace+      (send+        (cat (exp (gen) as-ltv)+          (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+          (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+    (uniq-orig as-ltv x))+  (defrole resp+    (vars (a b ca name) (bs-ltv as-ltv y expn) (gA gx base))+    (trace+      (recv+        (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+          gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+    (uniq-orig bs-ltv y)))++(defskeleton dh-cert+  (vars (ca a b name) (gB gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB gB) (gy gy) (as-ltv as-ltv)+    (bs-ltv bs-ltv) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))))+  (label 0)+  (unrealized (0 3))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)) ((1 3) (0 3)))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation encryption-test (added-strand resp 4)+    (enc "tag2"+      (cat (exp (gen) as-ltv)+        (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+        (exp (gen) x)) (exp (gen) bs-ltv)+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+      (exp (gen) y)+      (enc "hash"+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    (0 3))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 1)+  (parent 0)+  (seen 3)+  (unrealized (1 2))+  (comment "3 in cohort - 2 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gB gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB gB) (gy gy) (as-ltv as-ltv)+    (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+  (precedes ((1 1) (0 3)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test+    (added-listener (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+    (enc "tag2"+      (cat (exp (gen) as-ltv)+        (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+        (exp (gen) x)) gB+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+      (enc "hash" (cat (exp gB x) (exp gy as-ltv)))) (0 3))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+  (label 2)+  (parent 0)+  (unrealized (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (precedes ((0 0) (1 0)) ((0 2) (1 2)) ((1 1) (0 1)) ((1 3) (0 3)))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation encryption-test (added-strand init 3)+    (enc "tag1"+      (cat (exp (gen) as-ltv)+        (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+        (exp (gen) x)) (exp (gen) bs-ltv)+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+      (exp (gen) y)+      (enc "hash"+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    (1 2))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 3)+  (parent 1)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener+    (enc "hash"+      (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)) ((1 3) (0 3)) ((2 1) (1 2)))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation encryption-test+    (added-listener+      (enc "hash"+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    (enc "tag1"+      (cat (exp (gen) as-ltv)+        (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+        (exp (gen) x)) (exp (gen) bs-ltv)+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+      (exp (gen) y)+      (enc "hash"+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    (1 2))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (enc "hash"+         (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+      (send+        (enc "hash"+          (cat (exp (exp (gen) bs-ltv) x)+            (exp (exp (gen) as-ltv) y))))))+  (label 4)+  (parent 1)+  (unrealized (2 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gB gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB gB) (gy gy) (as-ltv as-ltv)+    (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+  (deflistener (cat (exp gB x) (exp gy as-ltv)))+  (precedes ((0 0) (2 0)) ((1 1) (0 3)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test+    (added-listener (cat (exp gB x) (exp gy as-ltv)))+    (enc "hash" (cat (exp gB x) (exp gy as-ltv))) (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+    ((recv (cat (exp gB x) (exp gy as-ltv)))+      (send (cat (exp gB x) (exp gy as-ltv)))))+  (label 5)+  (parent 2)+  (seen 8 9)+  (unrealized (2 0))+  (comment "5 in cohort - 3 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation generalization deleted (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 6)+  (parent 3)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener+    (enc "hash"+      (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+  (deflistener+    (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)) ((1 1) (3 0)) ((1 3) (0 3))+    ((2 1) (1 2)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation encryption-test+    (added-listener+      (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+    (enc "hash"+      (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (enc "hash"+         (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+      (send+        (enc "hash"+          (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))))+    ((recv (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+      (send+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))))+  (label 7)+  (parent 4)+  (unrealized (3 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gy base) (as-ltv bs-ltv expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy gy)+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x as-ltv))+  (deflistener (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))+  (deflistener (cat (exp (gen) as-ltv) (exp gy as-ltv)))+  (precedes ((0 0) (2 0)) ((1 1) (0 3)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv)+  (operation encryption-test (added-strand init 1) (exp (gen) as-ltv)+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) as-ltv)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv)))))+    ((recv (cat (exp (gen) as-ltv) (exp gy as-ltv)))+      (send (cat (exp (gen) as-ltv) (exp gy as-ltv)))))+  (label 8)+  (parent 5)+  (seen 13)+  (unrealized (2 0))+  (comment "5 in cohort - 2 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy gy)+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))+  (deflistener (cat (exp (gen) x) (exp gy as-ltv)))+  (precedes ((0 0) (2 0)) ((1 1) (0 3)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test (added-strand init 1) (exp (gen) x) (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp (gen) x) (exp gy as-ltv)))))+    ((recv (cat (exp (gen) x) (exp gy as-ltv)))+      (send (cat (exp (gen) x) (exp gy as-ltv)))))+  (label 9)+  (parent 5)+  (seen 13 15)+  (unrealized (2 0))+  (comment "5 in cohort - 2 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gB gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB gB) (gy gy) (as-ltv as-ltv)+    (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+  (deflistener (cat (exp gB x) (exp gy as-ltv)))+  (deflistener x)+  (precedes ((0 0) (3 0)) ((1 1) (0 3)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test (added-listener x) (exp gB x) (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp gB x) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+    ((recv (cat (exp gB x) (exp gy as-ltv)))+      (send (cat (exp gB x) (exp gy as-ltv)))) ((recv x) (send x)))+  (label 10)+  (parent 5)+  (unrealized (2 0) (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv x y)+  (operation generalization forgot bs-ltv)+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 11)+  (parent 6)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener+    (enc "hash"+      (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+  (deflistener+    (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+  (deflistener bs-ltv)+  (precedes ((0 0) (1 0)) ((1 1) (0 1)) ((1 1) (4 0)) ((1 3) (0 3))+    ((2 1) (1 2)) ((3 1) (2 0)) ((4 1) (3 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv bs-ltv x y)+  (operation encryption-test (added-listener bs-ltv)+    (exp (exp (gen) bs-ltv) x) (3 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((recv+       (enc "hash"+         (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+      (send+        (enc "hash"+          (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))))+    ((recv (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y)))+      (send+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    ((recv bs-ltv) (send bs-ltv)))+  (label 12)+  (parent 7)+  (unrealized (3 0) (4 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x as-ltv))+  (deflistener (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv))))+  (deflistener (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))+  (precedes ((0 0) (2 0)) ((1 1) (0 3)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv)+  (operation encryption-test (added-strand init 1) (exp (gen) as-ltv)+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) as-ltv)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv))))+      (send (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+    ((recv (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))+      (send (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+  (label 13)+  (parent 8)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gy base) (as-ltv bs-ltv expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy gy)+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x as-ltv))+  (deflistener (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))+  (deflistener (cat (exp (gen) as-ltv) (exp gy as-ltv)))+  (deflistener as-ltv)+  (precedes ((0 0) (3 0)) ((1 1) (0 3)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv)+  (operation encryption-test (added-listener as-ltv) (exp gy as-ltv)+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) as-ltv)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp (gen) as-ltv) (exp gy as-ltv)))))+    ((recv (cat (exp (gen) as-ltv) (exp gy as-ltv)))+      (send (cat (exp (gen) as-ltv) (exp gy as-ltv))))+    ((recv as-ltv) (send as-ltv)))+  (label 14)+  (parent 8)+  (unrealized (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv))))+  (deflistener (cat (exp (gen) x) (exp (gen) as-ltv)))+  (precedes ((0 0) (2 0)) ((1 1) (0 3)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test (added-strand init 1) (exp (gen) as-ltv)+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv))))+      (send (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv)))))+    ((recv (cat (exp (gen) x) (exp (gen) as-ltv)))+      (send (cat (exp (gen) x) (exp (gen) as-ltv)))))+  (label 15)+  (parent 9)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gy base) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy gy)+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (deflistener (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))+  (deflistener (cat (exp (gen) x) (exp gy as-ltv)))+  (deflistener as-ltv)+  (precedes ((0 0) (3 0)) ((1 1) (0 3)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation encryption-test (added-listener as-ltv) (exp gy as-ltv)+    (2 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) x) (exp gy as-ltv))))+      (send (enc "hash" (cat (exp (gen) x) (exp gy as-ltv)))))+    ((recv (cat (exp (gen) x) (exp gy as-ltv)))+      (send (cat (exp (gen) x) (exp gy as-ltv))))+    ((recv as-ltv) (send as-ltv)))+  (label 16)+  (parent 9)+  (unrealized (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation generalization forgot y)+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 17)+  (parent 11)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x as-ltv))+  (deflistener (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))+  (precedes ((0 0) (1 0)) ((1 1) (0 3)))+  (non-orig (privk ca))+  (uniq-orig as-ltv)+  (operation generalization deleted (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) as-ltv)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv))))))+    ((recv (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))+      (send (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+  (label 18)+  (parent 13)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (deflistener (cat (exp (gen) x) (exp (gen) as-ltv)))+  (precedes ((0 0) (1 0)) ((1 1) (0 3)))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation generalization deleted (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv))))))+    ((recv (cat (exp (gen) x) (exp (gen) as-ltv)))+      (send (cat (exp (gen) x) (exp (gen) as-ltv)))))+  (label 19)+  (parent 15)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x y bs-ltv-0 expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv-0) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation generalization separated bs-ltv-0)+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv-0) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv-0) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv-0) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 20)+  (parent 17)+  (unrealized)+  (shape))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x as-ltv))+  (non-orig (privk ca))+  (uniq-orig as-ltv)+  (operation generalization deleted (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) as-ltv)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) as-ltv)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) as-ltv) (exp (gen) as-ltv)))))))+  (label 21)+  (parent 18)+  (seen 22)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (as-ltv bs-ltv x expn))+  (defstrand init 4 (a a) (b b) (ca ca) (gB (gen)) (gy (gen))+    (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (non-orig (privk ca))+  (uniq-orig as-ltv x)+  (operation generalization deleted (1 0))+  (traces+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (gen)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) (gen)+          (enc "hash" (cat (exp (gen) x) (exp (gen) as-ltv)))))))+  (label 22)+  (parent 19)+  (unrealized)+  (shape))++(comment "Nothing left to do")++(defprotocol dh-cert diffie-hellman+  (defrole ca+    (vars (p ca name) (ps-ltv expn))+    (trace+      (send (enc "cert" p (exp (gen) ps-ltv) (privk "certify" ca))))+    (uniq-orig ps-ltv))+  (defrole init+    (vars (a b ca name) (as-ltv bs-ltv x expn) (gB gy base))+    (trace+      (send+        (cat (exp (gen) as-ltv)+          (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+          (exp (gen) x)))+      (recv+        (cat gB (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          gy))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv)))))+      (recv+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) gB+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca)) gy+          (enc "hash" (cat (exp gB x) (exp gy as-ltv))))))+    (uniq-orig as-ltv x))+  (defrole resp+    (vars (a b ca name) (bs-ltv as-ltv y expn) (gA gx base))+    (trace+      (recv+        (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+          gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+    (uniq-orig bs-ltv y)))++(defskeleton dh-cert+  (vars (ca a b name) (gA gx base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx gx) (bs-ltv bs-ltv)+    (as-ltv as-ltv) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))))+  (label 23)+  (unrealized (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y x expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (defstrand init 3 (a a) (b b) (ca ca) (gB (exp (gen) bs-ltv))+    (gy (exp (gen) y)) (as-ltv as-ltv) (bs-ltv bs-ltv) (x x))+  (precedes ((0 1) (1 1)) ((1 0) (0 0)) ((1 2) (0 2)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv as-ltv y x)+  (operation encryption-test (added-strand init 3)+    (enc "tag1"+      (cat (exp (gen) as-ltv)+        (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+        (exp (gen) x)) (exp (gen) bs-ltv)+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+      (exp (gen) y)+      (enc "hash"+        (cat (exp (exp (gen) bs-ltv) x) (exp (exp (gen) as-ltv) y))))+    (0 2))+  (traces+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y))))))+    ((send+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (recv+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (send+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 24)+  (parent 23)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA gx base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx gx) (bs-ltv bs-ltv)+    (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+  (precedes ((1 1) (0 2)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test+    (added-listener (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+    (enc "tag1"+      (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca)) gx)+      (exp (gen) bs-ltv)+      (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+      (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+    (0 2))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+    ((recv (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+      (send (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+  (label 25)+  (parent 23)+  (unrealized (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y x expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv as-ltv y x)+  (operation generalization deleted (1 0))+  (traces+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 26)+  (parent 24)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA gx base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx gx) (bs-ltv bs-ltv)+    (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+  (deflistener (cat (exp gx bs-ltv) (exp gA y)))+  (precedes ((0 1) (2 0)) ((1 1) (0 2)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test+    (added-listener (cat (exp gx bs-ltv) (exp gA y)))+    (enc "hash" (cat (exp gx bs-ltv) (exp gA y))) (1 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+    ((recv (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+      (send (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+    ((recv (cat (exp gx bs-ltv) (exp gA y)))+      (send (cat (exp gx bs-ltv) (exp gA y)))))+  (label 27)+  (parent 25)+  (seen 29 30)+  (unrealized (2 0))+  (comment "5 in cohort - 3 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y x expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y x)+  (operation generalization forgot as-ltv)+  (traces+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 28)+  (parent 26)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))+  (deflistener (cat (exp (gen) bs-ltv) (exp gA y)))+  (precedes ((0 1) (2 0)) ((1 1) (0 2)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test (added-strand resp 2) (exp (gen) bs-ltv)+    (2 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y)))))+    ((recv (cat (exp (gen) bs-ltv) (exp gA y)))+      (send (cat (exp (gen) bs-ltv) (exp gA y)))))+  (label 29)+  (parent 27)+  (seen 33 34)+  (unrealized (2 0))+  (comment "5 in cohort - 3 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA base) (bs-ltv as-ltv expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y bs-ltv))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))+  (deflistener (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))+  (precedes ((0 1) (2 0)) ((1 1) (0 2)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv)+  (operation encryption-test (added-strand resp 2) (exp (gen) bs-ltv)+    (2 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))))+    ((recv (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))+      (send (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))))+  (label 30)+  (parent 27)+  (seen 33)+  (unrealized (2 0))+  (comment "5 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA gx base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx gx) (bs-ltv bs-ltv)+    (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+  (deflistener (cat (exp gx bs-ltv) (exp gA y)))+  (deflistener bs-ltv)+  (precedes ((0 1) (3 0)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test (added-listener bs-ltv) (exp gx bs-ltv)+    (2 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         gx))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            gx) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y) (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))))+    ((recv (enc "hash" (cat (exp gx bs-ltv) (exp gA y))))+      (send (enc "hash" (cat (exp gx bs-ltv) (exp gA y)))))+    ((recv (cat (exp gx bs-ltv) (exp gA y)))+      (send (cat (exp gx bs-ltv) (exp gA y))))+    ((recv bs-ltv) (send bs-ltv)))+  (label 31)+  (parent 27)+  (unrealized (2 0) (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y x expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation generalization forgot x)+  (traces+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 32)+  (parent 28)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y bs-ltv))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv))))+  (deflistener (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))+  (precedes ((0 1) (2 0)) ((1 1) (0 2)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv)+  (operation encryption-test (added-strand resp 2) (exp (gen) bs-ltv)+    (2 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+    ((recv (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))+      (send (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+  (label 33)+  (parent 29)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y))))+  (deflistener (cat (exp (gen) bs-ltv) (exp (gen) y)))+  (precedes ((0 1) (2 0)) ((1 1) (0 2)) ((2 1) (1 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test (added-strand resp 2) (exp (gen) y) (2 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y)))))+    ((recv (cat (exp (gen) bs-ltv) (exp (gen) y)))+      (send (cat (exp (gen) bs-ltv) (exp (gen) y)))))+  (label 34)+  (parent 29)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (gA base) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))+  (deflistener (cat (exp (gen) bs-ltv) (exp gA y)))+  (deflistener y)+  (precedes ((0 1) (3 0)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation encryption-test (added-listener y) (exp gA y) (2 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp gA y)))))+    ((recv (cat (exp (gen) bs-ltv) (exp gA y)))+      (send (cat (exp (gen) bs-ltv) (exp gA y)))) ((recv y) (send y)))+  (label 35)+  (parent 29)+  (unrealized (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (gA base) (bs-ltv as-ltv expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA gA) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y bs-ltv))+  (deflistener (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))+  (deflistener (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))+  (deflistener bs-ltv)+  (precedes ((0 1) (3 0)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (2 0)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv)+  (operation encryption-test (added-listener bs-ltv) (exp gA bs-ltv)+    (2 0))+  (traces+    ((recv+       (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)))+      (recv+        (enc "tag1"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))))+      (send+        (enc "tag2"+          (cat gA (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))))+    ((recv (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))+      (send (enc "hash" (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))))+    ((recv (cat (exp (gen) bs-ltv) (exp gA bs-ltv)))+      (send (cat (exp (gen) bs-ltv) (exp gA bs-ltv))))+    ((recv bs-ltv) (send bs-ltv)))+  (label 36)+  (parent 30)+  (unrealized (3 0))+  (comment "empty cohort"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y x as-ltv-0 expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (exp (gen) as-ltv))+    (gx (exp (gen) x)) (bs-ltv bs-ltv) (as-ltv as-ltv-0) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation generalization separated as-ltv-0)+  (traces+    ((recv+       (cat (exp (gen) as-ltv)+         (enc "cert" a (exp (gen) as-ltv-0) (privk "certify" ca))+         (exp (gen) x)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv-0) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))+      (send+        (enc "tag2"+          (cat (exp (gen) as-ltv)+            (enc "cert" a (exp (gen) as-ltv-0) (privk "certify" ca))+            (exp (gen) x)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash"+            (cat (exp (exp (gen) bs-ltv) x)+              (exp (exp (gen) as-ltv) y)))))))+  (label 37)+  (parent 32)+  (unrealized)+  (shape))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y bs-ltv))+  (deflistener (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv)+  (operation generalization deleted (1 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv))))))+    ((recv (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))+      (send (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+  (label 38)+  (parent 33)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (deflistener (cat (exp (gen) bs-ltv) (exp (gen) y)))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation generalization deleted (1 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y))))))+    ((recv (cat (exp (gen) bs-ltv) (exp (gen) y)))+      (send (cat (exp (gen) bs-ltv) (exp (gen) y)))))+  (label 39)+  (parent 34)+  (unrealized)+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y bs-ltv))+  (non-orig (privk ca))+  (uniq-orig bs-ltv)+  (operation generalization deleted (1 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) bs-ltv)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) bs-ltv)))))))+  (label 40)+  (parent 38)+  (seen 41)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton dh-cert+  (vars (ca a b name) (bs-ltv as-ltv y expn))+  (defstrand resp 4 (a a) (b b) (ca ca) (gA (gen)) (gx (gen))+    (bs-ltv bs-ltv) (as-ltv as-ltv) (y y))+  (non-orig (privk ca))+  (uniq-orig bs-ltv y)+  (operation generalization deleted (1 0))+  (traces+    ((recv+       (cat (gen) (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+         (gen)))+      (send+        (cat (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)))+      (recv+        (enc "tag1"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y)))))+      (send+        (enc "tag2"+          (cat (gen)+            (enc "cert" a (exp (gen) as-ltv) (privk "certify" ca))+            (gen)) (exp (gen) bs-ltv)+          (enc "cert" b (exp (gen) bs-ltv) (privk "certify" ca))+          (exp (gen) y)+          (enc "hash" (cat (exp (gen) bs-ltv) (exp (gen) y)))))))+  (label 41)+  (parent 39)+  (unrealized)+  (shape))++(comment "Nothing left to do")
tst/dhke.tst view
@@ -1,6 +1,6 @@ (herald "Diffie-Hellman Key Exchange" (algebra diffie-hellman)) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol dhke diffie-hellman
tst/dy.tst view
@@ -1,6 +1,6 @@ (herald "Example 1.3 from 1983 Dolev-Yao Paper") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol dy basic
tst/encsig.tst view
@@ -1,7 +1,7 @@ (herald "Encrypted Signed Message Example"   (comment "Shows examples of key usage of asymmetric keys")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol mult-keys-enc-sig basic
+ tst/epmo-key-hash.scm view
@@ -0,0 +1,77 @@+(herald "Electronic Purchase with Money Order Protocol with Key Hashing"+  (comment "Annotated with trust management formulas"))++(defprotocol epmo basic+  (defrole bank+    (vars (b c m name) (nc nm nb data) (price text))+    (trace+     (recv (enc c nc nm price (pubk b)))+     (send (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		(enc nc nb (pubk c))))+     (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nb)+    (annotations b+      (1+        (implies+          (and (forall ((pm name)) (says c (transfer b price pm nm)))+            (forall ((pm name)) (says pm (transfer b price pm nm))))+          (forall ((pm name)) (transfer b price pm nm))))+      (2+        (and (says c (transfer b price m nm))+          (says m (transfer b price m nm))))))+  (defrole customer+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace+     (send (enc c nc goods price (pubk m)))+     (recv (enc nc nm m goods price (pubk c)))+     (send (enc c nc nm price (pubk b)))+     (recv (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		(enc nc nb (pubk c))))+     (send (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (forall ((pb name))+            (implies (transfer pb price m nm) (ship m goods c)))))+      (3+        (says b+          (implies+            (and (forall ((pm name)) (says c (transfer b price pm nm)))+              (forall ((pm name)) (says m (transfer b price pm nm))))+            (transfer b price m nm))))+      (4 (transfer b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace+     (recv (enc c nc goods price (pubk m)))+     (send (enc nc nm m goods price (pubk c)))+     (recv (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+     (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (forall ((pb name))+          (implies (transfer pb price m nm) (ship m goods c))))+      (2+        (and+          (says b+            (implies+              (and+                (forall ((pm name)) (says c (transfer b price pm nm)))+                (forall ((pm name)) (says m (transfer b price pm nm))))+              (transfer b price m nm)))+          (says c (transfer b price m nm))))+      (3 (and (transfer b price m nm) (ship m goods c))))))++(defskeleton epmo (vars (b c m name))+  (defstrand customer 5 (b b) (c c) (m m))+  (non-orig (privk b) (privk c) (privk m)))++(defskeleton epmo (vars (b c m name) (goods name))+  (defstrand bank 3 (b b) (c c) (m m))+  (non-orig (privk b) (privk c) (privk m)))++(defskeleton epmo (vars (b c m name))+  (defstrand merchant 4 (b b) (c c) (m m))+  (non-orig (privk b) (privk c) (privk m)))
+ tst/epmo-key-hash.tst view
@@ -0,0 +1,721 @@+(herald "Electronic Purchase with Money Order Protocol with Key Hashing"+  (comment "Annotated with trust management formulas"))++(comment "CPSA 2.2.2")+(comment "All input read")++(defprotocol epmo basic+  (defrole bank+    (vars (b c m name) (nc nm nb data) (price text))+    (trace (recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nb)+    (annotations b+      (1+        (implies+          (and (forall ((pm name)) (says c (transfer b price pm nm)))+            (forall ((pm name)) (says pm (transfer b price pm nm))))+          (forall ((pm name)) (transfer b price pm nm))))+      (2+        (and (says c (transfer b price m nm))+          (says m (transfer b price m nm))))))+  (defrole customer+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (forall ((pb name))+            (implies (transfer pb price m nm) (ship m goods c)))))+      (3+        (says b+          (implies+            (and (forall ((pm name)) (says c (transfer b price pm nm)))+              (forall ((pm name)) (says m (transfer b price pm nm))))+            (transfer b price m nm)))) (4 (transfer b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (forall ((pb name))+          (implies (transfer pb price m nm) (ship m goods c))))+      (2+        (and+          (says b+            (implies+              (and+                (forall ((pm name)) (says c (transfer b price pm nm)))+                (forall ((pm name)) (says m (transfer b price pm nm))))+              (transfer b price m nm)))+          (says c (transfer b price m nm))))+      (3 (and (transfer b price m nm) (ship m goods c))))))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc)+  (traces+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 0)+  (unrealized (0 1) (0 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm nm-0 data) (b c m name))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods) (price price) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 1)+    (enc c nc goods price (pubk m)))+  (traces+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm-0 m goods price (pubk c)))))+  (label 1)+  (parent 0)+  (unrealized (0 1) (0 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods) (price price) (nc nc) (nm nm)+    (c c) (m m))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm)+  (operation nonce-test (contracted (nm-0 nm)) nc (0 1)+    (enc nc nm m goods price (pubk c)) (enc c nc goods price (pubk m)))+  (traces+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))))+  (label 2)+  (parent 1)+  (unrealized (0 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods) (price price) (nc nc) (nm nm)+    (c c) (m m))+  (defstrand bank 2 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)) ((1 1) (2 0)) ((2 1) (0 3)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb nc nm)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (0 3))+  (traces+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c))))+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))))+  (label 3)+  (parent 2)+  (seen 4)+  (unrealized (2 0))+  (comment "2 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods) (price price) (nc nc) (nm nm)+    (c c) (m m))+  (defstrand bank 2 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c))+  (precedes ((0 0) (1 0)) ((0 2) (2 0)) ((1 1) (0 1)) ((2 1) (0 3)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb nc nm)+  (operation nonce-test (added-strand customer 3) nc (2 0)+    (enc nc nm m goods price (pubk c)) (enc c nc goods price (pubk m)))+  (traces+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c))))+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))))+  (label 4)+  (parent 3)+  (unrealized)+  (shape))++(comment "Nothing left to do")++(defprotocol epmo basic+  (defrole bank+    (vars (b c m name) (nc nm nb data) (price text))+    (trace (recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nb)+    (annotations b+      (1+        (implies+          (and (forall ((pm name)) (says c (transfer b price pm nm)))+            (forall ((pm name)) (says pm (transfer b price pm nm))))+          (forall ((pm name)) (transfer b price pm nm))))+      (2+        (and (says c (transfer b price m nm))+          (says m (transfer b price m nm))))))+  (defrole customer+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (forall ((pb name))+            (implies (transfer pb price m nm) (ship m goods c)))))+      (3+        (says b+          (implies+            (and (forall ((pm name)) (says c (transfer b price pm nm)))+              (forall ((pm name)) (says m (transfer b price pm nm))))+            (transfer b price m nm)))) (4 (transfer b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (forall ((pb name))+          (implies (transfer pb price m nm) (ship m goods c))))+      (2+        (and+          (says b+            (implies+              (and+                (forall ((pm name)) (says c (transfer b price pm nm)))+                (forall ((pm name)) (says m (transfer b price pm nm))))+              (transfer b price m nm)))+          (says c (transfer b price m nm))))+      (3 (and (transfer b price m nm) (ship m goods c))))))++(defskeleton epmo+  (vars (price text) (nc nm nb data) (b c m name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb)+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m)))))+  (label 5)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (price goods price-0 text) (nc nm nb nc-0 data)+    (b c m c-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price-0) (nb nb) (nc nc-0)+    (nm nm) (b b) (c c-0) (m m))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nm nb)+  (operation encryption-test (added-strand merchant 4)+    (enc (enc "hash" (cat b nb nm)) (privk m)) (0 2))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c-0 nc-0 goods price-0 (pubk m)))+      (send (enc nc-0 nm m goods price-0 (pubk c-0)))+      (recv+        (cat (enc (enc "hash" (cat c-0 nc-0 nb nm price-0)) (privk b))+          nb)) (send (enc (enc "hash" (cat b nb nm)) (privk m)))))+  (label 6)+  (parent 5)+  (seen 7)+  (unrealized (1 2))+  (comment "2 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (price goods text) (nc nm nb data) (b c m name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nm nb)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (1 2))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m)))))+  (label 7)+  (parent 6)+  (unrealized (0 0) (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (price goods goods-0 price-0 text) (nc nm nb nm-0 data)+    (b c m b-0 m-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand customer 5 (goods goods-0) (price price-0) (nb nb) (nc nc)+    (nm nm-0) (b b-0) (c c) (m m-0))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 4) (1 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm nb)+  (operation nonce-test (added-strand customer 5) nb (1 2)+    (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((send (enc c nc goods-0 price-0 (pubk m-0)))+      (recv (enc nc nm-0 m-0 goods-0 price-0 (pubk c)))+      (send (enc c nc nm-0 price-0 (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          nb))))+  (label 8)+  (parent 7)+  (seen 9)+  (unrealized (0 0) (2 3))+  (comment "3 in cohort - 2 not yet seen"))++(defskeleton epmo+  (vars (price goods goods-0 text) (nc nm nb data) (b c m b-0 m-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand customer 5 (goods goods-0) (price price) (nb nb) (nc nc)+    (nm nm) (b b-0) (c c) (m m-0))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm nb)+  (operation encryption-test (added-strand bank 2)+    (enc "hash" (cat c nc nb nm price)) (2 3))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((send (enc c nc goods-0 price (pubk m-0)))+      (recv (enc nc nm m-0 goods-0 price (pubk c)))+      (send (enc c nc nm price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          nb))))+  (label 9)+  (parent 8)+  (unrealized (0 0) (2 1))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (price goods goods-0 price-0 text) (nc nm nb nm-0 data)+    (b c m b-0 m-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand customer 5 (goods goods-0) (price price-0) (nb nb) (nc nc)+    (nm nm-0) (b b-0) (c c) (m m-0))+  (deflistener (cat c nc nb nm-0 price-0))+  (precedes ((0 1) (3 0)) ((1 1) (0 0)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 4) (1 2)) ((3 1) (2 3)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm nb)+  (operation encryption-test (added-listener (cat c nc nb nm-0 price-0))+    (enc "hash" (cat c nc nb nm-0 price-0)) (2 3))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((send (enc c nc goods-0 price-0 (pubk m-0)))+      (recv (enc nc nm-0 m-0 goods-0 price-0 (pubk c)))+      (send (enc c nc nm-0 price-0 (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          nb)))+    ((recv (cat c nc nb nm-0 price-0))+      (send (cat c nc nb nm-0 price-0))))+  (label 10)+  (parent 8)+  (unrealized (0 0) (3 0))+  (comment "empty cohort"))++(defskeleton epmo+  (vars (price goods text) (nc nm nb data) (b c m b-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm nb)+  (operation nonce-test (contracted (m-0 m) (goods-0 goods)) nm (2 1)+    (enc nc nm m goods price (pubk c)))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          nb))))+  (label 11)+  (parent 9)+  (seen 12)+  (unrealized (0 0))+  (comment "2 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (price goods text) (nc nm nb data) (b c m b-0 name))+  (defstrand bank 3 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c)+    (m m))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nc nm nb)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m goods price (pubk c)))+  (traces+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          nb))))+  (label 12)+  (parent 11)+  (unrealized)+  (shape))++(comment "Nothing left to do")++(defprotocol epmo basic+  (defrole bank+    (vars (b c m name) (nc nm nb data) (price text))+    (trace (recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nb)+    (annotations b+      (1+        (implies+          (and (forall ((pm name)) (says c (transfer b price pm nm)))+            (forall ((pm name)) (says pm (transfer b price pm nm))))+          (forall ((pm name)) (transfer b price pm nm))))+      (2+        (and (says c (transfer b price m nm))+          (says m (transfer b price m nm))))))+  (defrole customer+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (forall ((pb name))+            (implies (transfer pb price m nm) (ship m goods c)))))+      (3+        (says b+          (implies+            (and (forall ((pm name)) (says c (transfer b price pm nm)))+              (forall ((pm name)) (says m (transfer b price pm nm))))+            (transfer b price m nm)))) (4 (transfer b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm data) (goods price text))+    (trace (recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (forall ((pb name))+          (implies (transfer pb price m nm) (ship m goods c))))+      (2+        (and+          (says b+            (implies+              (and+                (forall ((pm name)) (says c (transfer b price pm nm)))+                (forall ((pm name)) (says m (transfer b price pm nm))))+              (transfer b price m nm)))+          (says c (transfer b price m nm))))+      (3 (and (transfer b price m nm) (ship m goods c))))))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nm)+  (traces+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m)))))+  (label 13)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m name))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb nm)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (0 2))+  (traces+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))))+  (label 14)+  (parent 13)+  (unrealized (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c m b-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c))+  (defstrand customer 3 (goods goods) (price price) (nc nc) (nm nm)+    (b b-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb nc nm)+  (operation nonce-test (added-strand customer 3) nm (1 0)+    (enc nc nm m goods price (pubk c)))+  (traces+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b-0)))))+  (label 15)+  (parent 14)+  (seen 16)+  (unrealized (0 2))+  (comment "2 in cohort - 1 not yet seen"))++(defskeleton epmo+  (vars (goods price text) (nb nc nm data) (b c b-0 m name))+  (defstrand merchant 4 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (price price) (nc nc) (nm nm) (nb nb) (b b) (c c))+  (defstrand customer 5 (goods goods) (price price) (nb nb) (nc nc)+    (nm nm) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))+    ((2 4) (0 2)))+  (non-orig (privk b) (privk c) (privk m))+  (uniq-orig nb nc nm)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods price (pubk m)))+      (send (enc nc nm m goods price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b nb nm)) (privk m))))+    ((recv (enc c nc nm price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods price (pubk m)))+      (recv (enc nc nm m goods price (pubk c)))+      (send (enc c nc nm price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b-0))+          nb))))+  (label 16)+  (parent 15)+  (unrealized)+  (shape))++(comment "Nothing left to do")
tst/epmo.tst view
@@ -1,7 +1,7 @@ (herald "Electronic Purchase with Money Order Protocol"   (comment "Annotated with trust management formulas")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol epmo basic
+ tst/epmo_acctnum-key-hash.scm view
@@ -0,0 +1,101 @@+(herald "Electronic Purchase with Money Order Protocol Variant with Key Hashing"+  (displacement)+  (comment "This version includes account numbers in exchanges"))++;; The results of running CPSA on this input produces interesting+;; output.  One of the shapes is produced only as a result of+;; generalization, not cohort reduction.  It is a counterexample to+;; the hypthesis that all shapes are produced by cohort reduction, and+;; the purpose of generalization is to distinguish the shapes from the+;; other realized skeletons produced by cohort reduction.++;; The shape in question identifies the bank's nonce with price of the+;; goods.  The variable cannot be separated because the uniquely+;; originating variable originates on the merchant strand, but after+;; separation, it would originate on the bank's strand.++;; Adding a role unique origination assumption to the bank role for+;; its nonce eliminates the undesired shape.++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum text) (nc nm nb price text))+    (trace+     (recv (enc c nc nm acctnum price (pubk b)))+     (send (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		(enc nc nb (pubk c))))+     (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m name) (acctnum nb nc nm goods price text))+    (trace+     (send (enc c nc goods (pubk m)))+     (recv (enc nc nm m price (pubk c)))+     (send (enc c nc nm acctnum price (pubk b)))+     (recv (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		(enc nc nb (pubk c))))+     (send (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		nb)))+    (non-orig (privk b))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant (vars (b c m name) (nb nc nm goods price text))+    (trace+     (recv (enc c nc goods (pubk m)))+     (send (enc nc nm m price (pubk c)))+     (recv (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+		nb))+     (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (b m c name) (nm nc nb text))+  (defstrand merchant 4 (b b) (m m) (c c) (nm nm) (nc nc) (nb nb))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nc nb))++(defskeleton epmo_acctnum+  (vars (b m c name) (nm nb nc text) (price acctnum text))+  (defstrand bank 3 (b b) (m m) (c c) (nm nm) (nb nb) (nc nc))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nc nb))
+ tst/epmo_acctnum-key-hash.tst view
@@ -0,0 +1,921 @@+(herald+  "Electronic Purchase with Money Order Protocol Variant with Key Hashing"+  (displacement)+  (comment "This version includes account numbers in exchanges"))++(comment "CPSA 2.2.2")+(comment "All input read")+(comment "Displacement disabled")++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum nc nm nb price text))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m name) (acctnum nb nc nm goods price text))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (non-orig (privk b))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm goods price text))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price text) (b m c name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nc nb)+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m)))))+  (label 0)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum text) (b m c name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nc nb)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (0 2))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))))+  (label 1)+  (parent 0)+  (unrealized (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 text)+    (b m c b-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk b-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 3) nm (1 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))))+  (label 2)+  (parent 1)+  (unrealized (0 0) (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 text) (m c b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm+    (1 0) (enc nc nm m price (pubk c))+    (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 3)+  (parent 2)+  (unrealized (0 0) (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods text) (m c b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 4)+  (parent 3)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 nm-0 price-0 text)+    (m c b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)+    (price price-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 5)+  (parent 3)+  (unrealized (0 0) (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nc nb acctnum nm goods price text) (c b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))+    ((2 4) (0 2)))+  (non-orig (privk c) (privk b) (privk m))+  (uniq-orig nc nb nm)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 6)+  (parent 4)+  (unrealized)+  (shape))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods nm-0 price-0 text) (m c b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 7)+  (parent 5)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nc nb nm price acctnum nm-0 goods price-0 text) (c b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm-0) (goods goods)+    (price price-0) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm-0) (nb nb)+    (price price-0) (b b) (c c))+  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price)+    (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm-0)+    (goods goods) (price price-0) (b b) (c c) (m m))+  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))+    ((3 2) (1 0)) ((3 4) (0 2)))+  (non-orig (privk c) (privk b) (privk m))+  (uniq-orig nc nb nm nm-0)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b))+          nb)) (send (enc (enc "hash" (cat b m nb nm-0)) (privk m))))+    ((recv (enc c nc nm-0 acctnum price-0 (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm-0 m price-0 (pubk c)))+      (send (enc c nc nm-0 acctnum price-0 (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b))+          nb))))+  (label 8)+  (parent 7)+  (seen 6)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum nc nm nb price text))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m name) (acctnum nb nc nm goods price text))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    (non-orig (privk b))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m name) (nb nc nm goods price text))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m)))))+  (label 9)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price nc-0 goods price-0 text)+    (b m c c-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc-0) (nm nm) (goods goods)+    (price price-0) (b b) (c c-0) (m m))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand merchant 4)+    (enc (enc "hash" (cat b m nb nm)) (privk m)) (0 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c-0 nc-0 goods (pubk m)))+      (send (enc nc-0 nm m price-0 (pubk c-0)))+      (recv+        (cat (enc (enc "hash" (cat c-0 nc-0 nb nm price-0)) (privk b))+          nb)) (send (enc (enc "hash" (cat b m nb nm)) (privk m)))))+  (label 10)+  (parent 9)+  (unrealized (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (1 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m)))))+  (label 11)+  (parent 10)+  (unrealized (0 0) (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars+    (nm nb nc acctnum price goods acctnum-0 nm-0 goods-0 price-0 text)+    (b m c b-0 m-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm-0)+    (goods goods-0) (price price-0) (b b-0) (c c) (m m-0))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk b-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 5) nb (1 2)+    (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods-0 (pubk m-0)))+      (recv (enc nc nm-0 m-0 price-0 (pubk c)))+      (send (enc c nc nm-0 acctnum-0 price-0 (pubk b-0)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm-0 price-0)) (privk b-0))+          nb))))+  (label 12)+  (parent 11)+  (unrealized (0 0) (2 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods acctnum-0 goods-0 text)+    (b m c m-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m-0))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" (cat c nc nb nm price)) (privk b)) (2 3))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods-0 (pubk m-0)))+      (recv (enc nc nm m-0 price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 13)+  (parent 12)+  (unrealized (0 0) (2 1))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods acctnum-0 goods-0 text)+    (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (m-0 m)) nm (2 1)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 14)+  (parent 13)+  (unrealized (0 0) (1 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 15)+  (parent 14)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars+    (nm nb nc acctnum price goods acctnum-0 goods-0 nm-0 price-0 text)+    (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)+    (price price-0) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand merchant 2) nc (1 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 16)+  (parent 14)+  (unrealized (0 0) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 17)+  (parent 15)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 text)+    (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 18)+  (parent 16)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))))+  (label 19)+  (parent 17)+  (unrealized)+  (shape))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 text)+    (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 20)+  (parent 18)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods nm-0 price-0 text) (b m c name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb))+      (send (enc (enc "hash" (cat b m nb nm)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" (cat c nc nb nm price)) (privk b)) nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 21)+  (parent 20)+  (seen 19)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")
− tst/epmo_acctnum.lsp 
@@ -1,102 +0,0 @@-(herald "Electronic Purchase with Money Order Protocol Variant"-  (comment "This version includes account numbers in exchanges"))--;; The results of running CPSA on this input produces interesting-;; output.  One of the shapes is produced only as a result of-;; generalization, not cohort reduction.  It is a counterexample to-;; the hypthesis that all shapes are produced by cohort reduction, and-;; the purpose of generalization is to distinguish the shapes from the-;; other realized skeletons produced by cohort reduction.--;; The shape in question identifies the bank's nonce with price of the-;; goods.  The variable cannot be separated because the uniquely-;; originating variable originates on the merchant strand, but after-;; separation, it would originate on the bank's strand.--;; Adding a role unique origination assumption to the bank role for-;; its nonce eliminates the undesired shape.--(defprotocol epmo_acctnum basic-  (defrole bank-    (vars (b c m name) (acctnum text) (hash name) (nc nm nb price text))-    (trace-     (recv (enc c nc nm acctnum price (pubk b)))-     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		(enc nc nb (pubk c))))-     (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (annotations b-      (1-        (forall ((pm name))-          (implies-            (and (authtransfer c acctnum b price pm nm)-              (reqtransfer pm b price pm nm))-            (dotransfer acctnum b price pm nm))))-      (2-        (and (says c (authtransfer c acctnum b price m nm))-          (says m (reqtransfer m b price m nm))))))-  (defrole customer-    (vars (b c m hash name) (acctnum nb nc nm goods price text))-    (trace-     (send (enc c nc goods (pubk m)))-     (recv (enc nc nm m price (pubk c)))-     (send (enc c nc nm acctnum price (pubk b)))-     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		(enc nc nb (pubk c))))-     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		nb)))-    (non-orig (privk b) (privk hash))-    (uniq-orig nc)-    (annotations c-      (1-        (says m-          (implies-            (exists ((acctnum2 text))-              (dotransfer acctnum2 b price m nm)) (doship m goods c))))-      (3-        (says b-          (forall ((pm name))-            (implies-              (and (authtransfer c acctnum b price m nm)-                (reqtransfer pm b price pm nm))-              (dotransfer acctnum b price pm nm)))))-      (4 (authtransfer c acctnum b price m nm))))-  (defrole merchant (vars (b c m hash name) (nb nc nm goods price text))-    (trace-     (recv (enc c nc goods (pubk m)))-     (send (enc nc nm m price (pubk c)))-     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		nb))-     (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (uniq-orig nm)-    (annotations m-      (1-        (implies-          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))-          (doship m goods c)))-      (2-        (and-          (says b-            (forall ((pm name))-              (exists ((acctnum2 text))-                (implies-                  (and (authtransfer c acctnum2 b price m nm)-                    (reqtransfer pm b price pm nm))-                  (dotransfer acctnum2 b price pm nm)))))-          (says c-            (exists ((acctnum2 text))-              (authtransfer c acctnum2 b price m nm)))))-      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))--(defskeleton epmo_acctnum-  (vars (b m c name) (nm nc nb text) (hash name))-  (defstrand merchant 4 (b b) (m m) (c c) (nm nm) (nc nc) (nb nb) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb))--(defskeleton epmo_acctnum-  (vars (b m c name) (nm nb nc text) (hash name) (price acctnum text))-  (defstrand bank 3 (b b) (m m) (c c) (nm nm) (nb nb) (nc nc) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb))
+ tst/epmo_acctnum.scm view
@@ -0,0 +1,103 @@+(herald "Electronic Purchase with Money Order Protocol Variant"+  (displacement)+  (comment "This version includes account numbers in exchanges"))++;; The results of running CPSA on this input produces interesting+;; output.  One of the shapes is produced only as a result of+;; generalization, not cohort reduction.  It is a counterexample to+;; the hypthesis that all shapes are produced by cohort reduction, and+;; the purpose of generalization is to distinguish the shapes from the+;; other realized skeletons produced by cohort reduction.++;; The shape in question identifies the bank's nonce with price of the+;; goods.  The variable cannot be separated because the uniquely+;; originating variable originates on the merchant strand, but after+;; separation, it would originate on the bank's strand.++;; Adding a role unique origination assumption to the bank role for+;; its nonce eliminates the undesired shape.++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum text) (hash name) (nc nm nb price text))+    (trace+     (recv (enc c nc nm acctnum price (pubk b)))+     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		(enc nc nb (pubk c))))+     (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum nb nc nm goods price text))+    (trace+     (send (enc c nc goods (pubk m)))+     (recv (enc nc nm m price (pubk c)))+     (send (enc c nc nm acctnum price (pubk b)))+     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		(enc nc nb (pubk c))))+     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant (vars (b c m hash name) (nb nc nm goods price text))+    (trace+     (recv (enc c nc goods (pubk m)))+     (send (enc nc nm m price (pubk c)))+     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		nb))+     (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (b m c name) (nm nc nb text) (hash name))+  (defstrand merchant 4 (b b) (m m) (c c) (nm nm) (nc nc) (nb nb) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb))++(defskeleton epmo_acctnum+  (vars (b m c name) (nm nb nc text) (hash name) (price acctnum text))+  (defstrand bank 3 (b b) (m m) (c c) (nm nm) (nb nb) (nc nc) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb))
tst/epmo_acctnum.tst view
@@ -1,24857 +1,1625 @@ (herald "Electronic Purchase with Money Order Protocol Variant"-  (comment "This version includes account numbers in exchanges"))--(comment "CPSA 2.2.0")-(comment "All input read")--(defprotocol epmo_acctnum basic-  (defrole bank-    (vars (b c m name) (acctnum text) (hash name) (nc nm nb price text))-    (trace (recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (annotations b-      (1-        (forall ((pm name))-          (implies-            (and (authtransfer c acctnum b price pm nm)-              (reqtransfer pm b price pm nm))-            (dotransfer acctnum b price pm nm))))-      (2-        (and (says c (authtransfer c acctnum b price m nm))-          (says m (reqtransfer m b price m nm))))))-  (defrole customer-    (vars (b c m hash name) (acctnum nb nc nm goods price text))-    (trace (send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb)))-    (non-orig (privk b) (privk hash))-    (uniq-orig nc)-    (annotations c-      (1-        (says m-          (implies-            (exists ((acctnum2 text))-              (dotransfer acctnum2 b price m nm)) (doship m goods c))))-      (3-        (says b-          (forall ((pm name))-            (implies-              (and (authtransfer c acctnum b price m nm)-                (reqtransfer pm b price pm nm))-              (dotransfer acctnum b price pm nm)))))-      (4 (authtransfer c acctnum b price m nm))))-  (defrole merchant-    (vars (b c m hash name) (nb nc nm goods price text))-    (trace (recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (uniq-orig nm)-    (annotations m-      (1-        (implies-          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))-          (doship m goods c)))-      (2-        (and-          (says b-            (forall ((pm name))-              (exists ((acctnum2 text))-                (implies-                  (and (authtransfer c acctnum2 b price m nm)-                    (reqtransfer pm b price pm nm))-                  (dotransfer acctnum2 b price pm nm)))))-          (says c-            (exists ((acctnum2 text))-              (authtransfer c acctnum2 b price m nm)))))-      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price text) (b m c hash name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb)-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))-  (label 0)-  (unrealized (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum text) (b m c hash name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (precedes ((0 1) (1 0)) ((1 1) (0 2)))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (0 2))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))))-  (label 1)-  (parent 0)-  (unrealized (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 text)-    (b m c hash b-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 3) nm (1 0)-    (enc nc nm m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0)))))-  (label 2)-  (parent 1)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum goods-0 text) (m c hash b name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm-    (1 0) (enc nc nm m price (pubk c))-    (enc c nc nm acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))))-  (label 3)-  (parent 2)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((0 1) (3 0)) ((1 1) (0 2)) ((2 0) (0 0))-    ((2 2) (1 0)) ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand bank 2) nm (1 0)-    (enc nc nm m price (pubk c))-    (enc c nc nm acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 4)-  (parent 2)-  (seen 8)-  (unrealized (0 0) (0 2) (1 0) (3 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price acctnum goods text) (m c hash b name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))))-  (label 5)-  (parent 3)-  (seen 9)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum goods-0 nm-0 price-0 text)-    (m c hash b name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))-    ((3 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 6)-  (parent 3)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm acctnum-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm acctnum-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb acctnum-0)-  (operation nonce-test (displaced 4 2 customer 3) nm (3 0)-    (enc nc nm m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb acctnum-0 (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum-0 price (pubk hash))-            (privk b)) (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc acctnum-0 m price (pubk c)))-      (send (enc c nc acctnum-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc acctnum-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 7)-  (parent 4)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 3) nm (3 0)-    (enc nc nm m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 8)-  (parent 4)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price acctnum goods text) (c hash b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))-    ((2 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 9)-  (parent 5)-  (unrealized)-  (shape))--(defskeleton epmo_acctnum-  (vars (nm nc nb price acctnum goods nm-0 price-0 text)-    (m c hash b name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))-    ((3 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 10)-  (parent 6)-  (seen 15)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm acctnum)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) acctnum-    (1 0) (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-    (enc nc acctnum m price (pubk c))-    (enc c nc acctnum acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 11)-  (parent 7)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 4 3 bank 2) acctnum-0 (1 0)-    (enc "hash" c nc nb-0 acctnum-0 price (pubk hash-0))-    (enc nc acctnum-0 m price (pubk c))-    (enc c nc acctnum-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 12)-  (parent 7)-  (seen 20)-  (unrealized (0 0) (0 2) (1 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum goods-0 nb-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm-    (1 0) (enc "hash" c nc nb-0 nm price (pubk hash-0))-    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c))))))-  (label 13)-  (parent 8)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 4 3 bank 2) nm (1 0)-    (enc "hash" c nc nb-0 nm price (pubk hash-0))-    (enc nc nm m price (pubk c))-    (enc c nc nm acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 14)-  (parent 8)-  (seen 25)-  (unrealized (0 0) (0 2) (1 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price nm-0 price-0 acctnum goods text)-    (c hash b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))-    ((3 2) (1 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 15)-  (parent 10)-  (seen 9)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 16)-  (parent 11)-  (seen 26)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm acctnum)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb acctnum nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 17)-  (parent 11)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 18)-  (parent 12)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 0) (0 0))-    ((2 2) (3 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 19)-  (parent 12)-  (seen 31)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 20)-  (parent 12)-  (unrealized (0 0) (0 2) (1 0) (3 3))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price acctnum goods nb-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c))))))-  (label 21)-  (parent 13)-  (seen 34)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb goods price acctnum goods-0 nb-0 nm-0 price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 22)-  (parent 13)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 23)-  (parent 14)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 0) (0 0))-    ((2 2) (3 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 24)-  (parent 14)-  (seen 31 39)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 25)-  (parent 14)-  (unrealized (0 0) (0 2) (1 0) (3 3))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 acctnum goods text) (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 26)-  (parent 16)-  (unrealized)-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb acctnum nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 27)-  (parent 17)-  (seen 43)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 28)-  (parent 18)-  (seen 44)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 29)-  (parent 18)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 3 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 30)-  (parent 19)-  (seen 47)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 2 customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 31)-  (parent 19)-  (seen 49)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 32)-  (parent 20)-  (seen 51)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 4 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 33)-  (parent 20)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price nb-0 acctnum goods text)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 34)-  (parent 21)-  (seen 9)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price acctnum goods nb-0 nm-0 price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 35)-  (parent 22)-  (seen 55)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 36)-  (parent 23)-  (seen 56)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 37)-  (parent 23)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 3 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 38)-  (parent 24)-  (seen 59)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 goods-0 nb-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 39)-  (parent 24)-  (seen 61)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 40)-  (parent 25)-  (seen 51 63)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 4 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 41)-  (parent 25)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods text) (c hash b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))-    ((2 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nc nb acctnum)-  (operation generalization deleted (2 0))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 42)-  (parent 26)-  (seen 9)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nm price-0 acctnum goods text)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nm acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 43)-  (parent 27)-  (unrealized)-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods text) (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 44)-  (parent 28)-  (seen 42)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 45)-  (parent 29)-  (seen 68)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 46)-  (parent 30)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 47)-  (parent 30)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 48)-  (parent 31)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 49)-  (parent 31)-  (seen 33)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 2 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 50)-  (parent 32)-  (seen 73)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 3 customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 51)-  (parent 32)-  (seen 33 50)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 52)-  (parent 33)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 53)-  (parent 33)-  (seen 72 77)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 54)-  (parent 33)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nm nc nb price nb-0 nm-0 price-0 acctnum goods text)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 55)-  (parent 35)-  (seen 15)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 acctnum goods text) (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 56)-  (parent 36)-  (seen 9)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 57)-  (parent 37)-  (seen 84)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 58)-  (parent 38)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 59)-  (parent 38)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 60)-  (parent 39)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 61)-  (parent 39)-  (seen 41)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 2 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 62)-  (parent 40)-  (seen 89)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 63)-  (parent 40)-  (seen 41 62)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 64)-  (parent 41)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 65)-  (parent 41)-  (seen 77 88 93)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 66)-  (parent 41)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nm price-0 acctnum goods text) (c hash b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))-    ((3 2) (1 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nc nb nm acctnum)-  (operation generalization deleted (2 0))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 67)-  (parent 43)-  (seen 42)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nm price-0 acctnum goods text)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nm acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 68)-  (parent 45)-  (seen 67)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 69)-  (parent 46)-  (seen 100)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 70)-  (parent 46)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 71)-  (parent 47)-  (seen 104)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 72)-  (parent 47)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 3 bank 2)-    (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-1)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 73)-  (parent 47)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 74)-  (parent 48)-  (seen 110)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price goods-0 nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods-0)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 75)-  (parent 48)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 76)-  (parent 49)-  (seen 114)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 77)-  (parent 49)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 78)-  (parent 50)-  (seen 118)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 79)-  (parent 51)-  (seen 117 119)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 80)-  (parent 52)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 81)-  (parent 52)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 82)-  (parent 54)-  (seen 80 81)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 83)-  (parent 54)-  (seen 106 116)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nm price-0 acctnum goods text)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 84)-  (parent 57)-  (seen 15)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 85)-  (parent 58)-  (seen 122)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 86)-  (parent 58)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 87)-  (parent 59)-  (seen 104 126)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 88)-  (parent 59)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 3 bank 2)-    (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-1)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 89)-  (parent 59)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 90)-  (parent 60)-  (seen 132)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum goods-0 nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 91)-  (parent 60)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 92)-  (parent 61)-  (seen 114 136)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 93)-  (parent 61)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 94)-  (parent 62)-  (seen 118 140)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 95)-  (parent 63)-  (seen 119 139 141)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 96)-  (parent 64)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 97)-  (parent 64)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 98)-  (parent 66)-  (seen 96 97)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 99)-  (parent 66)-  (seen 116 128 138)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 100)-  (parent 69)-  (seen 26)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 101)-  (parent 70)-  (seen 144)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 102)-  (parent 71)-  (seen 103 117)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 103)-  (parent 71)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 104)-  (parent 71)-  (seen 102 103 117)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 105)-  (parent 72)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 106)-  (parent 72)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 107)-  (parent 73)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 108)-  (parent 73)-  (seen 145 157)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 109)-  (parent 73)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 110)-  (parent 74)-  (seen 26)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price goods nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum nb-0) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 111)-  (parent 75)-  (seen 160)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 112)-  (parent 76)-  (seen 118 157)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 113)-  (parent 76)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 114)-  (parent 76)-  (seen 77 112 113 119)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 115)-  (parent 77)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 116)-  (parent 77)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 117)-  (parent 78)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 118)-  (parent 78)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 119)-  (parent 79)-  (seen 113 118)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 120)-  (parent 81)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 5 4 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 121)-  (parent 82)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 122)-  (parent 85)-  (seen 34)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 123)-  (parent 86)-  (seen 173)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 124)-  (parent 87)-  (seen 125 139)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 125)-  (parent 87)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 126)-  (parent 87)-  (seen 124 125 139)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 127)-  (parent 88)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 128)-  (parent 88)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 129)-  (parent 89)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 130)-  (parent 89)-  (seen 157 174 186)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 131)-  (parent 89)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 132)-  (parent 90)-  (seen 34)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum goods nb-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 133)-  (parent 91)-  (seen 189)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 134)-  (parent 92)-  (seen 140 186)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 135)-  (parent 92)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 136)-  (parent 92)-  (seen 93 134 135 141)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 137)-  (parent 93)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 138)-  (parent 93)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 139)-  (parent 94)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 140)-  (parent 94)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 141)-  (parent 95)-  (seen 135 140)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 142)-  (parent 97)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 5 4 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 143)-  (parent 98)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nm price-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nm acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 144)-  (parent 101)-  (seen 43)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 145)-  (parent 102)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((2 1) (5 0)) ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 146)-  (parent 102)-  (seen 117 205)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 147)-  (parent 103)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 148)-  (parent 103)-  (seen 204 210)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 149)-  (parent 104)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 150)-  (parent 104)-  (seen 117 204 213)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 151)-  (parent 105)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 152)-  (parent 105)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 153)-  (parent 106)-  (seen 151 152)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 154)-  (parent 107)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 155)-  (parent 107)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 156)-  (parent 108)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 157)-  (parent 108)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 158)-  (parent 109)-  (seen 154 155)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 159)-  (parent 109)-  (seen 203 218 220)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "5 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nm price-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm acctnum) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb acctnum)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm acctnum) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm acctnum)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 2) (3 0))-    ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nm acctnum)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb acctnum price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc acctnum m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb acctnum (pubk hash)) (privk m))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc acctnum acctnum price (pubk hash-0))-            (privk b)) (enc nc acctnum (pubk c)))))-    ((recv (enc c nc acctnum acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 acctnum price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc acctnum m price (pubk c)))-      (send (enc c nc acctnum acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb acctnum price (pubk hash)) (privk b))-          nb))))-  (label 160)-  (parent 111)-  (seen 43)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 161)-  (parent 112)-  (seen 117 118)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 162)-  (parent 113)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 163)-  (parent 113)-  (seen 117 227)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 2) (5 0)) ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 164)-  (parent 114)-  (seen 117 119 226)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 165)-  (parent 115)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 166)-  (parent 115)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 167)-  (parent 116)-  (seen 165 166)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 168)-  (parent 117)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 169)-  (parent 118)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (4 0)-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 170)-  (parent 119)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb price nb-0 goods nm price-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 171)-  (parent 121)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 172)-  (parent 121)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 nm price-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 173)-  (parent 123)-  (seen 55)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 174)-  (parent 124)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((2 1) (5 0)) ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 175)-  (parent 124)-  (seen 139 205 240)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 176)-  (parent 125)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 177)-  (parent 125)-  (seen 210 239 245)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 178)-  (parent 126)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 179)-  (parent 126)-  (seen 139 213 239 248)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 180)-  (parent 127)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 181)-  (parent 127)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 182)-  (parent 128)-  (seen 180 181)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 183)-  (parent 129)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 184)-  (parent 129)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 185)-  (parent 130)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 186)-  (parent 130)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 187)-  (parent 131)-  (seen 183 184)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 nb-1-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 188)-  (parent 131)-  (seen 220 238 253 255)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "5 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 nm price-0 acctnum goods text)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 2) (3 0))-    ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 189)-  (parent 133)-  (seen 55)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 190)-  (parent 134)-  (seen 118 139 140)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 191)-  (parent 135)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 192)-  (parent 135)-  (seen 139 227 262)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 2) (5 0)) ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 193)-  (parent 136)-  (seen 119 139 141 261)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "5 in cohort - 0 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 194)-  (parent 137)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 195)-  (parent 137)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 196)-  (parent 138)-  (seen 194 195)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 197)-  (parent 139)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 198)-  (parent 140)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 199)-  (parent 141)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb price acctnum nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 200)-  (parent 143)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars-    (nb goods price acctnum nb-0 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 201)-  (parent 143)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 202)-  (parent 145)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 203)-  (parent 145)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 204)-  (parent 146)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 4 customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 205)-  (parent 146)-  (seen 210)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 206)-  (parent 147)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 207)-  (parent 147)-  (seen 282)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "6 in cohort - 4 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 208)-  (parent 147)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 209)-  (parent 148)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 4 customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 210)-  (parent 148)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 211)-  (parent 149)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 212)-  (parent 149)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 acctnum-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 4 customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 213)-  (parent 150)-  (seen 117 205 210)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 214)-  (parent 152)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 215)-  (parent 153)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 216)-  (parent 155)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 217)-  (parent 156)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 218)-  (parent 156)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 219)-  (parent 157)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 220)-  (parent 157)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 221)-  (parent 158)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 222)-  (parent 161)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 223)-  (parent 162)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 224)-  (parent 162)-  (seen 307)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 225)-  (parent 162)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 226)-  (parent 163)-  (seen 222)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 4 customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 227)-  (parent 163)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 228)-  (parent 166)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 229)-  (parent 167)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 230)-  (parent 168)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 231)-  (parent 168)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 232)-  (parent 169)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 233)-  (parent 169)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 234)-  (parent 170)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 235)-  (parent 170)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb price nb-0 goods nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc price-0 nm-0 m price-1 (pubk c))-    (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 236)-  (parent 172)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 237)-  (parent 174)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 238)-  (parent 174)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 239)-  (parent 175)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 240)-  (parent 175)-  (seen 245)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 241)-  (parent 176)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 242)-  (parent 176)-  (seen 282 333)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "6 in cohort - 4 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 243)-  (parent 176)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 244)-  (parent 177)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 245)-  (parent 177)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 246)-  (parent 178)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 247)-  (parent 178)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 acctnum-1-      nb-2 text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 248)-  (parent 179)-  (seen 139 240 245)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 249)-  (parent 181)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 250)-  (parent 182)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 251)-  (parent 184)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 252)-  (parent 185)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 253)-  (parent 185)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 254)-  (parent 186)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 255)-  (parent 186)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 256)-  (parent 187)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 257)-  (parent 190)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 258)-  (parent 191)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 259)-  (parent 191)-  (seen 307 358)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "5 in cohort - 3 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 260)-  (parent 191)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 261)-  (parent 192)-  (seen 257)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 262)-  (parent 192)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 263)-  (parent 195)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 6 5 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 264)-  (parent 196)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 265)-  (parent 197)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 266)-  (parent 197)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 267)-  (parent 198)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 268)-  (parent 198)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 269)-  (parent 199)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 nm price-0-      text) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 270)-  (parent 199)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nb price acctnum nb-0 goods nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc price-0 nm-0 m price-1 (pubk c))-    (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 271)-  (parent 201)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 272)-  (parent 202)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 273)-  (parent 202)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 274)-  (parent 203)-  (seen 272 273)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 275)-  (parent 204)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 276)-  (parent 205)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods text) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 277)-  (parent 206)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 278)-  (parent 206)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 279)-  (parent 207)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 280)-  (parent 207)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((5 1) (6 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 5 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 281)-  (parent 207)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 4 customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 282)-  (parent 207)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 283)-  (parent 208)-  (seen 277 278)-  (unrealized (0 0) (0 2))-  (comment "4 in cohort - 1 not yet seen"))--(comment "Strand bound exceeded--aborting run")--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (7 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 284)-  (parent 208)-  (unrealized (0 0) (0 2) (1 0) (7 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 285)-  (parent 209)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 286)-  (parent 210)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 287)-  (parent 211)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 288)-  (parent 211)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 289)-  (parent 212)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 290)-  (parent 213)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 acctnum-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-1) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-1) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-1) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-1) (nc nc) (nm nb-1) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-1) (nb nb-1) (nc nc) (nm nb-1)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-1) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-1)-  (operation nonce-test (displaced 7 6 bank 2) nb-2 (5 0)-    (enc "hash" c nc nb-1 nb-2 price (pubk hash-2))-    (enc nc nb-2 m price (pubk c))-    (enc c nc nb-2 nb-2 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-1 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-1 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-1 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-1 nb-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 nb-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-1 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-1 m price (pubk c)))-      (send (enc c nc nb-1 nb-1 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) nb-1)))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 nb-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 291)-  (parent 213)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 292)-  (parent 215)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 nb-1 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 293)-  (parent 215)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 294)-  (parent 217)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 295)-  (parent 217)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 296)-  (parent 218)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 297)-  (parent 219)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 298)-  (parent 219)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 299)-  (parent 220)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price nb-0 goods nm price-0 text) (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 300)-  (parent 221)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 301)-  (parent 221)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 302)-  (parent 222)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods text) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 303)-  (parent 223)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (5 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 304)-  (parent 223)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((2 1) (5 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 305)-  (parent 224)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((4 1) (5 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 306)-  (parent 224)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 307)-  (parent 224)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 308)-  (parent 225)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 309)-  (parent 225)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 310)-  (parent 226)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-0 nb-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 311)-  (parent 227)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 312)-  (parent 229)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 nb-1 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 313)-  (parent 229)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 314)-  (parent 230)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 315)-  (parent 230)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 316)-  (parent 231)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 317)-  (parent 232)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 318)-  (parent 232)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 319)-  (parent 233)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 320)-  (parent 234)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 321)-  (parent 234)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 322)-  (parent 235)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 323)-  (parent 237)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 324)-  (parent 237)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 325)-  (parent 238)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 326)-  (parent 239)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 327)-  (parent 240)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 328)-  (parent 241)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 329)-  (parent 241)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 330)-  (parent 242)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 331)-  (parent 242)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((5 1) (6 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 5 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 332)-  (parent 242)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 333)-  (parent 242)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 334)-  (parent 243)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (7 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 335)-  (parent 243)-  (unrealized (0 0) (0 2) (1 0) (7 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 336)-  (parent 244)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 337)-  (parent 245)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 nb-1 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 338)-  (parent 246)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 339)-  (parent 246)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 340)-  (parent 247)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 nb-1 goods-0 nb-2 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 341)-  (parent 248)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 acctnum-1 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-1) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-1) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-1) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-1) (nc nc) (nm nb-1)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-1) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-1)-  (operation nonce-test (displaced 7 6 bank 2) nb-2 (5 0)-    (enc "hash" c nc nb-1 nb-2 price (pubk hash-2))-    (enc nc nb-2 m price (pubk c))-    (enc c nc nb-2 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-1 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-1 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-1 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-1 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-1 m price (pubk c)))-      (send (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) nb-1)))-    ((recv (enc c nc nb-1 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 342)-  (parent 248)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price acctnum nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 343)-  (parent 250)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 nm-0 price-1-      text) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 344)-  (parent 250)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 345)-  (parent 252)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 346)-  (parent 252)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 347)-  (parent 253)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 348)-  (parent 254)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 349)-  (parent 254)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 350)-  (parent 255)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price acctnum nb-0 goods nm price-0 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 351)-  (parent 256)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nb goods price acctnum nb-0 goods-0 nm price-0 nm-0 price-1 text)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 352)-  (parent 256)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 353)-  (parent 257)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 354)-  (parent 258)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (5 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 355)-  (parent 258)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((2 1) (5 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 356)-  (parent 259)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((4 1) (5 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 357)-  (parent 259)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 358)-  (parent 259)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 359)-  (parent 260)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nm price-0 nb-1-      text) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 360)-  (parent 260)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 361)-  (parent 261)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum acctnum-0 nb-0 goods-0 nb-1 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 362)-  (parent 262)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb price acctnum nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (contracted (goods-0 goods)) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c)) (enc c price-0 goods (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 363)-  (parent 264)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nb goods price acctnum nb-0 nb-1 goods-0 nm price-0 nm-0 price-1-      text) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc price-0)-    (nm nb-0) (goods goods-0) (price price) (b b) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (defstrand merchant 2 (nc price-0) (nm nm-0) (goods goods-0)-    (price price-1) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (0 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0 nm-0)-  (operation nonce-test (added-strand merchant 2) price-0 (0 0)-    (enc price-0 nm m price-0 (pubk c))-    (enc c price-0 goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm-0 m price-1 (pubk c)))))-  (label 364)-  (parent 264)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 365)-  (parent 265)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 366)-  (parent 265)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 367)-  (parent 266)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 368)-  (parent 267)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 369)-  (parent 267)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 370)-  (parent 268)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price acctnum nb-0 goods nb-1 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 371)-  (parent 269)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 372)-  (parent 269)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 373)-  (parent 270)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 nb-1 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 374)-  (parent 273)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 nb-1 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 7 6 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-1 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 375)-  (parent 274)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 376)-  (parent 275)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 377)-  (parent 275)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 nb-1 goods-0 nb-2 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c)) (enc nc nb-2 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-2 (pubk c))))))-  (label 378)-  (parent 276)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars-    (nc nb goods price acctnum nb-0 nb-1 goods-0 nb-2 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-2)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 2) (6 0)) ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0))-    ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c)) (enc nc nb-2 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 379)-  (parent 276)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb price nb-0 goods nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 380)-  (parent 278)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 381)-  (parent 279)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 382)-  (parent 279)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 383)-  (parent 280)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 384)-  (parent 280)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((5 1) (6 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 385)-  (parent 281)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((5 1) (6 0)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 386)-  (parent 281)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price nb-0 goods-0 nb-1 text)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum nb-0)) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 387)-  (parent 282)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nc nb goods price acctnum nb-0 goods-0 nb-1 nm price-0 text)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (nb nb) (nc nc) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc nc) (nm nb-0)-    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-0)-    (price price) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc nc) (nm nb-0) (nb nb-1)-    (price price) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (nc nc) (nm nm) (goods goods-0) (price price-0)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 nb-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 nb-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 nb-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 388)-  (parent 282)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton epmo_acctnum-  (vars (nb goods price nb-0 goods-0 nm price-0 text)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (nb nb) (nc price-0) (nm nb-0) (goods goods)-    (price price) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb)-    (price price) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum nb-0) (nb nb-0) (nc price-0) (nm nb-0)-    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum nb-0) (nc price-0) (nm nb-0) (nb nb-0)-    (price price) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (nc price-0) (nm nm) (goods goods-0)-    (price price-0) (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nb nb-0 nm price-0)-  (operation nonce-test (displaced 7 6 merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c price-0 goods (pubk m)))-      (send (enc price-0 nb-0 m price (pubk c)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb nb-0 price (pubk hash))-            (privk b)) (enc price-0 nb (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((send (enc c price-0 goods-0 (pubk m)))-      (recv (enc price-0 nb-0 m price (pubk c)))-      (send (enc c price-0 nb-0 nb-0 price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c price-0 nb-0 nb-0 price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c price-0 nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc price-0 nb-0 (pubk c)))))-    ((recv (enc c price-0 goods-0 (pubk m)))-      (send (enc price-0 nm m price-0 (pubk c)))))-  (label 389)-  (parent 283)-  (unrealized (0 0) (0 2))-  (comment "aborted"))+  (displacement)+  (comment "This version includes account numbers in exchanges"))++(comment "CPSA 2.2.2")+(comment "All input read")+(comment "Displacement disabled")++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum text) (hash name) (nc nm nb price text))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum nb nc nm goods price text))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m hash name) (nb nc nm goods price text))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price text) (b m c hash name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb)+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 0)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum text) (b m c hash name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (0 2))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))))+  (label 1)+  (parent 0)+  (unrealized (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 text)+    (b m c hash b-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 3) nm (1 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))))+  (label 2)+  (parent 1)+  (unrealized (0 0) (0 2) (1 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 text) (m c hash b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm+    (1 0) (enc nc nm m price (pubk c))+    (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 3)+  (parent 2)+  (unrealized (0 0) (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)+    (b m c hash b-0 hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b-0) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((0 1) (3 0)) ((1 1) (0 2)) ((2 0) (0 0))+    ((2 2) (1 0)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)+    (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand bank 2) nm (1 0)+    (enc nc nm m price (pubk c))+    (enc c nc nm acctnum-0 price (pubk b-0)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0))))+    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))+            (privk b-0)) (enc nc nb-0 (pubk c))))))+  (label 4)+  (parent 2)+  (unrealized (0 0) (0 2) (1 0) (3 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods text) (m c hash b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 5)+  (parent 3)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 nm-0 price-0 text)+    (m c hash b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)+    (price price-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 6)+  (parent 3)+  (unrealized (0 0) (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum acctnum-0 goods-0 nb-0 text)+    (b m c hash b-0 hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b-0) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)+    (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 3) nm (3 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0))))+    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))+            (privk b-0)) (enc nc nb-0 (pubk c))))))+  (label 7)+  (parent 4)+  (unrealized (0 0) (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods text) (c hash b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))+    ((2 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk b) (privk m))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 8)+  (parent 5)+  (unrealized)+  (shape))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods nm-0 price-0 text)+    (m c hash b name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 9)+  (parent 6)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 nb-0 text)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm+    (1 0) (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 10)+  (parent 7)+  (unrealized (0 0) (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price nm-0 price-0 acctnum goods text)+    (c hash b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))+    ((3 2) (1 0)) ((3 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk b) (privk m))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 11)+  (parent 9)+  (seen 8)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods nb-0 text)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 12)+  (parent 10)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb goods price acctnum goods-0 nb-0 nm-0 price-0 text)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)+    (price price-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))+    ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 13)+  (parent 10)+  (unrealized (0 0) (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price nb-0 acctnum goods text)+    (c hash hash-0 b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))+    ((3 2) (2 0)) ((3 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 14)+  (parent 12)+  (seen 8)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price acctnum goods nb-0 nm-0 price-0 text)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))+    ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 15)+  (parent 13)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nc nb price nb-0 nm-0 price-0 acctnum goods text)+    (c hash hash-0 b m name))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))+    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 16)+  (parent 15)+  (seen 11)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")++(defprotocol epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum text) (hash name) (nc nm nb price text))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum nb nc nm goods price text))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m hash name) (nb nc nm goods price text))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price text) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 17)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price nc-0 goods price-0 text)+    (b m c hash c-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc-0) (nm nm) (goods goods)+    (price price-0) (b b) (c c-0) (m m) (hash hash))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand merchant 4)+    (enc (enc "hash" b m nb nm (pubk hash)) (privk m)) (0 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c-0 nc-0 goods (pubk m)))+      (send (enc nc-0 nm m price-0 (pubk c-0)))+      (recv+        (cat+          (enc (enc "hash" c-0 nc-0 nb nm price-0 (pubk hash))+            (privk b)) nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 18)+  (parent 17)+  (unrealized (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods text) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (1 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 19)+  (parent 18)+  (unrealized (0 0) (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods acctnum-0 goods-0 text)+    (b m c hash b-0 m-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m-0) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 5) nb (1 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m-0)))+      (recv (enc nc nm m-0 price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          nb))))+  (label 20)+  (parent 19)+  (unrealized (0 0) (2 1) (2 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods acctnum-0 goods-0 text)+    (b m c hash b-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b-0) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (m-0 m)) nm (2 1)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          nb))))+  (label 21)+  (parent 20)+  (unrealized (0 0) (1 0) (2 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price goods acctnum-0 goods-0 text)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (2 3))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 22)+  (parent 21)+  (unrealized (0 0) (1 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods text) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 23)+  (parent 22)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars+    (nm nb nc acctnum price goods acctnum-0 goods-0 nm-0 price-0 text)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods-0) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods-0)+    (price price-0) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand merchant 2) nc (1 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 24)+  (parent 22)+  (unrealized (0 0) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods text) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 25)+  (parent 23)+  (unrealized (0 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 text)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 26)+  (parent 24)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods text) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 27)+  (parent 25)+  (unrealized)+  (shape))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 1) (3 0)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand bank 2) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum-0 price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 28)+  (parent 25)+  (unrealized (0 0) (3 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 text)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 29)+  (parent 26)+  (unrealized (0 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (3 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 3) nm (3 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 30)+  (parent 28)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods nm-0 price-0 text)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 31)+  (parent 29)+  (seen 27)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 1) (4 0)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0))+    ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand bank 2) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum-0 price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 32)+  (parent 29)+  (unrealized (0 0) (4 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (3 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 33)+  (parent 30)+  (seen 27)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc acctnum price acctnum-0 goods nm-0 price-0 nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (4 0)) ((2 4) (1 2)) ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand customer 3) nm (4 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 34)+  (parent 32)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton epmo_acctnum+  (vars (nm nb nc price acctnum goods nm-0 price-0 nb-0 text)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (nc nc) (nm nm) (nb nb)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (nb nb) (nc nc) (nm nm) (goods goods)+    (price price) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (nb nb) (nc nc) (nm nm)+    (goods goods) (price price) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (nc nc) (nm nm-0) (goods goods) (price price-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (nc nc) (nm nm) (nb nb-0)+    (price price) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (4 0)) ((2 4) (1 2)) ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 35)+  (parent 34)+  (seen 33)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")
tst/ffgg.tst view
@@ -1,7 +1,7 @@ (herald "The ffgg Protocol"   (comment "From A Necessarily Parallel Attack by Jon K. Millen")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol ffgg basic
tst/fragile_pruning.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol fragile_pruning basic
tst/isoreject.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol isoreject basic
tst/kelly1.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol kelly1 basic
tst/kelly64.lisp view
@@ -1,4 +1,4 @@-;; Kelly's 64-shape protocol+(herald "Kelly's 64-shape protocol" (bound 10))  (defprotocol kelly64 basic   (defrole client
tst/kerberos.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol kerberos basic
tst/missing_contraction.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol missing-contraction basic
tst/neuman-stubblebine-reauth.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol neuman-stubblebine-reauth basic
tst/neuman-stubblebine.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol neuman-stubblebine basic
tst/no_contraction.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol no-contraction basic
tst/non_transforming.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol non_transforming basic
tst/nonaug-prune.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol nonaug-prune basic
tst/ns.tst view
@@ -1,6 +1,6 @@ (herald "Needham-Schroeder Public-Key Protocol Variants") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol ns basic
tst/nsl3.tst view
@@ -1,6 +1,6 @@ (herald "Three Party Needham-Schroeder-Lowe Protocol") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol nsl3 basic
tst/nsl4cm1.tst view
@@ -1,6 +1,6 @@ (herald "Four Party Needham-Schroeder-Lowe Protocol") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol nsl4cm basic@@ -2499,7 +2499,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1))@@ -2522,8 +2522,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 75)   (parent 28)   (seen 20 211)@@ -2540,7 +2540,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1))@@ -2563,8 +2563,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 76)   (parent 28)   (seen 20 216)@@ -2621,7 +2621,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -2643,8 +2643,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 78)   (parent 29)   (seen 226)@@ -2661,7 +2661,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -2683,8 +2683,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))   (label 79)   (parent 29)   (seen 232)@@ -2959,7 +2959,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -2981,13 +2981,13 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nb-0 (pubk c)))-      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nc-0 (pubk c)))+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))   (label 87)   (parent 33)-  (seen 160 218 235 258)+  (seen 160 258)   (unrealized (0 1) (5 0))-  (comment "7 in cohort - 3 not yet seen"))+  (comment "7 in cohort - 5 not yet seen"))  (defskeleton nsl4cm   (vars (nb nc nd nc-0 nb-0 nd-0 nc-1 text) (a b c d name))@@ -2999,7 +2999,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -3021,13 +3021,13 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nb-0 (pubk c)))+      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))   (label 88)   (parent 33)-  (seen 160 261)+  (seen 160 213 229 263)   (unrealized (0 1) (5 0))-  (comment "7 in cohort - 5 not yet seen"))+  (comment "7 in cohort - 3 not yet seen"))  (defskeleton nsl4cm   (vars (nb nc nd nb-0 nc-0 nc-1 nb-1 text) (a b c d name))@@ -3074,7 +3074,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0))@@ -3098,13 +3098,13 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))   (label 90)   (parent 34)-  (seen 99 111)+  (seen 111 128 129 268)   (unrealized (0 1) (4 0) (6 0))-  (comment "7 in cohort - 4 not yet seen"))+  (comment "7 in cohort - 2 not yet seen"))  (defskeleton nsl4cm   (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 text) (a b c d name))@@ -3117,7 +3117,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0))@@ -3141,13 +3141,13 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-2 (pubk c)))+      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))   (label 91)   (parent 34)-  (seen 111 128 129 272)+  (seen 99 111)   (unrealized (0 1) (4 0) (6 0))-  (comment "7 in cohort - 2 not yet seen"))+  (comment "7 in cohort - 4 not yet seen"))  (defskeleton nsl4cm   (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 text) (a b c d name))@@ -4040,7 +4040,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (2 0)) ((5 1) (0 1)))@@ -4062,8 +4062,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 115)   (parent 42)   (unrealized (0 1) (5 0))@@ -4079,7 +4079,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (2 0)) ((5 1) (0 1)))@@ -4101,8 +4101,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 116)   (parent 42)   (unrealized (0 1) (5 0))@@ -4445,7 +4445,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (2 0)) ((5 1) (0 1)))@@ -4467,8 +4467,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 126)   (parent 45)   (unrealized (0 1) (5 0))@@ -4484,7 +4484,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (2 0)) ((5 1) (0 1)))@@ -4506,8 +4506,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 127)   (parent 45)   (unrealized (0 1) (5 0))@@ -4983,7 +4983,7 @@   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((1 1) (3 0)) ((2 1) (0 1)) ((3 1) (0 1)) ((4 1) (3 0))@@ -5005,15 +5005,15 @@       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b d nb-0 nb-1 (pubk c)))-      (send (enc a b c nb-0 nb-1 nc-1 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))   (label 140)   (parent 50)   (unrealized (0 1) (3 0) (5 0))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nb-0 nc-0 nd-0 nb-1 nc-1 text) (a b c d name))+  (vars (nb nc nd nb-0 nc-0 nd-0 nb-1 text) (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))@@ -5022,14 +5022,11 @@   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)-    (d d))-  (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((0 0) (5 0)) ((1 1) (2 0))-    ((1 1) (3 0)) ((2 1) (0 1)) ((3 1) (0 1)) ((4 1) (3 0))-    ((5 1) (3 0)))+  (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((1 1) (2 0)) ((2 1) (3 0))+    ((3 1) (0 1)) ((4 1) (3 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (added-strand resp2 2) nb-0 (3 0)+  (operation nonce-test (displaced 5 2 resp2 2) nb-0 (3 0)     (enc a b d nb-0 nb-0 (pubk c)) (enc a b d nb-0 nb-1 (pubk c))     (enc a c d nb-0 (pubk b)))   (traces@@ -5043,16 +5040,14 @@     ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))-      (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))+      (send (enc a b d nb-0 nb-1 (pubk c)))))   (label 141)   (parent 50)-  (unrealized (0 1) (3 0) (5 0))+  (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nb-0 nc-0 nd-0 nb-1 text) (a b c d name))+  (vars (nb nc nd nb-0 nc-0 nd-0 nb-1 nc-1 text) (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))@@ -5061,11 +5056,14 @@   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((1 1) (2 0)) ((2 1) (3 0))-    ((3 1) (0 1)) ((4 1) (3 0)))+  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)+    (d d))+  (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((0 0) (5 0)) ((1 1) (2 0))+    ((1 1) (3 0)) ((2 1) (0 1)) ((3 1) (0 1)) ((4 1) (3 0))+    ((5 1) (3 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (displaced 5 2 resp2 2) nb-0 (3 0)+  (operation nonce-test (added-strand resp2 2) nb-0 (3 0)     (enc a b d nb-0 nb-0 (pubk c)) (enc a b d nb-0 nb-1 (pubk c))     (enc a c d nb-0 (pubk b)))   (traces@@ -5079,10 +5077,12 @@     ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))-      (send (enc a b d nb-0 nb-1 (pubk c)))))+      (send (enc a b d nb-0 nb-1 (pubk c))))+    ((recv (enc a b d nb-0 nb-1 (pubk c)))+      (send (enc a b c nb-0 nb-1 nc-1 (pubk d)))))   (label 142)   (parent 50)-  (unrealized (0 1))+  (unrealized (0 1) (3 0) (5 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -6007,7 +6007,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -6029,8 +6029,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 169)   (parent 60)   (unrealized (0 1) (5 0))@@ -6046,7 +6046,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (0 1)) ((3 1) (4 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -6068,8 +6068,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 170)   (parent 60)   (unrealized (0 1) (5 0))@@ -6445,7 +6445,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (0 1)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -6467,8 +6467,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nb-0 (pubk c)))-      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nc-0 (pubk c)))+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))   (label 181)   (parent 65)   (unrealized (0 1) (5 0))@@ -6484,7 +6484,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (4 0)) ((3 1) (0 1)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -6506,8 +6506,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nb-0 (pubk c)))+      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))   (label 182)   (parent 65)   (unrealized (0 1) (5 0))@@ -6707,7 +6707,7 @@   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (3 0)) ((3 1) (0 1)) ((4 1) (3 0)) ((5 1) (0 1)))@@ -6729,8 +6729,8 @@       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nc-0 (pubk b)))       (send (enc a b d nc-0 nb-0 (pubk c))))-    ((recv (enc a b d nc-0 nb-0 (pubk c)))-      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nc-0 (pubk c)))+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))   (label 188)   (parent 67)   (unrealized (0 1) (5 0))@@ -6746,7 +6746,7 @@   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (4 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((2 1) (3 0)) ((3 1) (0 1)) ((4 1) (3 0)) ((5 1) (0 1)))@@ -6768,8 +6768,8 @@       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nc-0 (pubk b)))       (send (enc a b d nc-0 nb-0 (pubk c))))-    ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nb-0 (pubk c)))+      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))   (label 189)   (parent 67)   (unrealized (0 1) (5 0))@@ -6891,7 +6891,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (0 1))@@ -6916,8 +6916,8 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 193)   (parent 70)   (unrealized (0 1) (6 0))@@ -6934,7 +6934,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (0 1))@@ -6959,8 +6959,8 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 194)   (parent 70)   (unrealized (0 1) (6 0))@@ -7015,7 +7015,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0))@@ -7039,8 +7039,8 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))   (label 196)   (parent 71)   (unrealized (0 1) (4 0) (6 0))@@ -7057,7 +7057,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0))@@ -7081,8 +7081,8 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-2 (pubk c)))+      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))   (label 197)   (parent 71)   (unrealized (0 1) (4 0) (6 0))@@ -7348,7 +7348,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0))@@ -7371,8 +7371,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 204)   (parent 73)   (unrealized (0 1) (5 0))@@ -7388,7 +7388,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0))@@ -7411,8 +7411,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 205)   (parent 73)   (unrealized (0 1) (5 0))@@ -7581,7 +7581,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))@@ -7603,8 +7603,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c)))))   (label 210)@@ -7622,7 +7622,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))     ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1))@@ -7643,8 +7643,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 211)   (parent 75)   (unrealized (0 1) (5 0))@@ -7660,7 +7660,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (0 1))     ((3 1) (2 0)) ((3 1) (4 0)) ((3 1) (5 0)) ((4 1) (0 1))@@ -7681,8 +7681,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))-      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 212)   (parent 75)   (unrealized (0 1) (5 0))@@ -7698,7 +7698,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (5 0))     ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -7718,11 +7718,11 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 213)   (parent 75)-  (unrealized (0 1) (5 0))+  (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm@@ -7735,7 +7735,7 @@   (defstrand resp1 2 (na nc-1) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-1) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-1) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-1) (nb nc-1) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (0 1))     ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (5 0)) ((5 1) (0 1)))@@ -7755,11 +7755,11 @@       (send (enc a b d nc-1 nb-0 (pubk c))))     ((recv (enc a b d nc-1 nb-0 (pubk c)))       (send (enc a b c nc-1 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-1 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-1 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-1 nc-1 nc-0 (pubk d)))+      (send (enc b c d nc-1 nc-1 nc-0 nd-0 (pubk a)))))   (label 214)   (parent 75)-  (unrealized (0 1))+  (unrealized (0 1) (5 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -7772,7 +7772,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))@@ -7794,8 +7794,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c)))))   (label 215)@@ -7813,7 +7813,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))     ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1))@@ -7834,8 +7834,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 216)   (parent 76)   (unrealized (0 1) (5 0))@@ -7851,7 +7851,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-1) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (0 1))     ((3 1) (2 0)) ((3 1) (4 0)) ((3 1) (5 0)) ((4 1) (0 1))@@ -7872,8 +7872,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-1 nc-1 (pubk d)))+      (send (enc b c d nb-0 nb-1 nc-1 nd-0 (pubk a)))))   (label 217)   (parent 76)   (unrealized (0 1) (5 0))@@ -7889,7 +7889,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (5 0))     ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -7909,11 +7909,11 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))   (label 218)   (parent 76)-  (unrealized (0 1))+  (unrealized (0 1) (5 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -7926,7 +7926,7 @@   (defstrand resp1 2 (na nc-1) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-1) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-1) (nb nc-1) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-1) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (0 1))     ((3 1) (2 0)) ((3 1) (4 0)) ((4 1) (5 0)) ((5 1) (0 1)))@@ -7946,11 +7946,11 @@       (send (enc a b d nc-1 nb-0 (pubk c))))     ((recv (enc a b d nc-1 nb-0 (pubk c)))       (send (enc a b c nc-1 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-1 nc-1 nc-0 (pubk d)))-      (send (enc b c d nc-1 nc-1 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-1 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-1 nb-0 nc-1 nd-0 (pubk a)))))   (label 219)   (parent 76)-  (unrealized (0 1) (5 0))+  (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm@@ -8152,7 +8152,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nc-0) (nb nb-1) (a a) (b b) (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))@@ -8174,8 +8174,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nc-0 (pubk b)))       (send (enc a b d nc-0 nb-1 (pubk c)))))   (label 225)@@ -8193,7 +8193,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8213,8 +8213,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 226)   (parent 78)   (unrealized (0 1) (5 0))@@ -8230,7 +8230,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((3 1) (2 0)) ((3 1) (5 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8250,8 +8250,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 227)   (parent 78)   (unrealized (0 1) (5 0))@@ -8266,7 +8266,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nb-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (2 0)) ((1 1) (3 0)) ((2 1) (1 0)) ((2 1) (4 0))     ((3 1) (0 1)) ((4 1) (0 1)))@@ -8284,8 +8284,8 @@       (send (enc a b d nb-0 nb-0 (pubk c))))     ((recv (enc a b d nb-0 nb-0 (pubk c)))       (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nb-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nb-0 nd-0 (pubk a)))))   (label 228)   (parent 78)   (unrealized (0 1) (4 0))@@ -8301,7 +8301,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((2 1) (5 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8321,11 +8321,11 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 229)   (parent 78)-  (unrealized (0 1) (5 0))+  (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm@@ -8338,7 +8338,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((3 1) (2 0)) ((4 1) (5 0)) ((5 1) (0 1)))@@ -8358,8 +8358,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-0 (pubk d))))-    ((recv (enc a b c nc-0 nb-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nb-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))   (label 230)   (parent 78)   (unrealized (0 1))@@ -8375,7 +8375,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nc-0) (nb nb-1) (a a) (b b) (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))@@ -8397,8 +8397,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a))))     ((recv (enc a c d nc-0 (pubk b)))       (send (enc a b d nc-0 nb-1 (pubk c)))))   (label 231)@@ -8416,7 +8416,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8436,8 +8436,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))   (label 232)   (parent 79)   (unrealized (0 1) (5 0))@@ -8453,7 +8453,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((3 1) (2 0)) ((3 1) (5 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8473,8 +8473,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))   (label 233)   (parent 79)   (unrealized (0 1) (5 0))@@ -8489,7 +8489,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nb-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (2 0)) ((1 1) (3 0)) ((2 1) (1 0)) ((2 1) (4 0))     ((3 1) (0 1)) ((4 1) (0 1)))@@ -8507,8 +8507,8 @@       (send (enc a b d nb-0 nb-0 (pubk c))))     ((recv (enc a b d nb-0 nb-0 (pubk c)))       (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))-    ((recv (enc a b c nb-0 nb-0 nb-0 (pubk d)))-      (send (enc b c d nb-0 nb-0 nb-0 nd-0 (pubk a)))))+    ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 234)   (parent 79)   (unrealized (0 1) (4 0))@@ -8524,7 +8524,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-1) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((2 1) (5 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -8544,11 +8544,11 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-1 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-1 nd-0 (pubk a)))))   (label 235)   (parent 79)-  (unrealized (0 1))+  (unrealized (0 1) (5 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -8561,7 +8561,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))-  (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)+  (defstrand resp3 2 (na nc-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((3 1) (2 0)) ((4 1) (5 0)) ((5 1) (0 1)))@@ -8581,8 +8581,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b d nc-0 nb-0 (pubk c)))       (send (enc a b c nc-0 nb-0 nc-0 (pubk d))))-    ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))-      (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a)))))+    ((recv (enc a b c nc-0 nb-0 nc-0 (pubk d)))+      (send (enc b c d nc-0 nb-0 nc-0 nd-0 (pubk a)))))   (label 236)   (parent 79)   (unrealized (0 1))@@ -8599,7 +8599,7 @@   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0))@@ -8623,8 +8623,8 @@       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-1 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))   (label 237)   (parent 80)   (unrealized (0 1) (4 0) (6 0))@@ -8641,7 +8641,7 @@   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (6 0))     ((1 1) (2 0)) ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0))@@ -8665,8 +8665,8 @@       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nb-0 nb-2 (pubk c)))+      (send (enc a b c nb-0 nb-2 nc-1 (pubk d)))))   (label 238)   (parent 80)   (unrealized (0 1) (4 0) (6 0))@@ -9003,7 +9003,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0))@@ -9025,8 +9025,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nb-0 nb-1 (pubk c)))-      (send (enc a b c nb-0 nb-1 nc-1 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))   (label 247)   (parent 83)   (unrealized (0 1) (4 0) (5 0))@@ -9042,7 +9042,7 @@   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nb-0) (nb nb-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (2 0))     ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((3 1) (4 0))@@ -9064,8 +9064,8 @@       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b c nb-0 nb-0 nc-0 (pubk d)))       (send (enc b c d nb-0 nb-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nb-0 nb-1 (pubk c)))+      (send (enc a b c nb-0 nb-1 nc-1 (pubk d)))))   (label 248)   (parent 83)   (unrealized (0 1) (4 0) (5 0))@@ -9387,7 +9387,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nc-0) (nb nb-1) (a a) (b b) (c c) (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))@@ -9409,8 +9409,8 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nb-0 (pubk c)))-      (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))+    ((recv (enc a b d nc-0 nc-0 (pubk c)))+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d))))     ((recv (enc a c d nc-0 (pubk b)))       (send (enc a b d nc-0 nb-1 (pubk c)))))   (label 257)@@ -9428,7 +9428,7 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))     ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))@@ -9448,52 +9448,15 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nb-0 (pubk c)))-      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nc-0 (pubk c)))+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))   (label 258)   (parent 87)-  (unrealized (0 1) (5 0))-  (comment "aborted"))--(defskeleton nsl4cm-  (vars (nb nc nd nb-0 nd-0 nc-0 text) (a b c d name))-  (defstrand init 3 (na nd-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)-    (d d))-  (defstrand resp1 2 (na nd-0) (nb nd-0) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nd-0) (nb nd-0) (nc nd-0) (a a) (b b) (c c)-    (d d))-  (defstrand resp1 2 (na nd-0) (nb nb-0) (a a) (b b) (c c) (d d))-  (defstrand resp3 2 (na nd-0) (nb nd-0) (nc nd-0) (nd nd-0) (a a) (b b)-    (c c) (d d))-  (defstrand resp2 2 (na nd-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)-    (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))-    ((3 1) (2 0)) ((4 1) (5 0)) ((5 1) (0 1)))-  (non-orig (privk a) (privk b) (privk c) (privk d))-  (uniq-orig nd-0)-  (operation nonce-test (displaced 6 4 resp3 2) nc-1 (5 0)-    (enc a c d nc-1 (pubk b)))-  (traces-    ((send (enc a c d nd-0 (pubk b)))-      (recv (enc b c d nd-0 nb nc nd (pubk a)))-      (send (enc nb nc nd (pubk b))))-    ((recv (enc a c d nd-0 (pubk b)))-      (send (enc a b d nd-0 nd-0 (pubk c))))-    ((recv (enc a b d nd-0 nd-0 (pubk c)))-      (send (enc a b c nd-0 nd-0 nd-0 (pubk d))))-    ((recv (enc a c d nd-0 (pubk b)))-      (send (enc a b d nd-0 nb-0 (pubk c))))-    ((recv (enc a b c nd-0 nd-0 nd-0 (pubk d)))-      (send (enc b c d nd-0 nd-0 nd-0 nd-0 (pubk a))))-    ((recv (enc a b d nd-0 nb-0 (pubk c)))-      (send (enc a b c nd-0 nb-0 nc-0 (pubk d)))))-  (label 259)-  (parent 87)   (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nc-0 nb-0 nd-0 nc-1 nb-1 text) (a b c d name))+  (vars (nb nc nd nc-0 nb-0 nd-0 nc-1 text) (a b c d name))   (defstrand init 3 (na nc-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nc-0) (nb nc-0) (a a) (b b) (c c) (d d))@@ -9504,13 +9467,11 @@     (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp1 2 (na nc-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))-    ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1))-    ((6 1) (5 0)))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))+    ((3 1) (2 0)) ((3 1) (5 0)) ((4 1) (0 1)) ((5 1) (0 1)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nc-0)-  (operation nonce-test (added-strand resp1 2) nc-0 (5 0)+  (operation nonce-test (displaced 6 3 resp1 2) nc-0 (5 0)     (enc a c d nc-0 (pubk b)))   (traces     ((send (enc a c d nc-0 (pubk b)))@@ -9525,11 +9486,9 @@     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))     ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d))))-    ((recv (enc a c d nc-0 (pubk b)))-      (send (enc a b d nc-0 nb-1 (pubk c)))))-  (label 260)-  (parent 88)+      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+  (label 259)+  (parent 87)   (unrealized (0 1) (5 0))   (comment "aborted")) @@ -9545,11 +9504,11 @@     (c c) (d d))   (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))-    ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))+    ((2 1) (5 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nc-0)-  (operation nonce-test (displaced 6 1 resp1 2) nc-0 (5 0)+  (operation nonce-test (displaced 6 2 resp2 2) nc-0 (5 0)     (enc a c d nc-0 (pubk b)))   (traces     ((send (enc a c d nc-0 (pubk b)))@@ -9565,13 +9524,50 @@       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))     ((recv (enc a b d nc-0 nc-0 (pubk c)))       (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+  (label 260)+  (parent 87)+  (unrealized (0 1))+  (comment "aborted"))++(defskeleton nsl4cm+  (vars (nb nc nd nb-0 nd-0 nc-0 text) (a b c d name))+  (defstrand init 3 (na nd-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)+    (d d))+  (defstrand resp1 2 (na nd-0) (nb nd-0) (a a) (b b) (c c) (d d))+  (defstrand resp2 2 (na nd-0) (nb nd-0) (nc nd-0) (a a) (b b) (c c)+    (d d))+  (defstrand resp1 2 (na nd-0) (nb nb-0) (a a) (b b) (c c) (d d))+  (defstrand resp3 2 (na nd-0) (nb nd-0) (nc nd-0) (nd nd-0) (a a) (b b)+    (c c) (d d))+  (defstrand resp2 2 (na nd-0) (nb nd-0) (nc nc-0) (a a) (b b) (c c)+    (d d))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))+    ((3 1) (2 0)) ((4 1) (5 0)) ((5 1) (0 1)))+  (non-orig (privk a) (privk b) (privk c) (privk d))+  (uniq-orig nd-0)+  (operation nonce-test (displaced 6 4 resp3 2) nc-1 (5 0)+    (enc a c d nc-1 (pubk b)))+  (traces+    ((send (enc a c d nd-0 (pubk b)))+      (recv (enc b c d nd-0 nb nc nd (pubk a)))+      (send (enc nb nc nd (pubk b))))+    ((recv (enc a c d nd-0 (pubk b)))+      (send (enc a b d nd-0 nd-0 (pubk c))))+    ((recv (enc a b d nd-0 nd-0 (pubk c)))+      (send (enc a b c nd-0 nd-0 nd-0 (pubk d))))+    ((recv (enc a c d nd-0 (pubk b)))+      (send (enc a b d nd-0 nb-0 (pubk c))))+    ((recv (enc a b c nd-0 nd-0 nd-0 (pubk d)))+      (send (enc b c d nd-0 nd-0 nd-0 nd-0 (pubk a))))+    ((recv (enc a b d nd-0 nd-0 (pubk c)))+      (send (enc a b c nd-0 nd-0 nc-0 (pubk d)))))   (label 261)-  (parent 88)+  (parent 87)   (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nc-0 nb-0 nd-0 nc-1 text) (a b c d name))+  (vars (nb nc nd nc-0 nb-0 nd-0 nc-1 nb-1 text) (a b c d name))   (defstrand init 3 (na nc-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nc-0) (nb nc-0) (a a) (b b) (c c) (d d))@@ -9580,13 +9576,15 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))-    ((3 1) (2 0)) ((3 1) (5 0)) ((4 1) (0 1)) ((5 1) (0 1)))+  (defstrand resp1 2 (na nc-0) (nb nb-1) (a a) (b b) (c c) (d d))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (6 0)) ((1 1) (2 0))+    ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1))+    ((6 1) (5 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nc-0)-  (operation nonce-test (displaced 6 3 resp1 2) nc-0 (5 0)+  (operation nonce-test (added-strand resp1 2) nc-0 (5 0)     (enc a c d nc-0 (pubk b)))   (traces     ((send (enc a c d nc-0 (pubk b)))@@ -9600,8 +9598,10 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nb-0 (pubk c)))+      (send (enc a b c nc-0 nb-0 nc-1 (pubk d))))+    ((recv (enc a c d nc-0 (pubk b)))+      (send (enc a b d nc-0 nb-1 (pubk c)))))   (label 262)   (parent 88)   (unrealized (0 1) (5 0))@@ -9617,13 +9617,13 @@   (defstrand resp1 2 (na nc-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nc-0) (nb nc-0) (nc nc-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nc-0) (nb nc-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nc-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))-    ((2 1) (5 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((1 1) (5 0))+    ((2 1) (4 0)) ((3 1) (2 0)) ((4 1) (0 1)) ((5 1) (0 1)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nc-0)-  (operation nonce-test (displaced 6 2 resp2 2) nc-0 (5 0)+  (operation nonce-test (displaced 6 1 resp1 2) nc-0 (5 0)     (enc a c d nc-0 (pubk b)))   (traces     ((send (enc a c d nc-0 (pubk b)))@@ -9637,11 +9637,11 @@       (send (enc a b d nc-0 nb-0 (pubk c))))     ((recv (enc a b c nc-0 nc-0 nc-0 (pubk d)))       (send (enc b c d nc-0 nc-0 nc-0 nd-0 (pubk a))))-    ((recv (enc a b d nc-0 nc-0 (pubk c)))-      (send (enc a b c nc-0 nc-0 nc-1 (pubk d)))))+    ((recv (enc a b d nc-0 nb-0 (pubk c)))+      (send (enc a b c nc-0 nb-0 nc-1 (pubk d)))))   (label 263)   (parent 88)-  (unrealized (0 1))+  (unrealized (0 1) (5 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -9654,7 +9654,7 @@   (defstrand resp1 2 (na nd-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp3 2 (na nd-0) (nb nd-0) (nc nd-0) (nd nd-0) (a a) (b b)     (c c) (d d))-  (defstrand resp2 2 (na nd-0) (nb nd-0) (nc nc-0) (a a) (b b) (c c)+  (defstrand resp2 2 (na nd-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((1 1) (2 0)) ((2 1) (4 0))     ((3 1) (2 0)) ((4 1) (5 0)) ((5 1) (0 1)))@@ -9674,8 +9674,8 @@       (send (enc a b d nd-0 nb-0 (pubk c))))     ((recv (enc a b c nd-0 nd-0 nd-0 (pubk d)))       (send (enc b c d nd-0 nd-0 nd-0 nd-0 (pubk a))))-    ((recv (enc a b d nd-0 nd-0 (pubk c)))-      (send (enc a b c nd-0 nd-0 nc-0 (pubk d)))))+    ((recv (enc a b d nd-0 nb-0 (pubk c)))+      (send (enc a b c nd-0 nb-0 nc-0 (pubk d)))))   (label 264)   (parent 88)   (unrealized (0 1))@@ -9799,8 +9799,7 @@   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 nb-3 text)-    (a b c d name))+  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 text) (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))@@ -9810,15 +9809,14 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)     (d d))-  (defstrand resp1 2 (na nb-0) (nb nb-3) (a a) (b b) (c c) (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (7 0))-    ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0))-    ((5 1) (4 0)) ((6 1) (4 0)) ((7 1) (6 0)))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (6 0))+    ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)) ((5 1) (4 0))+    ((6 1) (4 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (added-strand resp1 2) nb-0 (6 0)+  (operation nonce-test (displaced 7 1 resp1 2) nb-0 (6 0)     (enc a c d nb-0 (pubk b)))   (traces     ((send (enc a c d nb-0 (pubk b)))@@ -9834,58 +9832,53 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-2 (pubk d))))-    ((recv (enc a c d nb-0 (pubk b)))-      (send (enc a b d nb-0 nb-3 (pubk c)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))   (label 268)   (parent 90)-  (unrealized (0 1) (4 0) (6 0))+  (unrealized (0 1) (4 0))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 text) (a b c d name))+  (vars (nb nc nd nc-0 nb-0 nc-1 nb-1 nc-2 text) (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))-  (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))-  (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))-  (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))-    ((2 1) (0 1)) ((3 1) (6 0)) ((4 1) (2 0)) ((5 1) (4 0))-    ((6 1) (4 0)))+  (precedes ((0 0) (2 0)) ((0 0) (4 0)) ((1 1) (0 1)) ((2 1) (5 0))+    ((3 1) (1 0)) ((4 1) (3 0)) ((5 1) (3 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (displaced 7 3 resp1 2) nb-0 (6 0)-    (enc a c d nb-0 (pubk b)))+  (operation nonce-test (displaced 7 3 resp1 2) nb-2 (6 0)+    (enc a c d nb-2 (pubk b)))   (traces     ((send (enc a c d nb-0 (pubk b)))       (recv (enc b c d nb-0 nb nc nd (pubk a)))       (send (enc nb nc nd (pubk b))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-0 (pubk c))))     ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))+      (send (enc a b c nb-0 nb-0 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b d nb-0 nb-1 (pubk c)))-      (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))-    ((recv (enc a c d nb-0 (pubk b)))-      (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-0 (pubk c)))+      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))   (label 269)   (parent 90)-  (unrealized (0 1) (6 0))+  (unrealized (0 1))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 text) (a b c d name))+  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 nb-3 text)+    (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))@@ -9897,12 +9890,13 @@   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))   (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))-    ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)) ((5 1) (6 0))-    ((6 1) (4 0)))+  (defstrand resp1 2 (na nb-0) (nb nb-3) (a a) (b b) (c c) (d d))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((0 0) (7 0))+    ((1 1) (4 0)) ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0))+    ((5 1) (4 0)) ((6 1) (4 0)) ((7 1) (6 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (displaced 7 5 resp1 2) nb-0 (6 0)+  (operation nonce-test (added-strand resp1 2) nb-0 (6 0)     (enc a c d nb-0 (pubk b)))   (traces     ((send (enc a c d nb-0 (pubk b)))@@ -9919,47 +9913,53 @@     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))     ((recv (enc a b d nb-0 nb-2 (pubk c)))-      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))+      (send (enc a b c nb-0 nb-2 nc-2 (pubk d))))+    ((recv (enc a c d nb-0 (pubk b)))+      (send (enc a b d nb-0 nb-3 (pubk c)))))   (label 270)-  (parent 90)-  (unrealized (0 1) (4 0))+  (parent 91)+  (unrealized (0 1) (4 0) (6 0))   (comment "aborted"))  (defskeleton nsl4cm-  (vars (nb nc nd nc-0 nb-0 nc-1 nb-1 nc-2 text) (a b c d name))+  (vars (nb nc nd nb-0 nc-0 nb-1 nc-1 nb-2 nc-2 text) (a b c d name))   (defstrand init 3 (na nb-0) (nb nb) (nc nc) (nd nd) (a a) (b b) (c c)     (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)-    (d d))   (defstrand resp1 2 (na nb-0) (nb nb-0) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-0) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (2 0)) ((0 0) (4 0)) ((1 1) (0 1)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 1) (3 0)) ((5 1) (3 0)))+  (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))+  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)+    (d d))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))+    ((2 1) (0 1)) ((3 1) (6 0)) ((4 1) (2 0)) ((5 1) (4 0))+    ((6 1) (4 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (displaced 7 3 resp1 2) nb-2 (6 0)-    (enc a c d nb-2 (pubk b)))+  (operation nonce-test (displaced 7 3 resp1 2) nb-0 (6 0)+    (enc a c d nb-0 (pubk b)))   (traces     ((send (enc a c d nb-0 (pubk b)))       (recv (enc b c d nb-0 nb nc nd (pubk a)))       (send (enc nb nc nd (pubk b))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-0 (pubk c))))     ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-1 (pubk d))))+      (send (enc a b c nb-0 nb-0 nc-0 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))     ((recv (enc a b d nb-0 nb-1 (pubk c)))-      (send (enc a b c nb-0 nb-1 nc-2 (pubk d)))))+      (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))+    ((recv (enc a c d nb-0 (pubk b)))+      (send (enc a b d nb-0 nb-2 (pubk c))))+    ((recv (enc a b d nb-0 nb-2 (pubk c)))+      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))   (label 271)-  (parent 90)-  (unrealized (0 1) (5 0))+  (parent 91)+  (unrealized (0 1) (6 0))   (comment "aborted"))  (defskeleton nsl4cm@@ -9973,14 +9973,14 @@   (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-2) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-2) (nc nc-2) (a a) (b b) (c c)     (d d))-  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (6 0))-    ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)) ((5 1) (4 0))+  (precedes ((0 0) (1 0)) ((0 0) (3 0)) ((0 0) (5 0)) ((1 1) (4 0))+    ((2 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)) ((5 1) (6 0))     ((6 1) (4 0)))   (non-orig (privk a) (privk b) (privk c) (privk d))   (uniq-orig nb-0)-  (operation nonce-test (displaced 7 1 resp1 2) nb-0 (6 0)+  (operation nonce-test (displaced 7 5 resp1 2) nb-0 (6 0)     (enc a c d nb-0 (pubk b)))   (traces     ((send (enc a c d nb-0 (pubk b)))@@ -9996,8 +9996,8 @@       (send (enc a b c nb-0 nb-1 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-2 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-2 (pubk c)))+      (send (enc a b c nb-0 nb-2 nc-2 (pubk d)))))   (label 272)   (parent 91)   (unrealized (0 1) (4 0))@@ -10013,7 +10013,7 @@   (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-1) (a a) (b b) (c c)     (d d))   (defstrand resp1 2 (na nb-0) (nb nb-1) (a a) (b b) (c c) (d d))-  (defstrand resp2 2 (na nb-0) (nb nb-0) (nc nc-2) (a a) (b b) (c c)+  (defstrand resp2 2 (na nb-0) (nb nb-1) (nc nc-2) (a a) (b b) (c c)     (d d))   (precedes ((0 0) (2 0)) ((0 0) (4 0)) ((1 1) (0 1)) ((2 1) (5 0))     ((3 1) (1 0)) ((4 1) (3 0)) ((5 1) (3 0)))@@ -10033,11 +10033,11 @@       (send (enc a b c nb-0 nb-0 nc-1 (pubk d))))     ((recv (enc a c d nb-0 (pubk b)))       (send (enc a b d nb-0 nb-1 (pubk c))))-    ((recv (enc a b d nb-0 nb-0 (pubk c)))-      (send (enc a b c nb-0 nb-0 nc-2 (pubk d)))))+    ((recv (enc a b d nb-0 nb-1 (pubk c)))+      (send (enc a b c nb-0 nb-1 nc-2 (pubk d)))))   (label 273)   (parent 91)-  (unrealized (0 1))+  (unrealized (0 1) (5 0))   (comment "aborted"))  (defskeleton nsl4cm
tst/nsl5.lisp view
@@ -1,3 +1,5 @@+(herald nsl5 (bound 10))+ (defprotocol nsl5 basic   (defrole init     (vars (a b c d e name)
tst/nslsk.tst view
@@ -1,6 +1,6 @@ (herald "Needham-Schroeder-Lowe Protocol with symmetric encryption") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol nslsk basic
tst/or.tst view
@@ -1,7 +1,7 @@ (herald "Otway-Rees Protocol"   (comment "Standard version using variables of sort mesg")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol or basic
− tst/pca.lsp 
@@ -1,36 +0,0 @@-(herald "Privacy Certificate Authority"-  (comment "Generation of an Attestation Identity Certificate"))--;;; PCA generation of AIC, simplified--;;; ki = identity key-;;; a = identity label-;;; t = TPM type/platform-;;; ke = endorsement key-;;; kp = PCA key-;;; km = manufacturer key-;;; (enc (cat ki a t) (invk kp)) is the signed AIC--(defprotocol pca basic-  (defrole tpm (vars (ke ki km kp akey) (t a text))-    (trace-     (send (cat (enc ki a (invk ki)) (enc t ke (invk km))))-     (recv (enc (enc ki a t (invk kp)) ke))-     (send (enc ki a t (invk kp))))-    (non-orig (invk ke) (invk ki) (invk km) (invk kp))-    (uniq-orig ki))-  (defrole pca (vars (ke ki km kp akey) (t a text))-    (trace-     (recv (cat (enc ki a (invk ki)) (enc t ke (invk km))))-     (send (enc (enc ki a t (invk kp)) ke)))-    (non-orig (invk ke) (invk ki) (invk km) (invk kp)))-  (defrole appr (vars (ki kp akey) (t a text))-    (trace-     (recv (enc ki a t (invk kp))))-    (non-orig (invk ki) (invk kp))))--;;; normal run--(defskeleton pca (vars (ki kp akey))-  (defstrand appr 1 (ki ki) (kp kp))-  (non-orig (invk ki) (invk kp)))
+ tst/pca.scm view
@@ -0,0 +1,36 @@+(herald "Privacy Certificate Authority"+  (comment "Generation of an Attestation Identity Certificate"))++;;; PCA generation of AIC, simplified++;;; ki = identity key+;;; a = identity label+;;; t = TPM type/platform+;;; ke = endorsement key+;;; kp = PCA key+;;; km = manufacturer key+;;; (enc (cat ki a t) (invk kp)) is the signed AIC++(defprotocol pca basic+  (defrole tpm (vars (ke ki km kp akey) (t a text))+    (trace+     (send (cat (enc ki a (invk ki)) (enc t ke (invk km))))+     (recv (enc (enc ki a t (invk kp)) ke))+     (send (enc ki a t (invk kp))))+    (non-orig (invk ke) (invk ki) (invk km) (invk kp))+    (uniq-orig ki))+  (defrole pca (vars (ke ki km kp akey) (t a text))+    (trace+     (recv (cat (enc ki a (invk ki)) (enc t ke (invk km))))+     (send (enc (enc ki a t (invk kp)) ke)))+    (non-orig (invk ke) (invk ki) (invk km) (invk kp)))+  (defrole appr (vars (ki kp akey) (t a text))+    (trace+     (recv (enc ki a t (invk kp))))+    (non-orig (invk ki) (invk kp))))++;;; normal run++(defskeleton pca (vars (ki kp akey))+  (defstrand appr 1 (ki ki) (kp kp))+  (non-orig (invk ki) (invk kp)))
tst/pca.tst view
@@ -1,7 +1,7 @@ (herald "Privacy Certificate Authority"   (comment "Generation of an Attestation Identity Certificate")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol pca basic
tst/pruning1.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol prune basic
tst/sigenc.tst view
@@ -1,7 +1,7 @@ (herald "Signed Encrypted Message Example"   (comment "Shows examples of key usage of asymmetric keys")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol mult-keys-sig-enc basic
− tst/sorted_epmo_acctnum.lsp 
@@ -1,89 +0,0 @@-(herald "Electronic Purchase with Money Order Protocol Variant"-  (comment "This version includes account numbers in exchanges"-	   "This version uses sorts to avoid confusion"-	   "between a nonce and other data"))--(defprotocol sorted_epmo_acctnum basic-  (defrole bank-    (vars (b c m name) (acctnum price text) (hash name) (nc nm nb data))-    (trace-     (recv (enc c nc nm acctnum price (pubk b)))-     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		(enc nc nb (pubk c))))-     (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (annotations b-      (1-        (forall ((pm name))-          (implies-            (and (authtransfer c acctnum b price pm nm)-              (reqtransfer pm b price pm nm))-            (dotransfer acctnum b price pm nm))))-      (2-        (and (says c (authtransfer c acctnum b price m nm))-          (says m (reqtransfer m b price m nm))))))-  (defrole customer-    (vars (b c m hash name) (acctnum goods price text) (nc nm nb data))-    (trace-     (send (enc c nc goods (pubk m)))-     (recv (enc nc nm m price (pubk c)))-     (send (enc c nc nm acctnum price (pubk b)))-     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		(enc nc nb (pubk c))))-     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		nb)))-    (non-orig (privk b) (privk hash))-    (uniq-orig nc)-    (annotations c-      (1-        (says m-          (implies-            (exists ((acctnum2 text))-              (dotransfer acctnum2 b price m nm)) (doship m goods c))))-      (3-        (says b-          (forall ((pm name))-            (implies-              (and (authtransfer c acctnum b price m nm)-                (reqtransfer pm b price pm nm))-              (dotransfer acctnum b price pm nm)))))-      (4 (authtransfer c acctnum b price m nm))))-  (defrole merchant (vars (b c m hash name) (goods price text) (nc nm nb data))-    (trace-     (recv (enc c nc goods (pubk m)))-     (send (enc nc nm m price (pubk c)))-     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-		nb))-     (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (uniq-orig nm)-    (annotations m-      (1-        (implies-          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))-          (doship m goods c)))-      (2-        (and-          (says b-            (forall ((pm name))-              (exists ((acctnum2 text))-                (implies-                  (and (authtransfer c acctnum2 b price m nm)-                    (reqtransfer pm b price pm nm))-                  (dotransfer acctnum2 b price pm nm)))))-          (says c-            (exists ((acctnum2 text))-              (authtransfer c acctnum2 b price m nm)))))-      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))--(defskeleton sorted_epmo_acctnum-  (vars (b m c name) (nm nc nb data) (hash name))-  (defstrand merchant 4 (b b) (m m) (c c) (nm nm) (nc nc) (nb nb) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb))--(defskeleton sorted_epmo_acctnum-  (vars (b m c name) (nm nb nc data) (hash name) (price acctnum text))-  (defstrand bank 3 (b b) (m m) (c c) (nm nm) (nb nb) (nc nc) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb))
+ tst/sorted_epmo_acctnum.scm view
@@ -0,0 +1,90 @@+(herald "Electronic Purchase with Money Order Protocol Variant"+  (displacement)+  (comment "This version includes account numbers in exchanges"+	   "This version uses sorts to avoid confusion"+	   "between a nonce and other data"))++(defprotocol sorted_epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum price text) (hash name) (nc nm nb data))+    (trace+     (recv (enc c nc nm acctnum price (pubk b)))+     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		(enc nc nb (pubk c))))+     (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum goods price text) (nc nm nb data))+    (trace+     (send (enc c nc goods (pubk m)))+     (recv (enc nc nm m price (pubk c)))+     (send (enc c nc nm acctnum price (pubk b)))+     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		(enc nc nb (pubk c))))+     (send (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant (vars (b c m hash name) (goods price text) (nc nm nb data))+    (trace+     (recv (enc c nc goods (pubk m)))+     (send (enc nc nm m price (pubk c)))+     (recv (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+		nb))+     (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton sorted_epmo_acctnum+  (vars (b m c name) (nm nc nb data) (hash name))+  (defstrand merchant 4 (b b) (m m) (c c) (nm nm) (nc nc) (nb nb) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb))++(defskeleton sorted_epmo_acctnum+  (vars (b m c name) (nm nb nc data) (hash name) (price acctnum text))+  (defstrand bank 3 (b b) (m m) (c c) (nm nm) (nb nb) (nc nc) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb))
tst/sorted_epmo_acctnum.tst view
@@ -1,12316 +1,1631 @@ (herald "Electronic Purchase with Money Order Protocol Variant"-  (comment "This version includes account numbers in exchanges"-    "This version uses sorts to avoid confusion"-    "between a nonce and other data"))--(comment "CPSA 2.2.0")-(comment "All input read")--(defprotocol sorted_epmo_acctnum basic-  (defrole bank-    (vars (b c m name) (acctnum price text) (hash name) (nc nm nb data))-    (trace (recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (annotations b-      (1-        (forall ((pm name))-          (implies-            (and (authtransfer c acctnum b price pm nm)-              (reqtransfer pm b price pm nm))-            (dotransfer acctnum b price pm nm))))-      (2-        (and (says c (authtransfer c acctnum b price m nm))-          (says m (reqtransfer m b price m nm))))))-  (defrole customer-    (vars (b c m hash name) (acctnum goods price text) (nc nm nb data))-    (trace (send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb)))-    (non-orig (privk b) (privk hash))-    (uniq-orig nc)-    (annotations c-      (1-        (says m-          (implies-            (exists ((acctnum2 text))-              (dotransfer acctnum2 b price m nm)) (doship m goods c))))-      (3-        (says b-          (forall ((pm name))-            (implies-              (and (authtransfer c acctnum b price m nm)-                (reqtransfer pm b price pm nm))-              (dotransfer acctnum b price pm nm)))))-      (4 (authtransfer c acctnum b price m nm))))-  (defrole merchant-    (vars (b c m hash name) (goods price text) (nc nm nb data))-    (trace (recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    (non-orig (privk hash))-    (uniq-orig nm)-    (annotations m-      (1-        (implies-          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))-          (doship m goods c)))-      (2-        (and-          (says b-            (forall ((pm name))-              (exists ((acctnum2 text))-                (implies-                  (and (authtransfer c acctnum2 b price m nm)-                    (reqtransfer pm b price pm nm))-                  (dotransfer acctnum2 b price pm nm)))))-          (says c-            (exists ((acctnum2 text))-              (authtransfer c acctnum2 b price m nm)))))-      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))--(defskeleton sorted_epmo_acctnum-  (vars (goods price text) (nm nc nb data) (b m c hash name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb)-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))-  (label 0)-  (unrealized (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum text) (nm nc nb data) (b m c hash name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (precedes ((0 1) (1 0)) ((1 1) (0 2)))-  (non-orig (privk b) (privk m) (privk c) (privk hash))-  (uniq-orig nm nc nb)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (0 2))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))))-  (label 1)-  (parent 0)-  (unrealized (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nm nc nb data)-    (b m c hash b-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 3) nm (1 0)-    (enc nc nm m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0)))))-  (label 2)-  (parent 1)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nm nc nb data)-    (m c hash b name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm-    (1 0) (enc nc nm m price (pubk c))-    (enc c nc nm acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))))-  (label 3)-  (parent 2)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nm nc nb nb-0 data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((0 1) (3 0)) ((1 1) (0 2)) ((2 0) (0 0))-    ((2 2) (1 0)) ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand bank 2) nm (1 0)-    (enc nc nm m price (pubk c))-    (enc c nc nm acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 4)-  (parent 2)-  (seen 7)-  (unrealized (0 0) (0 2) (1 0) (3 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nm nc nb data) (m c hash b name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))))-  (label 5)-  (parent 3)-  (seen 8)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nm nc nb nm-0 data)-    (m c hash b name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc)-    (nm nm-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))-    ((3 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 6)-  (parent 3)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nm nc nb nb-0 data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 3) nm (3 0)-    (enc nc nm m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 7)-  (parent 4)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nm nc nb data) (c hash b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))-    ((2 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 8)-  (parent 5)-  (unrealized)-  (shape))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nm nc nb nm-0 data)-    (m c hash b name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))-    ((3 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 9)-  (parent 6)-  (seen 12)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nm nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm-    (1 0) (enc "hash" c nc nb-0 nm price (pubk hash-0))-    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c))))))-  (label 10)-  (parent 7)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 4 3 bank 2) nm (1 0)-    (enc "hash" c nc nb-0 nm price (pubk hash-0))-    (enc nc nm m price (pubk c))-    (enc c nc nm acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 11)-  (parent 7)-  (seen 17)-  (unrealized (0 0) (0 2) (1 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price price-0 acctnum goods text) (nm nc nb nm-0 data)-    (c hash b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))-    ((3 2) (1 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk b) (privk m))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 12)-  (parent 9)-  (seen 8)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nm nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c))))))-  (label 13)-  (parent 10)-  (seen 18)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nm nc nb nb-0 nm-0 data) (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc)-    (nm nm-0) (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 14)-  (parent 10)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 15)-  (parent 11)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 0) (0 0))-    ((2 2) (3 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 16)-  (parent 11)-  (seen 23)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 17)-  (parent 11)-  (unrealized (0 0) (0 2) (1 0) (3 3))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nm nc nb nb-0 data)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nm nc nb)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 18)-  (parent 13)-  (seen 8)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nm nc nb nb-0 nm-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c)))))-  (label 19)-  (parent 14)-  (seen 26)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 20)-  (parent 15)-  (seen 27)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 21)-  (parent 15)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 3 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 22)-  (parent 16)-  (seen 30)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (b b-0) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 23)-  (parent 16)-  (seen 32)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 24)-  (parent 17)-  (seen 34)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 4 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (3 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 25)-  (parent 17)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price price-0 acctnum goods text) (nm nc nb nb-0 nm-0 data)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nm nc nb nm-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nm acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))-          (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm-0 m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nm m price (pubk c)))-      (send (enc c nc nm acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))-          nb))))-  (label 26)-  (parent 19)-  (seen 12)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 27)-  (parent 20)-  (seen 8)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))-    ((3 1) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 28)-  (parent 21)-  (seen 38)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 29)-  (parent 22)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 30)-  (parent 22)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nb-0-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 31)-  (parent 23)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb-0 (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 32)-  (parent 23)-  (seen 25)-  (unrealized (0 0) (0 2) (1 0) (4 3))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 5 2 bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 33)-  (parent 24)-  (seen 43)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 34)-  (parent 24)-  (seen 25 33)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 35)-  (parent 25)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (4 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 36)-  (parent 25)-  (seen 42 47)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 37)-  (parent 25)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price price-0 acctnum goods text) (nc nb nb-0 nm data)-    (c hash hash-0 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))-    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 38)-  (parent 28)-  (seen 12)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 39)-  (parent 29)-  (seen 54)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 40)-  (parent 29)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 41)-  (parent 30)-  (seen 58)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 42)-  (parent 30)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 3 bank 2)-    (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-1)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 43)-  (parent 30)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 44)-  (parent 31)-  (seen 64)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 45)-  (parent 31)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (added-strand bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 46)-  (parent 32)-  (seen 68)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation encryption-test (displaced 5 2 bank 2)-    (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0)) (privk b-0))-    (4 3))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0))))-  (label 47)-  (parent 32)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 48)-  (parent 33)-  (seen 72)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 2) (4 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (4 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 49)-  (parent 34)-  (seen 71 73)-  (unrealized (0 0) (0 2) (1 0) (4 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 50)-  (parent 35)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 51)-  (parent 35)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (0 0))-    ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 52)-  (parent 37)-  (seen 50 51)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 3))-    ((3 0) (0 0)) ((3 0) (4 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 53)-  (parent 37)-  (seen 60 70)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 54)-  (parent 39)-  (seen 18)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nb-1 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((3 1) (4 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 55)-  (parent 40)-  (seen 75)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 56)-  (parent 41)-  (seen 57 71)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 57)-  (parent 41)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 58)-  (parent 41)-  (seen 56 57 71)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 59)-  (parent 42)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 60)-  (parent 42)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 61)-  (parent 43)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 62)-  (parent 43)-  (seen 76 88)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm data) (b m c hash b-0 hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 63)-  (parent 43)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 64)-  (parent 44)-  (seen 18)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nb-1 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (b b) (c c) (m m))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (3 0))-    ((2 2) (4 0)) ((3 1) (1 0)) ((4 1) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 65)-  (parent 45)-  (seen 91)-  (unrealized (0 2))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 66)-  (parent 46)-  (seen 72 88)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-1 (5 0)-    (enc nc nb-1 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 67)-  (parent 46)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 68)-  (parent 46)-  (seen 47 66 67 73)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 69)-  (parent 47)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 70)-  (parent 47)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 71)-  (parent 48)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 72)-  (parent 48)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 73)-  (parent 49)-  (seen 67 72)-  (unrealized (0 0) (0 2) (1 0) (4 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (3 3)) ((3 0) (4 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 74)-  (parent 51)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (price price-0 acctnum goods text) (nc nb nb-0 nb-1 nm data)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 75)-  (parent 55)-  (seen 26)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 76)-  (parent 56)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((2 1) (5 0)) ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 77)-  (parent 56)-  (seen 71 105)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 78)-  (parent 57)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 79)-  (parent 57)-  (seen 104 110)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 80)-  (parent 58)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 81)-  (parent 58)-  (seen 71 104 113)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 82)-  (parent 59)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 83)-  (parent 59)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 84)-  (parent 60)-  (seen 82 83)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 85)-  (parent 61)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 86)-  (parent 61)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 3 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 87)-  (parent 62)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 88)-  (parent 62)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 89)-  (parent 63)-  (seen 85 86)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (4 3)) ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 90)-  (parent 63)-  (seen 103 117 119)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price price-0 acctnum goods text) (nc nb nb-0 nb-1 nm data)-    (c hash hash-0 hash-1 b m name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb) (b b) (c c) (m m) (hash hash))-  (precedes ((0 1) (5 1)) ((1 1) (5 3)) ((2 1) (1 0)) ((3 1) (1 0))-    ((4 1) (0 0)) ((5 0) (4 0)) ((5 2) (2 0)) ((5 2) (3 0))-    ((5 4) (0 2)))-  (non-orig (privk c) (privk hash) (privk hash-0) (privk hash-1)-    (privk b) (privk m))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand customer 5) nb (0 2)-    (enc "hash" c nc nb nb-0 price (pubk hash)) (enc nc nb (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c))))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))))-  (label 91)-  (parent 65)-  (seen 26)-  (unrealized)-  (comment "1 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 92)-  (parent 66)-  (seen 71 72)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text) (nc nb nb-0 data)-    (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))))-  (label 93)-  (parent 67)-  (unrealized (0 0) (0 2) (1 0))-  (comment "3 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 94)-  (parent 67)-  (seen 71 125)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (1 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 2) (5 0)) ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 95)-  (parent 68)-  (seen 71 73 124)-  (unrealized (0 0) (0 2) (1 0) (5 0) (6 0))-  (comment "4 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0))))-  (label 96)-  (parent 69)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 97)-  (parent 69)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0))-    ((4 4) (1 0)) ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 98)-  (parent 70)-  (seen 96 97)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 99)-  (parent 71)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 100)-  (parent 72)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (4 0)-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 101)-  (parent 73)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 102)-  (parent 76)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 103)-  (parent 76)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 104)-  (parent 77)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 105)-  (parent 77)-  (seen 110)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 106)-  (parent 78)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 107)-  (parent 78)-  (seen 143)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "5 in cohort - 4 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 108)-  (parent 78)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 109)-  (parent 79)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 110)-  (parent 79)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 111)-  (parent 80)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 112)-  (parent 80)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 113)-  (parent 81)-  (seen 71 105 110)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nb-1 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (4 3))-    ((3 1) (1 0)) ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 114)-  (parent 83)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 115)-  (parent 86)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 116)-  (parent 87)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 117)-  (parent 87)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 118)-  (parent 88)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 119)-  (parent 88)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-2 (6 0)-    (enc nc nb-2 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 120)-  (parent 92)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 121)-  (parent 93)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (5 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 122)-  (parent 93)-  (seen 164)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "4 in cohort - 3 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 123)-  (parent 93)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 124)-  (parent 94)-  (seen 120)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "3 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (1 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 125)-  (parent 94)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nb-1 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (4 3)) ((3 1) (1 0))-    ((4 0) (5 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 126)-  (parent 97)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 127)-  (parent 99)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 128)-  (parent 99)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 129)-  (parent 100)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 130)-  (parent 100)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 131)-  (parent 101)-  (unrealized (0 0) (0 2))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (b m c hash b-0 hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 132)-  (parent 101)-  (unrealized (0 0) (0 2) (1 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 133)-  (parent 102)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 134)-  (parent 102)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 135)-  (parent 103)-  (seen 133 134)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 136)-  (parent 104)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 137)-  (parent 105)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 138)-  (parent 106)-  (unrealized (0 2))-  (comment "empty cohort"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 139)-  (parent 106)-  (unrealized (0 0) (0 2))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 2 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 140)-  (parent 107)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 3 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 141)-  (parent 107)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((5 1) (6 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 7 5 bank 2) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 142)-  (parent 107)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (6 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 143)-  (parent 107)-  (unrealized (0 0) (0 2) (1 0))-  (comment "2 in cohort - 2 not yet seen"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 144)-  (parent 108)-  (seen 138 139)-  (unrealized (0 0) (0 2))-  (comment "3 in cohort - 0 not yet seen"))--(comment "Strand bound exceeded--aborting run")--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm nb-1 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((0 1) (7 0)) ((1 1) (0 2)) ((2 1) (3 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 145)-  (parent 108)-  (unrealized (0 0) (0 2) (1 0) (7 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 146)-  (parent 109)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 147)-  (parent 110)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 148)-  (parent 111)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 149)-  (parent 111)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 150)-  (parent 112)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 nb-2 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c))))))-  (label 151)-  (parent 113)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 acctnum-1 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-1)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-1)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-1)-    (nb nb-1) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-1)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-1) (nb nb-1) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-1) (price price) (nc nc) (nm nb-1)-    (nb nb-1) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-1)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (1 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-1)-  (operation nonce-test (displaced 7 6 bank 2) nb-2 (5 0)-    (enc "hash" c nc nb-1 nb-2 price (pubk hash-2))-    (enc nc nb-2 m price (pubk c))-    (enc c nc nb-2 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-1 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-1 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-1 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-1 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-1 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-1 m price (pubk c)))-      (send (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) nb-1)))-    ((recv (enc c nc nb-1 acctnum-1 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-0))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc nb-1 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-1 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 152)-  (parent 113)-  (unrealized (0 0) (0 2) (1 0) (5 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 153)-  (parent 116)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 154)-  (parent 116)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 155)-  (parent 117)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 156)-  (parent 118)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0)) ((4 4) (1 0))-    ((5 1) (1 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 157)-  (parent 118)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (4 3))-    ((4 0) (0 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 2) (5 0))-    ((4 4) (1 0)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 158)-  (parent 119)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (3 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 159)-  (parent 120)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))))-  (label 160)-  (parent 121)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (5 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 161)-  (parent 121)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((2 1) (5 0))-    ((3 0) (0 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 2 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 162)-  (parent 122)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((4 1) (5 0))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (displaced 6 4 bank 2) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 163)-  (parent 122)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (added-strand customer 3) nb-0 (5 0)-    (enc nc nb-0 m price (pubk c)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 164)-  (parent 122)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 165)-  (parent 123)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nm nb-1 data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((0 1) (6 0)) ((1 1) (0 2)) ((2 1) (4 0))-    ((3 0) (0 0)) ((3 0) (5 0)) ((3 2) (2 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (1 0)) ((6 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand bank 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc nc nm m price-0 (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 166)-  (parent 123)-  (unrealized (0 0) (0 2) (1 0) (6 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 167)-  (parent 124)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 text)-    (nc nb nb-0 nb-1 data) (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (acctnum-1 acctnum-0)) nb-0 (5 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-0 m price (pubk c))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c))))))-  (label 168)-  (parent 125)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 169)-  (parent 127)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3)) ((5 1) (4 0))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 170)-  (parent 127)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (5 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 171)-  (parent 128)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 172)-  (parent 129)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (6 0))-    ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0)) ((4 1) (3 3))-    ((5 1) (4 0)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 173)-  (parent 129)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (3 1)) ((1 1) (0 2)) ((2 1) (4 0)) ((3 0) (0 0))-    ((3 0) (6 0)) ((3 2) (2 0)) ((3 2) (5 0)) ((3 4) (1 0))-    ((4 1) (3 3)) ((5 1) (4 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 174)-  (parent 130)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 175)-  (parent 131)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (5 0)) ((2 2) (4 0))-    ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0)) ((5 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (0 0)-    (enc c nc goods-0 (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 176)-  (parent 131)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data) (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 0) (5 0))-    ((2 2) (4 0)) ((2 4) (1 0)) ((3 1) (2 3)) ((4 1) (3 0))-    ((5 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc nc nm m price-0 (pubk c))-    (enc c nc goods-0 (pubk m)) (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 177)-  (parent 132)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nb-1 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 178)-  (parent 134)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (5 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 179)-  (parent 136)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (6 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (5 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 180)-  (parent 136)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 nb-2 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c)) (enc nc nb-2 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-2 (pubk c))))))-  (label 181)-  (parent 137)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nb-2 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-2) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (5 0))-    ((3 1) (1 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 2) (6 0)) ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (5 0))-    ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c)) (enc nc nb-2 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-2 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-2 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 182)-  (parent 137)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (price acctnum goods price-0 text) (nc nb nb-0 nm data)-    (m c hash b hash-0 hash-1 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (6 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((6 1) (0 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)-    (enc nc nm m price-0 (pubk c)) (enc c nc goods (pubk m)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 183)-  (parent 139)-  (unrealized (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 184)-  (parent 140)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((2 1) (6 0))-    ((3 1) (5 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 185)-  (parent 140)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 186)-  (parent 141)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((3 1) (6 0)) ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 187)-  (parent 141)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 4) (1 0)) ((5 1) (4 3))-    ((5 1) (6 0)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 188)-  (parent 142)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((5 1) (6 0)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 189)-  (parent 142)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum goods-0 text) (nc nb nb-0 nb-1 data)-    (m c hash b hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum) (goods goods-0) (price price)-    (nc nc) (nm nb-0) (nb nb-0) (b b) (c c) (m m) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b) (c c) (hash hash-2))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 2) (2 0)) ((4 2) (6 0)) ((4 4) (1 0))-    ((5 1) (4 3)) ((6 1) (1 0)))-  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0)-    (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0)-  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nc-    (1 0) (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum price (pubk b)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum price (pubk b)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) nb-0)))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b)) (enc nc nb-1 (pubk c))))))-  (label 190)-  (parent 143)-  (unrealized (0 0) (0 2))-  (comment "aborted"))--(defskeleton sorted_epmo_acctnum-  (vars (goods price acctnum acctnum-0 goods-0 price-0 text)-    (nc nb nb-0 nb-1 nm data)-    (b m c hash b-0 hash-0 hash-1 hash-2 name))-  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (m m) (hash hash))-  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nb-0)-    (nb nb) (b b) (c c) (hash hash))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-1))-  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)-    (price price) (nc nc) (nm nb-0) (nb nb-0) (b b-0) (c c) (m m)-    (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-0) (b b-0) (c c) (hash hash-0))-  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nb-0)-    (nb nb-1) (b b-0) (c c) (hash hash-2))-  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc) (nm nm)-    (c c) (m m))-  (precedes ((0 1) (4 1)) ((1 1) (0 2)) ((2 1) (3 0)) ((3 1) (5 0))-    ((4 0) (0 0)) ((4 0) (7 0)) ((4 2) (2 0)) ((4 2) (6 0))-    ((4 4) (1 0)) ((5 1) (4 3)) ((6 1) (1 0)) ((7 1) (1 0)))-  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)-    (privk hash-0) (privk hash-1) (privk hash-2))-  (uniq-orig nc nb nb-0 nm)-  (operation nonce-test (added-strand merchant 2) nc (1 0)-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-    (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-    (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-    (enc nc nb-0 (pubk c)) (enc nc nb-1 (pubk c))-    (enc nc nb-0 m price (pubk c)) (enc c nc goods-0 (pubk m))-    (enc c nc nb-0 acctnum-0 price (pubk b-0)))-  (traces-    ((recv (enc c nc goods (pubk m)))-      (send (enc nc nb-0 m price (pubk c)))-      (recv-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          nb))-      (send (enc (enc "hash" b m nb nb-0 (pubk hash)) (privk m))))-    ((recv (enc c nc nb-0 acctnum price (pubk b)))-      (send-        (cat (enc (enc "hash" c nc nb nb-0 price (pubk hash)) (privk b))-          (enc nc nb (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-1))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((send (enc c nc goods-0 (pubk m)))-      (recv (enc nc nb-0 m price (pubk c)))-      (send (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (recv-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c))))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) nb-0)))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-0 nb-0 price (pubk hash-0))-            (privk b-0)) (enc nc nb-0 (pubk c)))))-    ((recv (enc c nc nb-0 acctnum-0 price (pubk b-0)))-      (send-        (cat-          (enc (enc "hash" c nc nb-1 nb-0 price (pubk hash-2))-            (privk b-0)) (enc nc nb-1 (pubk c)))))-    ((recv (enc c nc goods-0 (pubk m)))-      (send (enc nc nm m price-0 (pubk c)))))-  (label 191)-  (parent 143)-  (unrealized (0 0) (0 2) (1 0))-  (comment "aborted"))+  (displacement)+  (comment "This version includes account numbers in exchanges"+    "This version uses sorts to avoid confusion"+    "between a nonce and other data"))++(comment "CPSA 2.2.2")+(comment "All input read")+(comment "Displacement disabled")++(defprotocol sorted_epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum price text) (hash name) (nc nm nb data))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum goods price text) (nc nm nb data))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m hash name) (goods price text) (nc nm nb data))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton sorted_epmo_acctnum+  (vars (goods price text) (nm nc nb data) (b m c hash name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb)+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 0)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum text) (nm nc nb data) (b m c hash name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (precedes ((0 1) (1 0)) ((1 1) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nc nb)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (0 2))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))))+  (label 1)+  (parent 0)+  (unrealized (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum acctnum-0 goods-0 text) (nm nc nb data)+    (b m c hash b-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 3) nm (1 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))))+  (label 2)+  (parent 1)+  (unrealized (0 0) (0 2) (1 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum goods-0 text) (nm nc nb data)+    (m c hash b name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm+    (1 0) (enc nc nm m price (pubk c))+    (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 3)+  (parent 2)+  (unrealized (0 0) (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum acctnum-0 goods-0 text)+    (nm nc nb nb-0 data) (b m c hash b-0 hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b-0) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((0 1) (3 0)) ((1 1) (0 2)) ((2 0) (0 0))+    ((2 2) (1 0)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)+    (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand bank 2) nm (1 0)+    (enc nc nm m price (pubk c))+    (enc c nc nm acctnum-0 price (pubk b-0)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0))))+    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))+            (privk b-0)) (enc nc nb-0 (pubk c))))))+  (label 4)+  (parent 2)+  (unrealized (0 0) (0 2) (1 0) (3 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nc nb data) (m c hash b name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))))+  (label 5)+  (parent 3)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum goods-0 price-0 text) (nm nc nb nm-0 data)+    (m c hash b name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc)+    (nm nm-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 6)+  (parent 3)+  (unrealized (0 0) (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum acctnum-0 goods-0 text)+    (nm nc nb nb-0 data) (b m c hash b-0 hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (b b-0) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b-0) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0)+    (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 3) nm (3 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0))))+    ((recv (enc c nc nm acctnum-0 price (pubk b-0)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0))+            (privk b-0)) (enc nc nb-0 (pubk c))))))+  (label 7)+  (parent 4)+  (unrealized (0 0) (0 2) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nc nb data) (c hash b m name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 1)) ((1 1) (2 3)) ((2 0) (0 0)) ((2 2) (1 0))+    ((2 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk b) (privk m))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 8)+  (parent 5)+  (unrealized)+  (shape))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods price-0 text) (nm nc nb nm-0 data)+    (m c hash b name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (3 0)) ((2 2) (1 0))+    ((3 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 9)+  (parent 6)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum goods-0 text) (nm nc nb nb-0 data)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (b-0 b) (acctnum-0 acctnum)) nm+    (1 0) (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 10)+  (parent 7)+  (unrealized (0 0) (0 2))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price price-0 acctnum goods text) (nm nc nb nm-0 data)+    (c hash b m name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (0 0)) ((3 0) (2 0))+    ((3 2) (1 0)) ((3 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk b) (privk m))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 11)+  (parent 9)+  (seen 8)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nc nb nb-0 data)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (0 0)) ((2 2) (3 0))+    ((3 1) (1 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 12)+  (parent 10)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (goods price acctnum goods-0 price-0 text)+    (nm nc nb nb-0 nm-0 data) (m c hash b hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods-0) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc)+    (nm nm-0) (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))+    ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand merchant 2) nc (0 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 13)+  (parent 10)+  (unrealized (0 0) (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nc nb nb-0 data)+    (c hash hash-0 b m name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (3 1)) ((1 1) (3 3)) ((2 1) (1 0)) ((3 0) (0 0))+    ((3 2) (2 0)) ((3 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))+  (uniq-orig nm nc nb)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 14)+  (parent 12)+  (seen 8)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods price-0 text) (nm nc nb nb-0 nm-0 data)+    (m c hash b hash-0 name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand customer 3 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (b b) (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 1) (2 1)) ((1 1) (0 2)) ((2 0) (4 0)) ((2 2) (3 0))+    ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk m) (privk c) (privk hash) (privk b) (privk hash-0))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (0 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 15)+  (parent 13)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price price-0 acctnum goods text) (nm nc nb nb-0 nm-0 data)+    (c hash hash-0 b m name))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (4 1)) ((1 1) (4 3)) ((2 1) (1 0)) ((3 1) (0 0))+    ((4 0) (3 0)) ((4 2) (2 0)) ((4 4) (0 2)))+  (non-orig (privk c) (privk hash) (privk hash-0) (privk b) (privk m))+  (uniq-orig nm nc nb nm-0)+  (operation nonce-test (added-strand customer 5) nb (0 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c)))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c)))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 16)+  (parent 15)+  (seen 11)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")++(defprotocol sorted_epmo_acctnum basic+  (defrole bank+    (vars (b c m name) (acctnum price text) (hash name) (nc nm nb data))+    (trace (recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (annotations b+      (1+        (forall ((pm name))+          (implies+            (and (authtransfer c acctnum b price pm nm)+              (reqtransfer pm b price pm nm))+            (dotransfer acctnum b price pm nm))))+      (2+        (and (says c (authtransfer c acctnum b price m nm))+          (says m (reqtransfer m b price m nm))))))+  (defrole customer+    (vars (b c m hash name) (acctnum goods price text) (nc nm nb data))+    (trace (send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    (non-orig (privk b) (privk hash))+    (uniq-orig nc)+    (annotations c+      (1+        (says m+          (implies+            (exists ((acctnum2 text))+              (dotransfer acctnum2 b price m nm)) (doship m goods c))))+      (3+        (says b+          (forall ((pm name))+            (implies+              (and (authtransfer c acctnum b price m nm)+                (reqtransfer pm b price pm nm))+              (dotransfer acctnum b price pm nm)))))+      (4 (authtransfer c acctnum b price m nm))))+  (defrole merchant+    (vars (b c m hash name) (goods price text) (nc nm nb data))+    (trace (recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    (non-orig (privk hash))+    (uniq-orig nm)+    (annotations m+      (1+        (implies+          (exists ((acctnum2 text)) (dotransfer acctnum2 b price m nm))+          (doship m goods c)))+      (2+        (and+          (says b+            (forall ((pm name))+              (exists ((acctnum2 text))+                (implies+                  (and (authtransfer c acctnum2 b price m nm)+                    (reqtransfer pm b price pm nm))+                  (dotransfer acctnum2 b price pm nm)))))+          (says c+            (exists ((acctnum2 text))+              (authtransfer c acctnum2 b price m nm)))))+      (3 (and (reqtransfer m b price m nm) (doship m goods c))))))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price text) (nm nb nc data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 17)+  (unrealized (0 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods price-0 text) (nm nb nc nc-0 data)+    (b m c hash c-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price-0) (nc nc-0) (nm nm)+    (nb nb) (b b) (c c-0) (m m) (hash hash))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand merchant 4)+    (enc (enc "hash" b m nb nm (pubk hash)) (privk m)) (0 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c-0 nc-0 goods (pubk m)))+      (send (enc nc-0 nm m price-0 (pubk c-0)))+      (recv+        (cat+          (enc (enc "hash" c-0 nc-0 nb nm price-0 (pubk hash))+            (privk b)) nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 18)+  (parent 17)+  (unrealized (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods text) (nm nb nc data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (1 2)) ((1 1) (0 0)) ((1 3) (0 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (1 2))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m)))))+  (label 19)+  (parent 18)+  (unrealized (0 0) (1 2))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods acctnum-0 goods-0 text) (nm nb nc data)+    (b m c hash b-0 m-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (nb nb) (b b-0) (c c) (m m-0)+    (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 5) nb (1 2)+    (enc "hash" c nc nb nm price (pubk hash)) (enc nc nb (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m-0)))+      (recv (enc nc nm m-0 price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          nb))))+  (label 20)+  (parent 19)+  (unrealized (0 0) (2 1) (2 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods acctnum-0 goods-0 text) (nm nb nc data)+    (b m c hash b-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (nb nb) (b b-0) (c c) (m m)+    (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk b-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (m-0 m)) nm (2 1)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b-0)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b-0))+          nb))))+  (label 21)+  (parent 20)+  (unrealized (0 0) (1 0) (2 3))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods acctnum-0 goods-0 text) (nm nb nc data)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation encryption-test (added-strand bank 2)+    (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b)) (2 3))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 22)+  (parent 21)+  (unrealized (0 0) (1 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods text) (nm nb nc data)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 23)+  (parent 22)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price goods acctnum-0 goods-0 price-0 text)+    (nm nb nc nm-0 data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods-0)+    (price price) (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods-0) (price price-0) (nc nc)+    (nm nm-0) (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand merchant 2) nc (1 0)+    (enc c nc goods-0 (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods-0 (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods-0 (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 24)+  (parent 22)+  (unrealized (0 0) (1 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods text) (nm nb nc data)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 25)+  (parent 23)+  (unrealized (0 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods price-0 text)+    (nm nb nc nm-0 data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (0 0)) ((1 1) (2 1)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (goods-0 goods)) nc (1 0)+    (enc nc nm-0 m price-0 (pubk c)) (enc c nc goods (pubk m)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 26)+  (parent 24)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nb nc data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (0 0)) ((2 4) (1 2)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))))+  (label 27)+  (parent 25)+  (unrealized)+  (shape))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods text) (nm nb nc nb-0 data)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 1) (3 0)) ((1 3) (0 2))+    ((2 0) (1 0)) ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand bank 2) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum-0 price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 28)+  (parent 25)+  (unrealized (0 0) (3 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods price-0 text)+    (nm nb nc nm-0 data) (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand customer 3) nm (0 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 29)+  (parent 26)+  (unrealized (0 0))+  (comment "2 in cohort - 2 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods text) (nm nb nc nb-0 data)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (3 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (added-strand customer 3) nm (3 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 30)+  (parent 28)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods price-0 text) (nm nb nc nm-0 data)+    (b m c hash name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c)))))+  (label 31)+  (parent 29)+  (seen 27)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods price-0 text)+    (nm nb nc nm-0 nb-0 data) (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 1) (4 0)) ((1 3) (0 2))+    ((2 0) (3 0)) ((2 2) (0 0)) ((2 4) (1 2)) ((3 1) (1 0))+    ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand bank 2) nm (0 0)+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum-0 price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 32)+  (parent 29)+  (unrealized (0 0) (4 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods text) (nm nb nc nb-0 data)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (1 0))+    ((2 2) (3 0)) ((2 4) (1 2)) ((3 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 33)+  (parent 30)+  (seen 27)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (acctnum price acctnum-0 goods price-0 text)+    (nm nb nc nm-0 nb-0 data) (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum-0) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum-0) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (4 0)) ((2 4) (1 2)) ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (added-strand customer 3) nm (4 0)+    (enc nc nm m price (pubk c)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum-0 price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum-0 price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 34)+  (parent 32)+  (unrealized (0 0))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton sorted_epmo_acctnum+  (vars (price acctnum goods price-0 text) (nm nb nc nm-0 nb-0 data)+    (b m c hash hash-0 name))+  (defstrand bank 3 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 4 (goods goods) (price price) (nc nc) (nm nm)+    (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand customer 5 (acctnum acctnum) (goods goods) (price price)+    (nc nc) (nm nm) (nb nb) (b b) (c c) (m m) (hash hash))+  (defstrand merchant 2 (goods goods) (price price-0) (nc nc) (nm nm-0)+    (c c) (m m))+  (defstrand bank 2 (acctnum acctnum) (price price) (nc nc) (nm nm)+    (nb nb-0) (b b) (c c) (hash hash-0))+  (precedes ((0 1) (2 3)) ((1 1) (2 1)) ((1 3) (0 2)) ((2 0) (3 0))+    ((2 2) (4 0)) ((2 4) (1 2)) ((3 1) (1 0)) ((4 1) (0 0)))+  (non-orig (privk b) (privk m) (privk c) (privk hash) (privk hash-0))+  (uniq-orig nm nb nc nm-0)+  (operation nonce-test (contracted (acctnum-0 acctnum)) nm (0 0)+    (enc "hash" c nc nb-0 nm price (pubk hash-0))+    (enc nc nm m price (pubk c)) (enc c nc nm acctnum price (pubk b)))+  (traces+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (recv (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm m price (pubk c)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb))+      (send (enc (enc "hash" b m nb nm (pubk hash)) (privk m))))+    ((send (enc c nc goods (pubk m)))+      (recv (enc nc nm m price (pubk c)))+      (send (enc c nc nm acctnum price (pubk b)))+      (recv+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          (enc nc nb (pubk c))))+      (send+        (cat (enc (enc "hash" c nc nb nm price (pubk hash)) (privk b))+          nb)))+    ((recv (enc c nc goods (pubk m)))+      (send (enc nc nm-0 m price-0 (pubk c))))+    ((recv (enc c nc nm acctnum price (pubk b)))+      (send+        (cat+          (enc (enc "hash" c nc nb-0 nm price (pubk hash-0)) (privk b))+          (enc nc nb-0 (pubk c))))))+  (label 35)+  (parent 34)+  (seen 33)+  (unrealized)+  (comment "1 in cohort - 0 not yet seen"))++(comment "Nothing left to do")
tst/targetterms2.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol targetterms2 basic
tst/targetterms6.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol targetterms6 basic
+ tst/targetterms8.scm view
@@ -0,0 +1,64 @@+;;; Target terms experiment+;+;  This example demonstrates the need for the solved filter condition "2a",+; which we had suspected was necessary for months but until now we were not+; sure.+;+;+;  The initiator sends out an encryption {|n1 {|a n2|} |}, with both levels+; of encryption being under an asymmetric key whose inverse is assumed to be+; non-originating.  n1 is freshly chosen.  The initiator expects to receive+; {|a n1|}.+;+;  The responder takes {|n1 {|m|} |} and outputs {|m|}.+;+;  The initial POV (which is just the init 2 role) is dead because we don't+; have condition 2a in the solved predicate.  If we did, we could try an+; augmentation or displacement for a length-1 init strand with n1 being+; used as the value for n2.  Hulling would require that this unify with the+; existing init strand, and the result would be an init strand in which n1+; and n2 are unified.  (Our second POV is this skeleton).+;+;  However, the escape set after this map is no bigger than it was; it consists+; of only {|n1 {|a n1|} |}, which is in the image of the old escape set, so+; we don't meet condition 2.  We do meet condition 2a, since the target term+; (a n1) is not an image of any old target term (the old target terms were only+; n1 and (n1 {|a n2|}).+;+;  Note that the first POV is dead (in CPSA 2.2.2) but the second POV is not,+; and leads to a shape.++(defprotocol targetterms8 basic+  (defrole init (vars (a name) (n1 n2 text) (k akey))+    (trace+	(send (enc n1 (enc a n2 k) k))+      (recv (enc a n1 k))+    )+    (uniq-orig n1)+    (non-orig (invk k))+)+  (defrole resp (vars (n1 text) (m mesg) (k akey))+    (trace+     (recv (enc n1 (enc m k) k))+     (send (enc m k))+    ))+)++(comment First POV)+(defskeleton targetterms8+  (vars (a name) (n1 n2 text) (k akey))+  (defstrand init 2 (a a) (n1 n1) (n2 n2) (k k))+)++(comment Second POV)+(defskeleton targetterms8+  (vars (a name) (n1 text) (k akey))+  (defstrand init 2 (a a) (n1 n1) (n2 n1) (k k))+)++(comment "This is the shape.  We don't need it because we find it from the second POV.")+(comment (defskeleton targetterms8+  (vars (a name) (n1 text) (k akey) )+  (defstrand init 2 (a a) (n1 n1) (n2 n1) (k k))+  (defstrand resp 2 (n1 n1) (k k) (m (cat a n1)))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)))))
+ tst/targetterms8.tst view
@@ -0,0 +1,92 @@+(comment "CPSA 2.2.2")+(comment "All input read")++(defprotocol targetterms8 basic+  (defrole init+    (vars (a name) (n1 n2 text) (k akey))+    (trace (send (enc n1 (enc a n2 k) k)) (recv (enc a n1 k)))+    (non-orig (invk k))+    (uniq-orig n1))+  (defrole resp+    (vars (n1 text) (m mesg) (k akey))+    (trace (recv (enc n1 (enc m k) k)) (send (enc m k)))))++(defskeleton targetterms8+  (vars (n1 n2 text) (a name) (k akey))+  (defstrand init 2 (n1 n1) (n2 n2) (a a) (k k))+  (non-orig (invk k))+  (uniq-orig n1)+  (traces ((send (enc n1 (enc a n2 k) k)) (recv (enc a n1 k))))+  (label 0)+  (seen 1)+  (unrealized (0 1))+  (comment "2 in cohort - 1 not yet seen"))++(defskeleton targetterms8+  (vars (n2 text) (a name) (k akey))+  (defstrand init 2 (n1 n2) (n2 n2) (a a) (k k))+  (non-orig (invk k))+  (uniq-orig n2)+  (operation nonce-test (added-strand init 1) n2 (0 1)+    (enc n2 (enc a n2 k) k))+  (traces ((send (enc n2 (enc a n2 k) k)) (recv (enc a n2 k))))+  (label 1)+  (parent 0)+  (unrealized (0 1))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton targetterms8+  (vars (n2 text) (a name) (k akey))+  (defstrand init 2 (n1 n2) (n2 n2) (a a) (k k))+  (defstrand resp 2 (m (cat a n2)) (n1 n2) (k k))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)))+  (non-orig (invk k))+  (uniq-orig n2)+  (operation nonce-test (added-strand resp 2) n2 (0 1)+    (enc n2 (enc a n2 k) k))+  (traces ((send (enc n2 (enc a n2 k) k)) (recv (enc a n2 k)))+    ((recv (enc n2 (enc a n2 k) k)) (send (enc a n2 k))))+  (label 2)+  (parent 1)+  (unrealized)+  (shape))++(comment "Nothing left to do")++(defprotocol targetterms8 basic+  (defrole init+    (vars (a name) (n1 n2 text) (k akey))+    (trace (send (enc n1 (enc a n2 k) k)) (recv (enc a n1 k)))+    (non-orig (invk k))+    (uniq-orig n1))+  (defrole resp+    (vars (n1 text) (m mesg) (k akey))+    (trace (recv (enc n1 (enc m k) k)) (send (enc m k)))))++(defskeleton targetterms8+  (vars (n1 text) (a name) (k akey))+  (defstrand init 2 (n1 n1) (n2 n1) (a a) (k k))+  (non-orig (invk k))+  (uniq-orig n1)+  (traces ((send (enc n1 (enc a n1 k) k)) (recv (enc a n1 k))))+  (label 3)+  (unrealized (0 1))+  (comment "1 in cohort - 1 not yet seen"))++(defskeleton targetterms8+  (vars (n1 text) (a name) (k akey))+  (defstrand init 2 (n1 n1) (n2 n1) (a a) (k k))+  (defstrand resp 2 (m (cat a n1)) (n1 n1) (k k))+  (precedes ((0 0) (1 0)) ((1 1) (0 1)))+  (non-orig (invk k))+  (uniq-orig n1)+  (operation nonce-test (added-strand resp 2) n1 (0 1)+    (enc n1 (enc a n1 k) k))+  (traces ((send (enc n1 (enc a n1 k) k)) (recv (enc a n1 k)))+    ((recv (enc n1 (enc a n1 k) k)) (send (enc a n1 k))))+  (label 4)+  (parent 3)+  (unrealized)+  (shape))++(comment "Nothing left to do")
tst/tor.scm view
@@ -1,10 +1,10 @@ (herald "Tor Circuit-Level Handshake Protocol" (algebra diffie-hellman)   (comment "Achieves unilateral authentication")) -;; Hashing--the key no one has is (invk kh)+;; Hashing--no one can extract a key from an encryption  (defmacro (hash x)-  (enc "hash" x kh))+  (enc "hash" x))  (defprotocol tor diffie-hellman   (defrole init@@ -13,16 +13,14 @@      (send (enc (exp (gen) x) (pubk b)))      (recv (cat (exp (gen) y) (hash (cat (exp (exp (gen) x) y)))))      (send (enc n (exp (exp (gen) y) x))))-    (uniq-orig x n)-    (non-orig (invk kh)))+    (uniq-orig x n))   (defrole resp     (vars (x y expn) (b name) (n text) (kh akey))     (trace       (recv (enc (exp (gen) x) (pubk b)))      (send (cat (exp (gen) y) (hash (cat (exp (exp (gen) x) y)))))      (recv (enc n (exp (exp (gen) x) y))))-    (uniq-orig y)-    (non-orig (invk kh))))+    (uniq-orig y)))  (defskeleton tor   (vars (b name) (n text))
tst/tor.tst view
@@ -1,263 +1,158 @@ (herald "Tor Circuit-Level Handshake Protocol" (algebra diffie-hellman)   (comment "Achieves unilateral authentication")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol tor diffie-hellman   (defrole init-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig n x))   (defrole resp-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (recv (enc (exp (gen) x) (pubk b)))-      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (recv (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig y)))  (defskeleton tor-  (vars (b name) (x y expn) (kh akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (non-orig (invk kh) (privk b))+  (vars (b name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (non-orig (privk b))   (uniq-orig x)   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))))   (label 0)   (unrealized (0 1))   (comment "2 in cohort - 2 not yet seen"))  (defskeleton tor-  (vars (b b-0 name) (x y expn) (kh kh-0 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))+  (vars (b b-0 name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (defstrand resp 2 (b b-0) (x x) (y y))   (precedes ((0 0) (1 0)) ((1 1) (0 1)))-  (non-orig (invk kh) (invk kh-0) (privk b))+  (non-orig (privk b))   (uniq-orig x y)-  (operation encryption-test (added-strand resp 2) (exp (exp (gen) x) y)-    (0 1))+  (operation encryption-test (added-strand resp 2)+    (enc "hash" (exp (exp (gen) x) y)) (0 1))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))     ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0)))))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))))   (label 1)   (parent 0)-  (unrealized (0 1) (1 0))+  (unrealized (1 0))   (comment "2 in cohort - 2 not yet seen"))  (defskeleton tor-  (vars (b name) (x y expn) (kh akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (deflistener x)+  (vars (b name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (deflistener (exp (exp (gen) x) y))   (precedes ((0 0) (1 0)) ((1 1) (0 1)))-  (non-orig (invk kh) (privk b))+  (non-orig (privk b))   (uniq-orig x)-  (operation encryption-test (added-listener x) (exp (exp (gen) x) y)-    (0 1))+  (operation encryption-test (added-listener (exp (exp (gen) x) y))+    (enc "hash" (exp (exp (gen) x) y)) (0 1))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv x) (send x)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))+    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y))))   (label 2)   (parent 0)   (unrealized (1 0))   (comment "1 in cohort - 1 not yet seen"))  (defskeleton tor-  (vars (b name) (x y expn) (kh kh-0 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))+  (vars (b name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (defstrand resp 2 (b b) (x x) (y y))   (precedes ((0 0) (1 0)) ((1 1) (0 1)))-  (non-orig (invk kh) (invk kh-0) (privk b))+  (non-orig (privk b))   (uniq-orig x y)   (operation encryption-test (contracted (b-0 b)) (exp (gen) x) (1 0)     (enc (exp (gen) x) (pubk b)))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))     ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0)))))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))))   (label 3)   (parent 1)-  (unrealized (0 1))-  (comment "2 in cohort - 2 not yet seen"))+  (unrealized)+  (shape))  (defskeleton tor-  (vars (b b-0 name) (x y expn) (kh kh-0 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))+  (vars (b b-0 name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (defstrand resp 2 (b b-0) (x x) (y y))   (deflistener x)   (precedes ((0 0) (2 0)) ((1 1) (0 1)) ((2 1) (1 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))+  (non-orig (privk b))   (uniq-orig x y)   (operation encryption-test (added-listener x) (exp (gen) x) (1 0)     (enc (exp (gen) x) (pubk b)))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))     ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))     ((recv x) (send x)))   (label 4)   (parent 1)   (unrealized (2 0))-  (comment "1 in cohort - 1 not yet seen"))+  (comment "empty cohort"))  (defskeleton tor-  (vars (b name) (x y y-0 expn) (kh kh-0 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))+  (vars (b name) (x y expn))+  (defstrand init 2 (b b) (x x) (y y))+  (deflistener (exp (exp (gen) x) y))   (deflistener x)-  (defstrand resp 2 (b b) (x x) (y y-0) (kh kh-0))   (precedes ((0 0) (2 0)) ((1 1) (0 1)) ((2 1) (1 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig x y-0)-  (operation nonce-test (added-strand resp 2) x (1 0)-    (enc (exp (gen) x) (pubk b)))+  (non-orig (privk b))+  (uniq-orig x)+  (operation encryption-test (added-listener x) (exp (exp (gen) x) y)+    (1 0))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv x) (send x))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) x) y-0) kh-0)))))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y)))))+    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))+    ((recv x) (send x)))   (label 5)   (parent 2)-  (unrealized (1 0))-  (comment "empty cohort"))--(defskeleton tor-  (vars (b name) (x y expn) (kh akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh))-  (precedes ((0 0) (1 0)) ((1 1) (0 1)))-  (non-orig (invk kh) (privk b))-  (uniq-orig x y)-  (operation encryption-test (contracted (kh-0 kh))-    (exp (exp (gen) x) y) (0 1) (enc "hash" (exp (exp (gen) x) y) kh))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))))-  (label 6)-  (parent 3)-  (unrealized)-  (shape))--(defskeleton tor-  (vars (b name) (x y expn) (kh kh-0 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (deflistener y)-  (precedes ((0 0) (1 0)) ((1 1) (2 0)) ((2 1) (0 1)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig x y)-  (operation encryption-test (added-listener y) (exp (exp (gen) x) y)-    (0 1) (enc "hash" (exp (exp (gen) x) y) kh-0))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv y) (send y)))-  (label 7)-  (parent 3)-  (unrealized (0 1) (2 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton tor-  (vars (b b-0 name) (x y y-0 expn) (kh kh-0 kh-1 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))-  (deflistener x)-  (defstrand resp 2 (b b) (x x) (y y-0) (kh kh-1))-  (precedes ((0 0) (3 0)) ((1 1) (0 1)) ((2 1) (1 0)) ((3 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (invk kh-1) (privk b))-  (uniq-orig x y y-0)-  (operation nonce-test (added-strand resp 2) x (2 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) x) y-0) kh-1)))))-  (label 8)-  (parent 4)   (unrealized (2 0))   (comment "empty cohort")) -(defskeleton tor-  (vars (b b-0 name) (x y y-0 expn) (kh kh-0 kh-1 akey))-  (defstrand init 2 (b b) (x x) (y y) (kh kh))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (deflistener y)-  (defstrand resp 2 (b b-0) (x y) (y y-0) (kh kh-1))-  (precedes ((0 0) (1 0)) ((1 1) (3 0)) ((2 1) (0 1)) ((3 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (invk kh-1) (privk b))-  (uniq-orig x y y-0)-  (operation nonce-test (added-strand resp 2) y (2 0) (exp (gen) y)-    (enc "hash" (exp (exp (gen) x) y) kh-0))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh))))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv y) (send y))-    ((recv (enc (exp (gen) y) (pubk b-0)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) y) y-0) kh-1)))))-  (label 9)-  (parent 7)-  (unrealized (0 1) (2 0))-  (comment "empty cohort"))- (comment "Nothing left to do")  (defprotocol tor diffie-hellman   (defrole init-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig n x))   (defrole resp-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (recv (enc (exp (gen) x) (pubk b)))-      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (recv (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig y)))  (defskeleton tor-  (vars (n text) (b name) (x y expn) (kh akey))-  (defstrand resp 3 (n n) (b b) (x x) (y y) (kh kh))-  (non-orig (invk kh) (privk b))+  (vars (n text) (b name) (x y expn))+  (defstrand resp 3 (n n) (b b) (x x) (y y))+  (non-orig (privk b))   (uniq-orig y)   (traces     ((recv (enc (exp (gen) x) (pubk b)))-      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (recv (enc n (exp (exp (gen) x) y)))))-  (label 10)+  (label 6)   (unrealized)   (shape)) @@ -265,317 +160,87 @@  (defprotocol tor diffie-hellman   (defrole init-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig n x))   (defrole resp-    (vars (x y expn) (b name) (n text) (kh akey))+    (vars (x y expn) (b name) (n text))     (trace (recv (enc (exp (gen) x) (pubk b)))-      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (send (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (recv (enc n (exp (exp (gen) x) y))))-    (non-orig (invk kh))     (uniq-orig y)))  (defskeleton tor-  (vars (n text) (b name) (x y expn) (kh akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))+  (vars (n text) (b name) (x y expn))+  (defstrand init 3 (n n) (b b) (x x) (y y))   (deflistener n)-  (non-orig (invk kh) (privk b))+  (non-orig (privk b))   (uniq-orig n x)   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n)))-  (label 11)+  (label 7)   (unrealized (0 1) (1 0)))  (defskeleton tor-  (vars (n text) (b name) (x y expn) (kh akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))+  (vars (n text) (b name) (x y expn))+  (defstrand init 3 (n n) (b b) (x x) (y y))   (deflistener n)   (precedes ((0 2) (1 0)))-  (non-orig (invk kh) (privk b))+  (non-orig (privk b))   (uniq-orig n x)   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n)))-  (label 12)-  (parent 11)+  (label 8)+  (parent 7)   (unrealized (0 1) (1 0))   (comment "1 in cohort - 1 not yet seen"))  (defskeleton tor-  (vars (n text) (b name) (x y expn) (kh akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))+  (vars (n text) (b name) (x y expn))+  (defstrand init 3 (n n) (b b) (x x) (y y))   (deflistener n)   (deflistener (exp (exp (gen) x) y))   (precedes ((0 0) (2 0)) ((0 2) (1 0)) ((2 1) (1 0)))-  (non-orig (invk kh) (privk b))+  (non-orig (privk b))   (uniq-orig n x)   (operation nonce-test (added-listener (exp (exp (gen) x) y)) n (1 0)     (enc n (exp (exp (gen) x) y)))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))     ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y))))-  (label 13)-  (parent 12)-  (seen 14)+  (label 9)+  (parent 8)   (unrealized (0 1) (2 0))-  (comment "3 in cohort - 2 not yet seen"))--(defskeleton tor-  (vars (n text) (b b-0 name) (x y expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))-  (precedes ((0 0) (3 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (0 1))-    ((3 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y)-  (operation encryption-test (added-strand resp 2) (exp (exp (gen) x) y)-    (2 0))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0)))))-  (label 14)-  (parent 13)-  (seen 16)-  (unrealized (0 1) (2 0) (3 0))-  (comment "3 in cohort - 2 not yet seen"))+  (comment "1 in cohort - 1 not yet seen"))  (defskeleton tor-  (vars (n text) (b name) (x y expn) (kh akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))+  (vars (n text) (b name) (x y expn))+  (defstrand init 3 (n n) (b b) (x x) (y y))   (deflistener n)   (deflistener (exp (exp (gen) x) y))   (deflistener x)   (precedes ((0 0) (3 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (2 0)))-  (non-orig (invk kh) (privk b))+  (non-orig (privk b))   (uniq-orig n x)   (operation encryption-test (added-listener x) (exp (exp (gen) x) y)     (2 0))   (traces     ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))+      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y))))       (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))     ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))     ((recv x) (send x)))-  (label 15)-  (parent 13)-  (seen 18)-  (unrealized (0 1) (3 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton tor-  (vars (n text) (b name) (x y expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (precedes ((0 0) (3 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (0 1))-    ((3 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y)-  (operation encryption-test (contracted (b-0 b)) (exp (gen) x) (3 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0)))))-  (label 16)-  (parent 14)-  (unrealized (0 1) (2 0))-  (comment "1 in cohort - 1 not yet seen"))--(defskeleton tor-  (vars (n text) (b b-0 name) (x y expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))-  (deflistener x)-  (precedes ((0 0) (4 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (0 1))-    ((3 1) (2 0)) ((4 1) (3 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y)-  (operation encryption-test (added-listener x) (exp (gen) x) (3 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x)))-  (label 17)-  (parent 14)-  (seen 20)-  (unrealized (4 0))-  (comment "2 in cohort - 1 not yet seen"))--(defskeleton tor-  (vars (n text) (b name) (x y y-0 expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (deflistener x)-  (defstrand resp 2 (b b) (x x) (y y-0) (kh kh-0))-  (precedes ((0 0) (4 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (2 0))-    ((4 1) (3 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y-0)-  (operation nonce-test (added-strand resp 2) x (3 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv x) (send x))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) x) y-0) kh-0)))))-  (label 18)-  (parent 15)+  (label 10)+  (parent 9)   (unrealized (0 1) (3 0))-  (comment "empty cohort"))--(defskeleton tor-  (vars (n text) (b name) (x y expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (deflistener x)-  (precedes ((0 0) (3 0)) ((0 0) (4 0)) ((0 2) (1 0)) ((2 1) (1 0))-    ((3 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y)-  (operation encryption-test (added-listener x) (exp (exp (gen) x) y)-    (2 0) (enc "hash" (exp (exp (gen) x) y) kh-0))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x)))-  (label 19)-  (parent 16)-  (seen 21 22)-  (unrealized (0 1) (4 0))-  (comment "6 in cohort - 2 not yet seen"))--(defskeleton tor-  (vars (n text) (b b-0 name) (x y y-0 expn) (kh kh-0 kh-1 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b-0) (x x) (y y) (kh kh-0))-  (deflistener x)-  (defstrand resp 2 (b b) (x x) (y y-0) (kh kh-1))-  (precedes ((0 0) (5 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (0 1))-    ((3 1) (2 0)) ((4 1) (3 0)) ((5 1) (4 0)))-  (non-orig (invk kh) (invk kh-0) (invk kh-1) (privk b))-  (uniq-orig n x y y-0)-  (operation nonce-test (added-strand resp 2) x (4 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b-0)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) x) y-0) kh-1)))))-  (label 20)-  (parent 17)-  (unrealized (4 0))-  (comment "empty cohort"))--(defskeleton tor-  (vars (n text) (b name) (x y y-0 expn) (kh kh-0 kh-1 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (deflistener x)-  (defstrand resp 2 (b b) (x x) (y y-0) (kh kh-1))-  (precedes ((0 0) (3 0)) ((0 0) (5 0)) ((0 2) (1 0)) ((2 1) (1 0))-    ((3 1) (0 1)) ((3 1) (2 0)) ((4 1) (2 0)) ((5 1) (4 0)))-  (non-orig (invk kh) (invk kh-0) (invk kh-1) (privk b))-  (uniq-orig n x y y-0)-  (operation nonce-test (added-strand resp 2) x (4 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y-0)-          (enc "hash" (exp (exp (gen) x) y-0) kh-1)))))-  (label 21)-  (parent 19)-  (unrealized (0 1) (4 0))-  (comment "empty cohort"))--(defskeleton tor-  (vars (n text) (b name) (x y expn) (kh kh-0 akey))-  (defstrand init 3 (n n) (b b) (x x) (y y) (kh kh))-  (deflistener n)-  (deflistener (exp (exp (gen) x) y))-  (defstrand resp 2 (b b) (x x) (y y) (kh kh-0))-  (deflistener x)-  (precedes ((0 0) (3 0)) ((0 2) (1 0)) ((2 1) (1 0)) ((3 1) (0 1))-    ((3 1) (4 0)) ((4 1) (2 0)))-  (non-orig (invk kh) (invk kh-0) (privk b))-  (uniq-orig n x y)-  (operation nonce-test (displaced 5 3 resp 2) x (4 0)-    (enc (exp (gen) x) (pubk b)))-  (traces-    ((send (enc (exp (gen) x) (pubk b)))-      (recv (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh)))-      (send (enc n (exp (exp (gen) x) y)))) ((recv n) (send n))-    ((recv (exp (exp (gen) x) y)) (send (exp (exp (gen) x) y)))-    ((recv (enc (exp (gen) x) (pubk b)))-      (send-        (cat (exp (gen) y) (enc "hash" (exp (exp (gen) x) y) kh-0))))-    ((recv x) (send x)))-  (label 22)-  (parent 19)-  (unrealized (0 1) (4 0))   (comment "empty cohort"))  (comment "Nothing left to do")
tst/uncarried_keys.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol uncarried-keys basic
tst/uo.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol uniq-orig basic
+ tst/wang.lisp view
@@ -0,0 +1,434 @@+(herald "Wang's Fair Exchange Protocol" (bound 10))++;; CPSA input file to represent+;; Wang's Fair Exchange Protocol++;; This macro implements the CPSA+;; convention of regarding a hash as+;; an asymmetric encryption.  The+;; decryption key inverse to (pubk+;; hash) is assumed non-originating+;; in roles using hashing.++(defmacro (hash x)+  (enc x (pubk hash_id)))++;; Wang's encrypted format for the+;; message payload.  Observe that m,+;; k get their values from the+;; like-named messages in the context+;; where the macro is expanded.++(defmacro (em)+  (enc m k))++;; The session label L as a fn of+;; the values that *should be* the+;; hashes of the encrypted message EM+;; and the session key K.++(defmacro (l-prime y x)+  (cat a b t y x))++;; The recipient can check that a+;; session label has an l-prime where+;; y is the hash of another parameter.+;; Hence recipient roles use l-star.++(defmacro (l-star e1 x)+  (l-prime (hash e1) x))++;; The Evidence of Origin is checked+;; to be this fn of other parameters+;; available to the recipient.++(defmacro (eoo-star x e1 e2)+  (enc (cat "eootag"+	    (hash (l-star e1 x)) e2)+       (privk "sign" a)))++;; The Evidence of Receipt is computed+;; as this fn of other parameters+;; available to the recipient.++(defmacro (eor-star x e1 e2)+  (enc (cat "eortag"+	    (hash (l-star e1 x)) e2)+       (privk "sign" b)))++;; The Recovery Request as computed by+;; the recipient.++(defmacro (rr-star x e1 e2)+  (cat (l-star e1 x) e2+       (eoo-star x e1 e2)+       (eor-star x e1 e2)+       (enc (cat "rcrq" (l-star e1 x) e2)+            (privk "sign" b))))++;; The Abort Token is checked+;; to be this fn of other parameters+;; available to the recipient.++(defmacro (at-star e1 x)+  (enc (enc "abrq" (l-star e1 x)+            (privk "sign" a))+       (privk "sign" t)))++;; How the initiator computes the+;; encrypted key package:++(defmacro (ek l)+  (enc (cat "keytag" (hash l) k r)+       (pubk "encr" t)))++;; The Initiator's computed+;; version of L.++(defmacro (l)+  (l-prime (hash (enc m k)) (hash k)))++;; The TTP can check that the session+;; label L is this fn of other+;; parameters available to the TTP.++(defmacro (l-prime-prime y)+  (cat a b t y (hash k)))++;; The TTP can check that the EOO+;; is this fn of other parameters+;; available to the TTP.++(defmacro (eoo-prime-prime y)+  (enc (cat "eootag"+            (hash (l-prime-prime y))+	    (ek (l-prime-prime y)))+       (privk "sign" a)))++;; The TTP can check that the EOR+;; is this fn of other parameters+;; available to the TTP.++(defmacro (eor-prime-prime y)+  (enc (cat "eortag"+	    (hash (l-prime-prime y))+	    (ek (l-prime-prime y)))+       (privk "sign" b)))++;; The TTP can check that the RR+;; is this fn of other parameters+;; available to the TTP.++(defmacro (rr-prime-prime y)+  (cat (l-prime-prime y)+       (ek (l-prime-prime y))+       (eoo-prime-prime y)+       (eor-prime-prime y)+       (enc "rcrq" (l-prime-prime y)+	    (ek (l-prime-prime y))+            (privk "sign" b))))++;; The TTP can check that the Confirmation+;; Request is this fn of other parameters+;; available to the TTP.++(defmacro (cf-prime-prime y)+  (cat (l-prime-prime y) (ek (l-prime-prime y))+       (eoo-prime-prime y) (eor-prime-prime y)+       (enc "cfrq" (l-prime-prime y)+	    (ek (l-prime-prime y))+            (privk "sign" b))))++;; Defn of Wang's Fair Exchange Protocol.+;; Closely follows the presentation in the+;; figures in Section 3.  In the TTP roles,+;; we have put a dummy send or receive in place+;; of the state synchronization event to keep+;; the indices matching the spec.++(defprotocol wang basic++  ;; Successful initiator run with no TTP involvement++  (defrole init1+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (send (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (recv (eor-star (hash k) (enc m k) (ek (l))))+     (send (cat k r)))+    (non-orig (privk hash_id)))++  ;; Aborted initiator run++  (defrole init2+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (send (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (send (enc "abrq" (l) (privk "sign" a)))+     (recv (enc "abcf"+                (enc "abrq" (l) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; Initiator run with abort request and forced recovery++  (defrole init3+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (send (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (send (enc "abrq" (l) (privk "sign" a)))+     (recv (eor-star (hash k) (enc m k) (ek (l)))))+    (non-orig (privk hash_id)))++  ;; Aborted initiator run, but with EOR received++  (defrole init4+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (send (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (recv (eor-star (hash k) (enc m k) (ek (l))))+     (send (enc "abrq" (l) (privk "sign" a)))+     (recv (enc "abcf"+                (enc "abrq" (l) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; Initiator run with abort requested after EOR received,+  ;; but recovery forced++  (defrole init5+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (send (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (recv (eor-star (hash k) (enc m k) (ek (l))))+     (send (enc "abrq" (l) (privk "sign" a)))+     (recv (eor-star (hash k) (enc m k) (ek (l)))))+    (non-orig (privk hash_id)))++  ;; Successful responder run with no TTP involvement++  (defrole resp1+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (recv (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (send (eor-star (hash k) (enc m k) (ek (l))))+     (recv (cat k r)))+    (non-orig (privk hash_id)))++  ;;Responder run with recovery via TTP++  (defrole resp2+    (vars (a b t hash_id name) (m data) (r text) (k skey))+    (trace+     (recv (cat (l) (enc m k) (ek (l))+                (eoo-star (hash k) (enc m k) (ek (l)))))+     (send (cat (l) (ek (l)) (eoo-star (hash k) (enc m k) (ek (l)))+                (eor-star (hash k) (enc m k) (ek (l)))))+     (send (cat (l) (ek (l)) (eoo-star (hash k) (enc m k) (ek (l)))+                (eor-star (hash k) (enc m k) (ek (l)))+                (enc "rcrq" (l) (ek (l)) (privk "sign" b))))+     (recv (cat k r)))+    (non-orig (privk hash_id)))++  ;; Responder run with recovery request and forced abort++  (defrole resp3+    (vars (a b t hash_id name) (e1 e2 x mesg))+    (trace+     (recv (cat (l-star e1 x) e1 e2 (eoo-star x e1 e2)))+     (send (cat (l-star e1 x) e2 (eoo-star x e1 e2) (eor-star x e1 e2)))+     (send (cat (l-star e1 x) e2 (eoo-star x e1 e2) (eor-star x e1 e2)+                (enc "rcrq" (l-star e1 x) e2 (privk "sign" b))))+     (recv (enc "abcf"+                (enc "abrq" (l-star e1 x) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; TTP handles an abort++  (defrole ttp-ab1+    (vars (a b t hash_id name) (y x mesg))+    (trace+     (recv (enc "abrq" (l-prime y x) (privk "sign" a)))+     (send (cat "sync-abrq"+                (enc "abrq" (l-prime y x) (privk "sign" a))))+     (send (enc "abcf"+                (enc "abrq" (l-prime y x) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; TTP forces recovery in response to an abort request++  (defrole ttp-ab2+    (vars (a b t hash_id name) (y x e mesg))+    (trace+     (recv (enc "abrq" (l-prime y x) (privk "sign" a)))+     (recv (cat "sync-abrq"+                (enc "eortag" (hash (l-prime y x)) e+                     (privk "sign" b))))+     (send (enc "eortag" (hash (l-prime y x)) e+                (privk "sign" b))))+    (non-orig (privk hash_id)))++  ;; TTP handles a recovery++  (defrole ttp-rc1+    (vars (a b t hash_id name) (r text) (k skey) (y mesg))+    (trace+     (recv (rr-prime-prime y))+     (send (cat "sync-rc-req"+                (rr-prime-prime y)))+     (send (cat k r)))+    (non-orig (privk hash_id)))++  ;; TTP forces abort in response to a recovery request++  (defrole ttp-rc2+    (vars (a b t hash_id name) (r text) (k skey) (y mesg))+    (trace+     (recv (rr-prime-prime y))+     (recv (cat "sync-rc-req"+		(enc "abrq" (l-prime-prime y) (privk "sign" a))))+     (send (enc "abcf"+                (enc "abrq" (l-prime-prime y) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; TTP handles a confirm request++  (defrole ttp-cf1+    (vars (a b t hash_id name) (r text) (k skey) (y mesg))+    (trace+     (recv (cf-prime-prime y))+     (send (cat "sync-cf-req"+                (cf-prime-prime y)))+     (send (enc (cf-prime-prime y) (privk "sign" t))))+    (non-orig (privk hash_id)))++  ;; TTP replies with abort token given confirm request++  (defrole ttp-cf2+    (vars (a b t hash_id name) (r text) (k skey) (y mesg))+    (trace+     (recv (cf-prime-prime y))+     (recv (cat "sync-cf-req"+                (enc "abrq"(l-prime-prime y) (privk "sign" a))))+     (send (enc "abcf"+                (enc "abrq"(l-prime-prime y) (privk "sign" a))+                (privk "sign" t))))+    (non-orig (privk hash_id))))++;; End of Wang's protocol defn.++;; Two experiments to prove Lemma 4.1++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand init1 1 (b b) (t t) (m m) (r r) (k k))+  (deflistener m)+  (non-orig+   (privk "encr" t))+  (uniq-orig m k)+  (comment "Experiment 1 to prove Lemma 4.1."))++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand init1 1 (b b) (t t) (m m) (r r) (k k))+  (deflistener k)+  (non-orig+   (privk "encr" t))+  (uniq-orig m k)+  (comment "Experiment 2 to prove Lemma 4.1."))++;; We now have three experiments+;; to prove Lemma 4.2, clause 1.++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand init1 3 (b b) (t t) (m m) (r r) (k k))+  (non-orig+   (privk "sign" b))+  (comment "First of three experiments to prove Lemma 4.2, clause 1."))++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand init3 3 (b b) (t t) (m m) (r r) (k k))+  (non-orig+   (privk "sign" b))+  (comment "Second of three experiments to prove Lemma 4.2, clause 1."))++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand init5 4 (b b) (t t) (m m) (r r) (k k))+  (non-orig+   (privk "sign" b))+  (comment "Third of three experiments to prove Lemma 4.2, clause 1."))++;; Two experiments to prove 4.2, Clause 2.++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand resp1 3 (a a) (t t) (m m) (r r) (k k))+  (non-orig+   (privk "sign" a))+  (comment+   "First of two experiments to prove Lemma 4.2, clause 2."))++(defskeleton wang+  (vars (a b t hash_id name) (m data) (r text) (k skey))+  (defstrand resp2 4 (a a) (t t) (m m) (r r) (k k))+  (non-orig+   (privk "sign" a))+  (comment+   "Second of two experiments to prove Lemma 4.2, clause 2."))++;; Experiment to prove Lemma 4.2, clause 3.++(defskeleton wang+  (vars (a b t hash_id name) (e1 e2 x mesg))+  (defstrand resp3 4 (a a) (t t))+  (non-orig+   (privk "sign" a))+  (comment+   "Experiments to prove Lemma 4.2, clause 3."))++;; One experiment to prove Lemma 4.3, Clause 1.++(defskeleton wang+  (vars (a b t hash_id name) (y x mesg))+  (deflistener+    (enc "abcf" (enc "abrq" (l-prime y x) (privk "sign" a))+	 (privk "sign" t)))+  (non-orig+   (privk "sign" t))+  (comment+   "Experiments to prove Lemma 4.3, clause 1."))++;; Three experiments to prove Lemma 4.3, Clause 2.++(defskeleton wang+  (vars (y x mesg) (a b t name))+  (defstrand ttp-ab1 3 (y y) (x x) (a a) (b b) (t t))+  (non-orig (privk "sign" a)  (privk "encr" t))+  (comment+   "Experiment 1 to prove Lemma 4.3, clause 2."))++(defskeleton wang+  (vars (a b t hash_id name) (r text) (k skey) (y mesg))+  (defstrand ttp-rc2 3 (a a) (b b) (t t))+  (non-orig (privk "sign" a)  (privk "encr" t))+  (comment+   "Experiment 2 to prove Lemma 4.3, clause 2."))++(defskeleton wang+  (vars (a b t hash_id name) (r text) (k skey) (y mesg))+  (defstrand ttp-cf2 3 (a a) (b b) (t t))+  (non-orig (privk "sign" a)  (privk "encr" t))+  (comment+   "Experiment 3 to prove Lemma 4.3, clause 2."))
tst/weird.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol weird basic
tst/wide-mouth-frog.tst view
@@ -1,7 +1,7 @@ (herald "Wide-Mouth Frog Protocol"   (comment "This protocol has an infinite number of shapes")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol wide-mouth-frog basic
tst/wonthull.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol wonthull basic
tst/wonthull2.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol wonthull2 basic
tst/wonthull3.tst view
@@ -1,4 +1,4 @@-(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol wonthull3 basic
tst/woolam.tst view
@@ -1,6 +1,6 @@ (herald "Woo-Lam Protocol") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol woolam basic
tst/yahalom-6.3.6.tst view
@@ -4,7 +4,7 @@     "Yahalom Protocol, Section 6.3.6, Page 49")   (url "http://www.eecs.umich.edu/acal/swerve/docs/49-1.pdf")) -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol yahalom basic
tst/yahalom.tst view
@@ -1,6 +1,6 @@ (herald "Yahalom Protocol Without Forwarding") -(comment "CPSA 2.2.0")+(comment "CPSA 2.2.2") (comment "All input read")  (defprotocol yahalom basic