QZ
можно считать костылем но жизнь не портит, юзается легко
Size: a a a
QZ
QZ
RS
AK
AK
type MyUnionType = TypeOne | TypeTwo
myFunc : List MyUnionType -> ...
myFunc customList =
case customList of
<что писать, чтобы выбрать список только из TypeOne?> -> ...
_ -> ...
AP
AP
AP
AK
AP
isTypeOne x = case x of
TypeOne -> True
_ -> False
AP
List.filter isTypeOne
AP
AK
case customList of
(TypeOne elmOne)::(TypeTwo elmTwo)::_ ->
_ -> ...
AP
чтобы выбрать список только из TypeOne
AK
AK
AK
AP