MS
case typeofprod of
1 -> show...
2 -> "it is..."
_ -> "I don't know..."
Size: a a a
MS
case typeofprod of
1 -> show...
2 -> "it is..."
_ -> "I don't know..."
MS
DZ
a
AV
JS
AV
YS
YS
YS
YS
D
YS
YS
JS
YS
{- UNPACK -}
снимает один уровень индирекции через доставание из конструктора данныхY
{- UNPACK -}
снимает один уровень индирекции через доставание из конструктора данных