⊦ dls(head, prev, a ', r ', next, tail) = (⌜head = r ∧ tail = r⌝ ∧ head => mkcell(prev, next, a))
[Concretesimprules(())]