{-# LANGUAGE OverloadedStrings #-}
module Country.Unexposed.Subdivision
( codeArray
, codeArrayShort
, nameArray
, nameArrayShort
, categoryArray
, actualNumberOfSubdivisions
) where
import Data.Primitive.Contiguous (SmallArray)
import Data.Text (Text)
import Data.Text.Short (ShortText)
import Data.Primitive.Unlifted.Array (UnliftedArray)
import qualified Data.Primitive.Contiguous as Arr
codeArray :: SmallArray Text
codeArray :: SmallArray Text
codeArray = Int -> [Text] -> SmallArray Text
forall (arr :: * -> *) a.
(Contiguous arr, Element arr a) =>
Int -> [a] -> arr a
Arr.fromListN Int
57
[ Text
"US-AL"
, Text
"US-AK"
, Text
"US-AZ"
, Text
"US-AR"
, Text
"US-CA"
, Text
"US-CO"
, Text
"US-CT"
, Text
"US-DE"
, Text
"US-FL"
, Text
"US-GA"
, Text
"US-HI"
, Text
"US-ID"
, Text
"US-IL"
, Text
"US-IN"
, Text
"US-IA"
, Text
"US-KS"
, Text
"US-KY"
, Text
"US-LA"
, Text
"US-ME"
, Text
"US-MD"
, Text
"US-MA"
, Text
"US-MI"
, Text
"US-MN"
, Text
"US-MS"
, Text
"US-MO"
, Text
"US-MT"
, Text
"US-NE"
, Text
"US-NV"
, Text
"US-NH"
, Text
"US-NJ"
, Text
"US-NM"
, Text
"US-NY"
, Text
"US-NC"
, Text
"US-ND"
, Text
"US-OH"
, Text
"US-OK"
, Text
"US-OR"
, Text
"US-PA"
, Text
"US-RI"
, Text
"US-SC"
, Text
"US-SD"
, Text
"US-TN"
, Text
"US-TX"
, Text
"US-UT"
, Text
"US-VT"
, Text
"US-VA"
, Text
"US-WA"
, Text
"US-WV"
, Text
"US-WI"
, Text
"US-WY"
, Text
"US-DC"
, Text
"US-AS"
, Text
"US-GU"
, Text
"US-MP"
, Text
"US-PR"
, Text
"US-UM"
, Text
"US-VI"
]
{-# NOINLINE codeArray #-}
codeArrayShort :: UnliftedArray ShortText
codeArrayShort :: UnliftedArray ShortText
codeArrayShort = Int -> [ShortText] -> UnliftedArray ShortText
forall (arr :: * -> *) a.
(Contiguous arr, Element arr a) =>
Int -> [a] -> arr a
Arr.fromListN Int
57
[ ShortText
"US-AL"
, ShortText
"US-AK"
, ShortText
"US-AZ"
, ShortText
"US-AR"
, ShortText
"US-CA"
, ShortText
"US-CO"
, ShortText
"US-CT"
, ShortText
"US-DE"
, ShortText
"US-FL"
, ShortText
"US-GA"
, ShortText
"US-HI"
, ShortText
"US-ID"
, ShortText
"US-IL"
, ShortText
"US-IN"
, ShortText
"US-IA"
, ShortText
"US-KS"
, ShortText
"US-KY"
, ShortText
"US-LA"
, ShortText
"US-ME"
, ShortText
"US-MD"
, ShortText
"US-MA"
, ShortText
"US-MI"
, ShortText
"US-MN"
, ShortText
"US-MS"
, ShortText
"US-MO"
, ShortText
"US-MT"
, ShortText
"US-NE"
, ShortText
"US-NV"
, ShortText
"US-NH"
, ShortText
"US-NJ"
, ShortText
"US-NM"
, ShortText
"US-NY"
, ShortText
"US-NC"
, ShortText
"US-ND"
, ShortText
"US-OH"
, ShortText
"US-OK"
, ShortText
"US-OR"
, ShortText
"US-PA"
, ShortText
"US-RI"
, ShortText
"US-SC"
, ShortText
"US-SD"
, ShortText
"US-TN"
, ShortText
"US-TX"
, ShortText
"US-UT"
, ShortText
"US-VT"
, ShortText
"US-VA"
, ShortText
"US-WA"
, ShortText
"US-WV"
, ShortText
"US-WI"
, ShortText
"US-WY"
, ShortText
"US-DC"
, ShortText
"US-AS"
, ShortText
"US-GU"
, ShortText
"US-MP"
, ShortText
"US-PR"
, ShortText
"US-UM"
, ShortText
"US-VI"
]
{-# NOINLINE codeArrayShort #-}
nameArray :: SmallArray Text
nameArray :: SmallArray Text
nameArray = Int -> [Text] -> SmallArray Text
forall (arr :: * -> *) a.
(Contiguous arr, Element arr a) =>
Int -> [a] -> arr a
Arr.fromListN Int
57
[ Text
"Alabama"
, Text
"Alaska"
, Text
"Arizona"
, Text
"Arkansas"
, Text
"California"
, Text
"Colorado"
, Text
"Connecticut"
, Text
"Delaware"
, Text
"Florida"
, Text
"Georgia"
, Text
"Hawaii"
, Text
"Idaho"
, Text
"Illinois"
, Text
"Indiana"
, Text
"Iowa"
, Text
"Kansas"
, Text
"Kentucky"
, Text
"Louisiana"
, Text
"Maine"
, Text
"Maryland"
, Text
"Massachusetts"
, Text
"Michigan"
, Text
"Minnesota"
, Text
"Mississippi"
, Text
"Missouri"
, Text
"Montana"
, Text
"Nebraska"
, Text
"Nevada"
, Text
"New Hampshire"
, Text
"New Jersey"
, Text
"New Mexico"
, Text
"New York"
, Text
"North Carolina"
, Text
"North Dakota"
, Text
"Ohio"
, Text
"Oklahoma"
, Text
"Oregon"
, Text
"Pennsylvania"
, Text
"Rhode Island"
, Text
"South Carolina"
, Text
"South Dakota"
, Text
"Tennessee"
, Text
"Texas"
, Text
"Utah"
, Text
"Vermont"
, Text
"Virginia"
, Text
"Washington"
, Text
"West Virginia"
, Text
"Wisconsin"
, Text
"Wyoming"
, Text
"District of Columbia"
, Text
"American Samoa"
, Text
"Guam"
, Text
"Northern Mariana Islands"
, Text
"Puerto Rico"
, Text
"United States Minor Outlying Islands"
, Text
"U.S. Virgin Islands"
]
{-# NOINLINE nameArray #-}
nameArrayShort :: UnliftedArray ShortText
nameArrayShort :: UnliftedArray ShortText
nameArrayShort = Int -> [ShortText] -> UnliftedArray ShortText
forall (arr :: * -> *) a.
(Contiguous arr, Element arr a) =>
Int -> [a] -> arr a
Arr.fromListN Int
57
[ ShortText
"Alabama"
, ShortText
"Alaska"
, ShortText
"Arizona"
, ShortText
"Arkansas"
, ShortText
"California"
, ShortText
"Colorado"
, ShortText
"Connecticut"
, ShortText
"Delaware"
, ShortText
"Florida"
, ShortText
"Georgia"
, ShortText
"Hawaii"
, ShortText
"Idaho"
, ShortText
"Illinois"
, ShortText
"Indiana"
, ShortText
"Iowa"
, ShortText
"Kansas"
, ShortText
"Kentucky"
, ShortText
"Louisiana"
, ShortText
"Maine"
, ShortText
"Maryland"
, ShortText
"Massachusetts"
, ShortText
"Michigan"
, ShortText
"Minnesota"
, ShortText
"Mississippi"
, ShortText
"Missouri"
, ShortText
"Montana"
, ShortText
"Nebraska"
, ShortText
"Nevada"
, ShortText
"New Hampshire"
, ShortText
"New Jersey"
, ShortText
"New Mexico"
, ShortText
"New York"
, ShortText
"North Carolina"
, ShortText
"North Dakota"
, ShortText
"Ohio"
, ShortText
"Oklahoma"
, ShortText
"Oregon"
, ShortText
"Pennsylvania"
, ShortText
"Rhode Island"
, ShortText
"South Carolina"
, ShortText
"South Dakota"
, ShortText
"Tennessee"
, ShortText
"Texas"
, ShortText
"Utah"
, ShortText
"Vermont"
, ShortText
"Virginia"
, ShortText
"Washington"
, ShortText
"West Virginia"
, ShortText
"Wisconsin"
, ShortText
"Wyoming"
, ShortText
"District of Columbia"
, ShortText
"American Samoa"
, ShortText
"Guam"
, ShortText
"Northern Mariana Islands"
, ShortText
"Puerto Rico"
, ShortText
"United States Minor Outlying Islands"
, ShortText
"U.S. Virgin Islands"
]
{-# NOINLINE nameArrayShort #-}
categoryArray :: SmallArray Text
categoryArray :: SmallArray Text
categoryArray = Int -> [Text] -> SmallArray Text
forall (arr :: * -> *) a.
(Contiguous arr, Element arr a) =>
Int -> [a] -> arr a
Arr.fromListN Int
57
[ Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"state"
, Text
"district"
, Text
"outlying area"
, Text
"outlying area"
, Text
"outlying area"
, Text
"outlying area"
, Text
"outlying area"
, Text
"outlying area"
]
{-# NOINLINE categoryArray #-}
actualNumberOfSubdivisions :: Int
actualNumberOfSubdivisions :: Int
actualNumberOfSubdivisions = Int
57