1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/rlm/telmo.clj	Tue Oct 18 00:57:08 2011 -0700
     1.3 @@ -0,0 +1,32 @@
     1.4 +(ns rlm.telmo
     1.5 +  (:refer-clojure :only [])
     1.6 +  (:require rlm.ns-rlm mobius.base))
     1.7 +(rlm.ns-rlm/ns-clone mobius.base)
     1.8 +
     1.9 +
    1.10 +(import '[telmo.matcher.library Variable VariableType Transition])
    1.11 +(import '[java.io BufferedReader])
    1.12 +
    1.13 +(def a (Transition. VariableType/W 1 0 0 1))
    1.14 +
    1.15 +
    1.16 +;; (defmulti read-structure first)
    1.17 +
    1.18 +;; (defmethod read-structure  Transition [_ s]
    1.19 +
    1.20 +
    1.21 +
    1.22 +
    1.23 +
    1.24 +
    1.25 +;; (defmethod seq Transition [t]
    1.26 +;; 	   5)
    1.27 +
    1.28 +
    1.29 +;; (defmethod seq Variable [v]
    1.30 +
    1.31 +;; (defn read-as-pattern
    1.32 +
    1.33 +;; ;(defmulti write 
    1.34 +
    1.35 +