dispList_ :: [Integer] -> Int -> Text
dispList_ _ 0 = "List of Variant: " <> "0 items"
dispList_ :: [Integer] -> Int -> Text
dispList_ _ 0 = "List of Variant: " <> "0 items"
dispList_ _ 0 = "List of Variant: " <> "0 items"