к
Size: a a a
AA
R
pattern String :: String -> Text
pattern String a <- (unpack -> a)
where String a = pack a
g :: String -> String -> Text -> A
f :: Text -> Text -> A
f (String a) (String b) =
g a b (String (a <> b))
AA
pattern String :: String -> Text
pattern String a <- (unpack -> a)
where String a = pack a
g :: String -> String -> Text -> A
f :: Text -> Text -> A
f (String a) (String b) =
g a b (String (a <> b))
YS
YS
YS
YS
YS
YS