Rel 0.1.1

Author: goedman

Project.toml

@@ -1,7 +1,7 @@
 name = "StructuralCausalModels"
 uuid = "a41e6734-49ce-4065-8b83-aff084c01dfd"
 authors = ["Rob J Goedman <goedman@mac.com>"]
-version = "0.1.0"
+version = "0.1.1"
 
 [deps]
 CSV = "336ed68f-0bac-5ca0-87d4-7b16caf5d00b"

research/ops.jl

@@ -0,0 +1,19 @@
+using StructuralCausalModels
+import StructuralCausalModels.SymbolList
+
+
+import Base.-
+
+-(x::SymbolList, y::SymbolList) = (type=:line, x=x, y=y)
+
+↔(x, y) = (type=:darrow, x=x, y=y)
+
+→(x, y) = (type=:rarrow, x=x, y=y)
+
+println(:b - :A)
+println(:b ↔ [:A, :D])
+println([:X, :T] → :A)
+
+m = (:b - :A, [:X, :T] → :A, :b ↔ [:A, :D])
+
+m[3] |> display