writeln "character   Unicode    UTF-8 encoding (hex)"

for cp in "AöЖ€𝄞" {
    val utf8 =  cp -> cp2s -> s2b
    val cpstr = utf8 -> b2s
    val utf8rep = join(map(utf8, by=fn(b) { "{{b:X02}}" }), delim=" ")
    writeln "{{cpstr:-11}} U+{{cp:X04:-8}} {{utf8rep}}"
}