From c1731220d6376a9157d991284886f8744f99b7bb Mon Sep 17 00:00:00 2001
From: David Smith <shmish111@gmail.com>
Date: Wed, 22 Jun 2016 10:39:46 +0100
Subject: [PATCH] add 2 character country code generator

---
 src/degenerate/core.clj | 526 +++++++++++++++++++++++++++++++++++++++-
 1 file changed, 525 insertions(+), 1 deletion(-)

diff --git a/src/degenerate/core.clj b/src/degenerate/core.clj
index 718746c..13a3732 100644
--- a/src/degenerate/core.clj
+++ b/src/degenerate/core.clj
@@ -147,4 +147,528 @@
                             (if (instance? Optional k)
                               (gen-maybe-kv (:v k) v)
                               (gen/tuple (gen/return k) v))))
-                        m))))
\ No newline at end of file
+                        m))))
+
+(def country-gen-2
+  "Generates 2 character country iso codes"
+  (gen/fmap first
+    (gen/shuffle ["AF"
+                  "AL"
+                  "DZ"
+                  "AD"
+                  "AO"
+                  "AG"
+                  "AR"
+                  "AM"
+                  "AU"
+                  "AT"
+                  "AZ"
+                  "BS"
+                  "BH"
+                  "BD"
+                  "BB"
+                  "BY"
+                  "BE"
+                  "BZ"
+                  "BJ"
+                  "BT"
+                  "BO"
+                  "BA"
+                  "BW"
+                  "BR"
+                  "BN"
+                  "BG"
+                  "BF"
+                  "BI"
+                  "KH"
+                  "CM"
+                  "CA"
+                  "CV"
+                  "CF"
+                  "TD"
+                  "CL"
+                  "CN"
+                  "CO"
+                  "KM"
+                  "CD"
+                  "CG"
+                  "CR"
+                  "CI"
+                  "HR"
+                  "CU"
+                  "CY"
+                  "CZ"
+                  "DK"
+                  "DJ"
+                  "DM"
+                  "DO"
+                  "EC"
+                  "EG"
+                  "SV"
+                  "GQ"
+                  "ER"
+                  "EE"
+                  "ET"
+                  "FJ"
+                  "FI"
+                  "FR"
+                  "GA"
+                  "GM"
+                  "GE"
+                  "DE"
+                  "GH"
+                  "GR"
+                  "GD"
+                  "GT"
+                  "GN"
+                  "GW"
+                  "GY"
+                  "HT"
+                  "HN"
+                  "HU"
+                  "IS"
+                  "IN"
+                  "ID"
+                  "IR"
+                  "IQ"
+                  "IE"
+                  "IL"
+                  "IT"
+                  "JM"
+                  "JP"
+                  "JO"
+                  "KZ"
+                  "KE"
+                  "KI"
+                  "KP"
+                  "KR"
+                  "KW"
+                  "KG"
+                  "LA"
+                  "LV"
+                  "LB"
+                  "LS"
+                  "LR"
+                  "LY"
+                  "LI"
+                  "LT"
+                  "LU"
+                  "MK"
+                  "MG"
+                  "MW"
+                  "MY"
+                  "MV"
+                  "ML"
+                  "MT"
+                  "MH"
+                  "MR"
+                  "MU"
+                  "MX"
+                  "FM"
+                  "MD"
+                  "MC"
+                  "MN"
+                  "ME"
+                  "MA"
+                  "MZ"
+                  "MM"
+                  "NA"
+                  "NR"
+                  "NP"
+                  "NL"
+                  "NZ"
+                  "NI"
+                  "NE"
+                  "NG"
+                  "NO"
+                  "OM"
+                  "PK"
+                  "PW"
+                  "PA"
+                  "PG"
+                  "PY"
+                  "PE"
+                  "PH"
+                  "PL"
+                  "PT"
+                  "QA"
+                  "RO"
+                  "RU"
+                  "RW"
+                  "KN"
+                  "LC"
+                  "VC"
+                  "WS"
+                  "SM"
+                  "ST"
+                  "SA"
+                  "SN"
+                  "RS"
+                  "SC"
+                  "SL"
+                  "SG"
+                  "SK"
+                  "SI"
+                  "SB"
+                  "SO"
+                  "ZA"
+                  "ES"
+                  "LK"
+                  "SD"
+                  "SR"
+                  "SZ"
+                  "SE"
+                  "CH"
+                  "SY"
+                  "TJ"
+                  "TZ"
+                  "TH"
+                  "TL"
+                  "TG"
+                  "TO"
+                  "TT"
+                  "TN"
+                  "TR"
+                  "TM"
+                  "TV"
+                  "UG"
+                  "UA"
+                  "AE"
+                  "GB"
+                  "US"
+                  "UY"
+                  "UZ"
+                  "VU"
+                  "VA"
+                  "VE"
+                  "VN"
+                  "YE"
+                  "ZM"
+                  "ZW"
+                  "GE"
+                  "TW"
+                  "AZ"
+                  "CY"
+                  "MD"
+                  "SO"
+                  "GE"
+                  "AU"
+                  "CX"
+                  "CC"
+                  "AU"
+                  "HM"
+                  "NF"
+                  "NC"
+                  "PF"
+                  "YT"
+                  "GP"
+                  "GP"
+                  "PM"
+                  "WF"
+                  "TF"
+                  "PF"
+                  "BV"
+                  "CK"
+                  "NU"
+                  "TK"
+                  "GG"
+                  "IM"
+                  "JE"
+                  "AI"
+                  "BM"
+                  "IO"
+                  "VG"
+                  "KY"
+                  "FK"
+                  "GI"
+                  "MS"
+                  "PN"
+                  "SH"
+                  "GS"
+                  "TC"
+                  "MP"
+                  "PR"
+                  "AS"
+                  "UM"
+                  "GU"
+                  "UM"
+                  "UM"
+                  "UM"
+                  "UM"
+                  "UM"
+                  "UM"
+                  "UM"
+                  "VI"
+                  "UM"
+                  "HK"
+                  "MO"
+                  "FO"
+                  "GL"
+                  "GF"
+                  "GP"
+                  "MQ"
+                  "RE"
+                  "AX"
+                  "AW"
+                  "AN"
+                  "SJ"
+                  "AC"
+                  "TA"
+                  "AQ"
+                  "AQ"
+                  "AQ"
+                  "AQ"
+                  "AQ"])))
+
+(def country-gen-3
+  "Generates 3 character country iso codes"
+  (gen/fmap first
+    (gen/shuffle ["AFG"
+                  "ALB"
+                  "DZA"
+                  "ASM"
+                  "AND"
+                  "AGO"
+                  "AIA"
+                  "ATA"
+                  "ATG"
+                  "ARG"
+                  "ARM"
+                  "ABW"
+                  "AUS"
+                  "AUT"
+                  "AZE"
+                  "BHS"
+                  "BHR"
+                  "BGD"
+                  "BRB"
+                  "BLR"
+                  "BEL"
+                  "BLZ"
+                  "BEN"
+                  "BMU"
+                  "BTN"
+                  "BOL"
+                  "BES"
+                  "BIH"
+                  "BWA"
+                  "BVT"
+                  "BRA"
+                  "IOT"
+                  "BRN"
+                  "BGR"
+                  "BFA"
+                  "BDI"
+                  "KHM"
+                  "CMR"
+                  "CAN"
+                  "CPV"
+                  "CYM"
+                  "CAF"
+                  "TCD"
+                  "CHL"
+                  "CHN"
+                  "CXR"
+                  "CCK"
+                  "COL"
+                  "COM"
+                  "COG"
+                  "COD"
+                  "COK"
+                  "CRI"
+                  "HRV"
+                  "CUB"
+                  "CUW"
+                  "CYP"
+                  "CZE"
+                  "CIV"
+                  "DNK"
+                  "DJI"
+                  "DMA"
+                  "DOM"
+                  "ECU"
+                  "EGY"
+                  "SLV"
+                  "GNQ"
+                  "ERI"
+                  "EST"
+                  "ETH"
+                  "FLK"
+                  "FRO"
+                  "FJI"
+                  "FIN"
+                  "FRA"
+                  "GUF"
+                  "PYF"
+                  "ATF"
+                  "GAB"
+                  "GMB"
+                  "GEO"
+                  "DEU"
+                  "GHA"
+                  "GIB"
+                  "GRC"
+                  "GRL"
+                  "GRD"
+                  "GLP"
+                  "GUM"
+                  "GTM"
+                  "GGY"
+                  "GIN"
+                  "GNB"
+                  "GUY"
+                  "HTI"
+                  "HMD"
+                  "VAT"
+                  "HND"
+                  "HKG"
+                  "HUN"
+                  "ISL"
+                  "IND"
+                  "IDN"
+                  "IRN"
+                  "IRQ"
+                  "IRL"
+                  "IMN"
+                  "ISR"
+                  "ITA"
+                  "JAM"
+                  "JPN"
+                  "JEY"
+                  "JOR"
+                  "KAZ"
+                  "KEN"
+                  "KIR"
+                  "PRK"
+                  "KOR"
+                  "KWT"
+                  "KGZ"
+                  "LAO"
+                  "LVA"
+                  "LBN"
+                  "LSO"
+                  "LBR"
+                  "LBY"
+                  "LIE"
+                  "LTU"
+                  "LUX"
+                  "MAC"
+                  "MKD"
+                  "MDG"
+                  "MWI"
+                  "MYS"
+                  "MDV"
+                  "MLI"
+                  "MLT"
+                  "MHL"
+                  "MTQ"
+                  "MRT"
+                  "MUS"
+                  "MYT"
+                  "MEX"
+                  "FSM"
+                  "MDA"
+                  "MCO"
+                  "MNG"
+                  "MNE"
+                  "MSR"
+                  "MAR"
+                  "MOZ"
+                  "MMR"
+                  "NAM"
+                  "NRU"
+                  "NPL"
+                  "NLD"
+                  "NCL"
+                  "NZL"
+                  "NIC"
+                  "NER"
+                  "NGA"
+                  "NIU"
+                  "NFK"
+                  "MNP"
+                  "NOR"
+                  "OMN"
+                  "PAK"
+                  "PLW"
+                  "PSE"
+                  "PAN"
+                  "PNG"
+                  "PRY"
+                  "PER"
+                  "PHL"
+                  "PCN"
+                  "POL"
+                  "PRT"
+                  "PRI"
+                  "QAT"
+                  "ROU"
+                  "RUS"
+                  "RWA"
+                  "REU"
+                  "BLM"
+                  "SHN"
+                  "KNA"
+                  "LCA"
+                  "MAF"
+                  "SPM"
+                  "VCT"
+                  "WSM"
+                  "SMR"
+                  "STP"
+                  "SAU"
+                  "SEN"
+                  "SRB"
+                  "SYC"
+                  "SLE"
+                  "SGP"
+                  "SXM"
+                  "SVK"
+                  "SVN"
+                  "SLB"
+                  "SOM"
+                  "ZAF"
+                  "SGS"
+                  "SSD"
+                  "ESP"
+                  "LKA"
+                  "SDN"
+                  "SUR"
+                  "SJM"
+                  "SWZ"
+                  "SWE"
+                  "CHE"
+                  "SYR"
+                  "TWN"
+                  "TJK"
+                  "TZA"
+                  "THA"
+                  "TLS"
+                  "TGO"
+                  "TKL"
+                  "TON"
+                  "TTO"
+                  "TUN"
+                  "TUR"
+                  "TKM"
+                  "TCA"
+                  "TUV"
+                  "UGA"
+                  "UKR"
+                  "ARE"
+                  "GBR"
+                  "USA"
+                  "UMI"
+                  "URY"
+                  "UZB"
+                  "VUT"
+                  "VEN"
+                  "VNM"
+                  "VGB"
+                  "VIR"
+                  "WLF"
+                  "ESH"
+                  "YEM"
+                  "ZMB"
+                  "ZWE"
+                  "ALA"])))
\ No newline at end of file