nerf member_at to prepare for decision dependency and aperture work

[scpubgit/DX.git] / fragments / bind

diff --git a/fragments/bind b/fragments/bind
index 88f77c5..aa85303 100644 (file)
--- a/fragments/bind
+++ b/fragments/bind
@@ -1,3 +1,4 @@
+#trace +step +search
 ?
 dict ?X
 eq ?Y X
@@ -5,3 +6,12 @@ qact
 eq Y {{ foo 1 }}
 qact
 .
+?
+dict ?X {{ foo {{ bar 1 }} }}
+member_at X 'foo' ?Y
+member_at Y 'bar' ?Z
+eq Z 2
+member_at Y 'baz' ?U
+eq U 4
+qact
+.