fromTagged n (E.Tagged v "" t) = singleton '#' <> string t <> " " <> fromValue n v
fromTagged n (E.Tagged v "" t) = singleton '#' <> string t <> " " <> fromValue n v
fromTagged n (E.Tagged v "" t) = singleton '#' <> string t <> " " <> fromValue n v