| to3 = fail, x0 = 2 ', x1 = x0 ∧ d0 = 2, h0 = head(x1) ⊦ 〈if some(Node(Node(Leaf, Leaf), some(Leaf) .t)) = fail then to0 := fail else to0 := some(Node(Leaf, some(Node(Node(Leaf, Leaf), some(Leaf) .t)) .t))〉 〈to1 := to0 ; if pop(x1) ≠ [] then to1 := fail〉 to1 = some(Node(Leaf, Node(Node(Leaf, Leaf), Leaf))) |
to3 = fail, x0 = 2 ', x1 = x0 ∧ d0 = 2, h0 = head(x1) ⊦ 〈to0 := some(Node(Leaf, some(Node(Node(Leaf, Leaf), some(Leaf) .t)) .t))〉 〈to1 := to0 ; if pop(x1) ≠ [] then to1 := fail〉 to1 = some(Node(Leaf, Node(Node(Leaf, Leaf), Leaf)))
[[CONCRETESIMPRULES : ([CSIMPSEQ : ⊦ some(t) .t = t], [CSIMPSEQ : ⊦ fail ≠ some(t)])]]