| ⊦ char ' + str0 = "", l→s(sublist(m0 + 1, n, s→l(char ' + str0))) = substring(str0, m0, n) |
⊦ char ' + str0 = "", l→s(sublist(m0 + 1, n, char ' + s→l(str0))) = substring(str0, m0, n)
Used simplifier rules: assoc: ⊦ (str1 + str2) + str3 = str1 + str2 + str3; from specification string-append%s2l-rec: ⊦ s→l(char ' + str) = char ' + s→l(str); from specification string2list