This commit is contained in:
Chris Fallin
2021-09-04 18:45:03 -07:00
parent cd55dc9568
commit be1140e80a
3 changed files with 159 additions and 36 deletions

View File

@@ -10,3 +10,12 @@
(rule
(Lower (A.A1 sub @ (Input (A.A2 42))))
(B.B2 sub))
(decl Extractor (B) A)
(rule
(A.A2 x)
(Extractor (B.B1 x)))
(rule
(Lower (Extractor b))
b)