Е
Size: a a a
AA
Е
AA
AA
А
AA
AZ
AA
AZ
AA
AA
AZ
AA
AZ
data ServerError =
Error1 Int String
Error2 Int
….
handleError :: ServerError -> Unit
handleError (Error1 retryNumber message) = <тело_функции>
handleError (Error2 retryNumber) = <тело_функции>
…