JSONStringProof.escaped_body: def of qasim-bend-kit@0.1.0.2
Import: import qasim-bend-kit@0.1.0.2/proof/JSON_StringProof.bend as JSONStringProof
Lines 1969-1975 of qasim-bend-kit@0.1.0.2/proof/JSON_StringProof.bend: https://jend.leeeet.dev/read.txt?path=qasim-bend-kit@0.1.0.2/proof/JSON_StringProof.bend&start_line=1969&end_line=1975

import Base
import qasim-bend-kit@0.1.0.2/libs/JSON.bend as J

def escaped_body(+text: String) -> {J.fast_string(J.escape_string(text) ++ "\"") == J.Decoded{text} : J.FastString}:
    match text:
        case SNil{}: {==}
        case SCon{h, t}:
            Equal.trans(J.FastString, J.fast_string((J.escape_char(h) ++ J.escape_string(t)) ++ "\""), J.fast_string(J.escape_char(h) ++ (J.escape_string(t) ++ "\"")), J.Decoded{SCon{h, t}},
                Equal.cong(String, J.FastString, J.fast_string, (J.escape_char(h) ++ J.escape_string(t)) ++ "\"", J.escape_char(h) ++ (J.escape_string(t) ++ "\""), append_assoc(J.escape_char(h), J.escape_string(t), "\"")),
                escape_one(h, J.escape_string(t) ++ "\"", t, escaped_body(t)))

Uses (10):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.cong
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Equal.trans
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=String.append
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=FastString
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=escape_char
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=escape_string
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/libs/JSON.bend&name=fast_string
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/proof/JSON_StringProof.bend&name=append_assoc
  https://jend.leeeet.dev/definition.txt?path=qasim-bend-kit@0.1.0.2/proof/JSON_StringProof.bend&name=escape_one