]> gitweb.factorcode.org Git - factor.git/commitdiff
countries: adding ISO 3166-1 country codes
authorJohn Benediktsson <mrjbq7@gmail.com>
Fri, 28 Jan 2022 16:37:38 +0000 (08:37 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Fri, 28 Jan 2022 16:38:07 +0000 (08:38 -0800)
extra/countries/authors.txt [new file with mode: 0644]
extra/countries/countries.factor [new file with mode: 0644]
extra/countries/summary.txt [new file with mode: 0644]

diff --git a/extra/countries/authors.txt b/extra/countries/authors.txt
new file mode 100644 (file)
index 0000000..e091bb8
--- /dev/null
@@ -0,0 +1 @@
+John Benediktsson
diff --git a/extra/countries/countries.factor b/extra/countries/countries.factor
new file mode 100644 (file)
index 0000000..925152c
--- /dev/null
@@ -0,0 +1,507 @@
+IN: country-codes
+
+! ISO 3166-1
+
+CONSTANT: alpha-2 H{
+    { "AD" "Andorra" }
+    { "AE" "United Arab Emirates" }
+    { "AF" "Afghanistan" }
+    { "AG" "Antigua and Barbuda" }
+    { "AI" "Anguilla" }
+    { "AL" "Albania" }
+    { "AM" "Armenia" }
+    { "AO" "Angola" }
+    { "AQ" "Antarctica" }
+    { "AR" "Argentina" }
+    { "AS" "American Samoa" }
+    { "AT" "Austria" }
+    { "AU" "Australia" }
+    { "AW" "Aruba" }
+    { "AX" "Åland Islands" }
+    { "AZ" "Azerbaijan" }
+    { "BA" "Bosnia and Herzegovina" }
+    { "BB" "Barbados" }
+    { "BD" "Bangladesh" }
+    { "BE" "Belgium" }
+    { "BF" "Burkina Faso" }
+    { "BG" "Bulgaria" }
+    { "BH" "Bahrain" }
+    { "BI" "Burundi" }
+    { "BJ" "Benin" }
+    { "BL" "Saint Barthélemy" }
+    { "BM" "Bermuda" }
+    { "BN" "Brunei Darussalam" }
+    { "BO" "Bolivia (Plurinational State of)" }
+    { "BQ" "Bonaire, Sint Eustatius and Saba" }
+    { "BR" "Brazil" }
+    { "BS" "Bahamas" }
+    { "BT" "Bhutan" }
+    { "BV" "Bouvet Island" }
+    { "BW" "Botswana" }
+    { "BY" "Belarus" }
+    { "BZ" "Belize" }
+    { "CA" "Canada" }
+    { "CC" "Cocos (Keeling) Islands" }
+    { "CD" "Congo, Democratic Republic of the" }
+    { "CF" "Central African Republic" }
+    { "CG" "Congo" }
+    { "CH" "Switzerland" }
+    { "CI" "Côte d'Ivoire" }
+    { "CK" "Cook Islands" }
+    { "CL" "Chile" }
+    { "CM" "Cameroon" }
+    { "CN" "China" }
+    { "CO" "Colombia" }
+    { "CR" "Costa Rica" }
+    { "CU" "Cuba" }
+    { "CV" "Cabo Verde" }
+    { "CW" "Curaçao" }
+    { "CX" "Christmas Island" }
+    { "CY" "Cyprus" }
+    { "CZ" "Czechia" }
+    { "DE" "Germany" }
+    { "DJ" "Djibouti" }
+    { "DK" "Denmark" }
+    { "DM" "Dominica" }
+    { "DO" "Dominican Republic" }
+    { "DZ" "Algeria" }
+    { "EC" "Ecuador" }
+    { "EE" "Estonia" }
+    { "EG" "Egypt" }
+    { "EH" "Western Sahara" }
+    { "ER" "Eritrea" }
+    { "ES" "Spain" }
+    { "ET" "Ethiopia" }
+    { "FI" "Finland" }
+    { "FJ" "Fiji" }
+    { "FK" "Falkland Islands (Malvinas)" }
+    { "FM" "Micronesia (Federated States of)" }
+    { "FO" "Faroe Islands" }
+    { "FR" "France" }
+    { "GA" "Gabon" }
+    { "GB" "United Kingdom of Great Britain and Northern Ireland" }
+    { "GD" "Grenada" }
+    { "GE" "Georgia" }
+    { "GF" "French Guiana" }
+    { "GG" "Guernsey" }
+    { "GH" "Ghana" }
+    { "GI" "Gibraltar" }
+    { "GL" "Greenland" }
+    { "GM" "Gambia" }
+    { "GN" "Guinea" }
+    { "GP" "Guadeloupe" }
+    { "GQ" "Equatorial Guinea" }
+    { "GR" "Greece" }
+    { "GS" "South Georgia and the South Sandwich Islands" }
+    { "GT" "Guatemala" }
+    { "GU" "Guam" }
+    { "GW" "Guinea-Bissau" }
+    { "GY" "Guyana" }
+    { "HK" "Hong Kong" }
+    { "HM" "Heard Island and McDonald Islands" }
+    { "HN" "Honduras" }
+    { "HR" "Croatia" }
+    { "HT" "Haiti" }
+    { "HU" "Hungary" }
+    { "ID" "Indonesia" }
+    { "IE" "Ireland" }
+    { "IL" "Israel" }
+    { "IM" "Isle of Man" }
+    { "IN" "India" }
+    { "IO" "British Indian Ocean Territory" }
+    { "IQ" "Iraq" }
+    { "IR" "Iran (Islamic Republic of)" }
+    { "IS" "Iceland" }
+    { "IT" "Italy" }
+    { "JE" "Jersey" }
+    { "JM" "Jamaica" }
+    { "JO" "Jordan" }
+    { "JP" "Japan" }
+    { "KE" "Kenya" }
+    { "KG" "Kyrgyzstan" }
+    { "KH" "Cambodia" }
+    { "KI" "Kiribati" }
+    { "KM" "Comoros" }
+    { "KN" "Saint Kitts and Nevis" }
+    { "KP" "Korea (Democratic People's Republic of)" }
+    { "KR" "Korea, Republic of" }
+    { "KW" "Kuwait" }
+    { "KY" "Cayman Islands" }
+    { "KZ" "Kazakhstan" }
+    { "LA" "Lao People's Democratic Republic" }
+    { "LB" "Lebanon" }
+    { "LC" "Saint Lucia" }
+    { "LI" "Liechtenstein" }
+    { "LK" "Sri Lanka" }
+    { "LR" "Liberia" }
+    { "LS" "Lesotho" }
+    { "LT" "Lithuania" }
+    { "LU" "Luxembourg" }
+    { "LV" "Latvia" }
+    { "LY" "Libya" }
+    { "MA" "Morocco" }
+    { "MC" "Monaco" }
+    { "MD" "Moldova, Republic of" }
+    { "ME" "Montenegro" }
+    { "MF" "Saint Martin (French part)" }
+    { "MG" "Madagascar" }
+    { "MH" "Marshall Islands" }
+    { "MK" "North Macedonia" }
+    { "ML" "Mali" }
+    { "MM" "Myanmar" }
+    { "MN" "Mongolia" }
+    { "MO" "Macao" }
+    { "MP" "Northern Mariana Islands" }
+    { "MQ" "Martinique" }
+    { "MR" "Mauritania" }
+    { "MS" "Montserrat" }
+    { "MT" "Malta" }
+    { "MU" "Mauritius" }
+    { "MV" "Maldives" }
+    { "MW" "Malawi" }
+    { "MX" "Mexico" }
+    { "MY" "Malaysia" }
+    { "MZ" "Mozambique" }
+    { "NA" "Namibia" }
+    { "NC" "New Caledonia" }
+    { "NE" "Niger" }
+    { "NF" "Norfolk Island" }
+    { "NG" "Nigeria" }
+    { "NI" "Nicaragua" }
+    { "NL" "Netherlands" }
+    { "NO" "Norway" }
+    { "NP" "Nepal" }
+    { "NR" "Nauru" }
+    { "NU" "Niue" }
+    { "NZ" "New Zealand" }
+    { "OM" "Oman" }
+    { "PA" "Panama" }
+    { "PE" "Peru" }
+    { "PF" "French Polynesia" }
+    { "PG" "Papua New Guinea" }
+    { "PH" "Philippines" }
+    { "PK" "Pakistan" }
+    { "PL" "Poland" }
+    { "PM" "Saint Pierre and Miquelon" }
+    { "PN" "Pitcairn" }
+    { "PR" "Puerto Rico" }
+    { "PS" "Palestine, State of" }
+    { "PT" "Portugal" }
+    { "PW" "Palau" }
+    { "PY" "Paraguay" }
+    { "QA" "Qatar" }
+    { "RE" "Réunion" }
+    { "RO" "Romania" }
+    { "RS" "Serbia" }
+    { "RU" "Russian Federation" }
+    { "RW" "Rwanda" }
+    { "SA" "Saudi Arabia" }
+    { "SB" "Solomon Islands" }
+    { "SC" "Seychelles" }
+    { "SD" "Sudan" }
+    { "SE" "Sweden" }
+    { "SG" "Singapore" }
+    { "SH" "Saint Helena, Ascension and Tristan da Cunha" }
+    { "SI" "Slovenia" }
+    { "SJ" "Svalbard and Jan Mayen" }
+    { "SK" "Slovakia" }
+    { "SL" "Sierra Leone" }
+    { "SM" "San Marino" }
+    { "SN" "Senegal" }
+    { "SO" "Somalia" }
+    { "SR" "Suriname" }
+    { "SS" "South Sudan" }
+    { "ST" "Sao Tome and Principe" }
+    { "SV" "El Salvador" }
+    { "SX" "Sint Maarten (Dutch part)" }
+    { "SY" "Syrian Arab Republic" }
+    { "SZ" "Eswatini" }
+    { "TC" "Turks and Caicos Islands" }
+    { "TD" "Chad" }
+    { "TF" "French Southern Territories" }
+    { "TG" "Togo" }
+    { "TH" "Thailand" }
+    { "TJ" "Tajikistan" }
+    { "TK" "Tokelau" }
+    { "TL" "Timor-Leste" }
+    { "TM" "Turkmenistan" }
+    { "TN" "Tunisia" }
+    { "TO" "Tonga" }
+    { "TR" "Turkey" }
+    { "TT" "Trinidad and Tobago" }
+    { "TV" "Tuvalu" }
+    { "TW" "Taiwan, Province of China" }
+    { "TZ" "Tanzania, United Republic of" }
+    { "UA" "Ukraine" }
+    { "UG" "Uganda" }
+    { "UM" "United States Minor Outlying Islands" }
+    { "US" "United States of America" }
+    { "UY" "Uruguay" }
+    { "UZ" "Uzbekistan" }
+    { "VA" "Holy See" }
+    { "VC" "Saint Vincent and the Grenadines" }
+    { "VE" "Venezuela (Bolivarian Republic of)" }
+    { "VG" "Virgin Islands (British)" }
+    { "VI" "Virgin Islands (U.S.)" }
+    { "VN" "Viet Nam" }
+    { "VU" "Vanuatu" }
+    { "WF" "Wallis and Futuna" }
+    { "WS" "Samoa" }
+    { "YE" "Yemen" }
+    { "YT" "Mayotte" }
+    { "ZA" "South Africa" }
+    { "ZM" "Zambia" }
+    { "ZW" "Zimbabwe" }
+}
+
+CONSTANT: alpha-3 H{
+    { "ABW" "Aruba" }
+    { "AFG" "Afghanistan" }
+    { "AGO" "Angola" }
+    { "AIA" "Anguilla" }
+    { "ALA" "Åland Islands" }
+    { "ALB" "Albania" }
+    { "AND" "Andorra" }
+    { "ARE" "United Arab Emirates" }
+    { "ARG" "Argentina" }
+    { "ARM" "Armenia" }
+    { "ASM" "American Samoa" }
+    { "ATA" "Antarctica" }
+    { "ATF" "French Southern Territories" }
+    { "ATG" "Antigua and Barbuda" }
+    { "AUS" "Australia" }
+    { "AUT" "Austria" }
+    { "AZE" "Azerbaijan" }
+    { "BDI" "Burundi" }
+    { "BEL" "Belgium" }
+    { "BEN" "Benin" }
+    { "BES" "Bonaire, Sint Eustatius and Saba" }
+    { "BFA" "Burkina Faso" }
+    { "BGD" "Bangladesh" }
+    { "BGR" "Bulgaria" }
+    { "BHR" "Bahrain" }
+    { "BHS" "Bahamas" }
+    { "BIH" "Bosnia and Herzegovina" }
+    { "BLM" "Saint Barthélemy" }
+    { "BLR" "Belarus" }
+    { "BLZ" "Belize" }
+    { "BMU" "Bermuda" }
+    { "BOL" "Bolivia (Plurinational State of)" }
+    { "BRA" "Brazil" }
+    { "BRB" "Barbados" }
+    { "BRN" "Brunei Darussalam" }
+    { "BTN" "Bhutan" }
+    { "BVT" "Bouvet Island" }
+    { "BWA" "Botswana" }
+    { "CAF" "Central African Republic" }
+    { "CAN" "Canada" }
+    { "CCK" "Cocos (Keeling) Islands" }
+    { "CHE" "Switzerland" }
+    { "CHL" "Chile" }
+    { "CHN" "China" }
+    { "CIV" "Côte d'Ivoire" }
+    { "CMR" "Cameroon" }
+    { "COD" "Congo, Democratic Republic of the" }
+    { "COG" "Congo" }
+    { "COK" "Cook Islands" }
+    { "COL" "Colombia" }
+    { "COM" "Comoros" }
+    { "CPV" "Cabo Verde" }
+    { "CRI" "Costa Rica" }
+    { "CUB" "Cuba" }
+    { "CUW" "Curaçao" }
+    { "CXR" "Christmas Island" }
+    { "CYM" "Cayman Islands" }
+    { "CYP" "Cyprus" }
+    { "CZE" "Czechia" }
+    { "DEU" "Germany" }
+    { "DJI" "Djibouti" }
+    { "DMA" "Dominica" }
+    { "DNK" "Denmark" }
+    { "DOM" "Dominican Republic" }
+    { "DZA" "Algeria" }
+    { "ECU" "Ecuador" }
+    { "EGY" "Egypt" }
+    { "ERI" "Eritrea" }
+    { "ESH" "Western Sahara" }
+    { "ESP" "Spain" }
+    { "EST" "Estonia" }
+    { "ETH" "Ethiopia" }
+    { "FIN" "Finland" }
+    { "FJI" "Fiji" }
+    { "FLK" "Falkland Islands (Malvinas)" }
+    { "FRA" "France" }
+    { "FRO" "Faroe Islands" }
+    { "FSM" "Micronesia (Federated States of)" }
+    { "GAB" "Gabon" }
+    { "GBR" "United Kingdom of Great Britain and Northern Ireland" }
+    { "GEO" "Georgia" }
+    { "GGY" "Guernsey" }
+    { "GHA" "Ghana" }
+    { "GIB" "Gibraltar" }
+    { "GIN" "Guinea" }
+    { "GLP" "Guadeloupe" }
+    { "GMB" "Gambia" }
+    { "GNB" "Guinea-Bissau" }
+    { "GNQ" "Equatorial Guinea" }
+    { "GRC" "Greece" }
+    { "GRD" "Grenada" }
+    { "GRL" "Greenland" }
+    { "GTM" "Guatemala" }
+    { "GUF" "French Guiana" }
+    { "GUM" "Guam" }
+    { "GUY" "Guyana" }
+    { "HKG" "Hong Kong" }
+    { "HMD" "Heard Island and McDonald Islands" }
+    { "HND" "Honduras" }
+    { "HRV" "Croatia" }
+    { "HTI" "Haiti" }
+    { "HUN" "Hungary" }
+    { "IDN" "Indonesia" }
+    { "IMN" "Isle of Man" }
+    { "IND" "India" }
+    { "IOT" "British Indian Ocean Territory" }
+    { "IRL" "Ireland" }
+    { "IRN" "Iran (Islamic Republic of)" }
+    { "IRQ" "Iraq" }
+    { "ISL" "Iceland" }
+    { "ISR" "Israel" }
+    { "ITA" "Italy" }
+    { "JAM" "Jamaica" }
+    { "JEY" "Jersey" }
+    { "JOR" "Jordan" }
+    { "JPN" "Japan" }
+    { "KAZ" "Kazakhstan" }
+    { "KEN" "Kenya" }
+    { "KGZ" "Kyrgyzstan" }
+    { "KHM" "Cambodia" }
+    { "KIR" "Kiribati" }
+    { "KNA" "Saint Kitts and Nevis" }
+    { "KOR" "Korea, Republic of" }
+    { "KWT" "Kuwait" }
+    { "LAO" "Lao People's Democratic Republic" }
+    { "LBN" "Lebanon" }
+    { "LBR" "Liberia" }
+    { "LBY" "Libya" }
+    { "LCA" "Saint Lucia" }
+    { "LIE" "Liechtenstein" }
+    { "LKA" "Sri Lanka" }
+    { "LSO" "Lesotho" }
+    { "LTU" "Lithuania" }
+    { "LUX" "Luxembourg" }
+    { "LVA" "Latvia" }
+    { "MAC" "Macao" }
+    { "MAF" "Saint Martin (French part)" }
+    { "MAR" "Morocco" }
+    { "MCO" "Monaco" }
+    { "MDA" "Moldova, Republic of" }
+    { "MDG" "Madagascar" }
+    { "MDV" "Maldives" }
+    { "MEX" "Mexico" }
+    { "MHL" "Marshall Islands" }
+    { "MKD" "North Macedonia" }
+    { "MLI" "Mali" }
+    { "MLT" "Malta" }
+    { "MMR" "Myanmar" }
+    { "MNE" "Montenegro" }
+    { "MNG" "Mongolia" }
+    { "MNP" "Northern Mariana Islands" }
+    { "MOZ" "Mozambique" }
+    { "MRT" "Mauritania" }
+    { "MSR" "Montserrat" }
+    { "MTQ" "Martinique" }
+    { "MUS" "Mauritius" }
+    { "MWI" "Malawi" }
+    { "MYS" "Malaysia" }
+    { "MYT" "Mayotte" }
+    { "NAM" "Namibia" }
+    { "NCL" "New Caledonia" }
+    { "NER" "Niger" }
+    { "NFK" "Norfolk Island" }
+    { "NGA" "Nigeria" }
+    { "NIC" "Nicaragua" }
+    { "NIU" "Niue" }
+    { "NLD" "Netherlands" }
+    { "NOR" "Norway" }
+    { "NPL" "Nepal" }
+    { "NRU" "Nauru" }
+    { "NZL" "New Zealand" }
+    { "OMN" "Oman" }
+    { "PAK" "Pakistan" }
+    { "PAN" "Panama" }
+    { "PCN" "Pitcairn" }
+    { "PER" "Peru" }
+    { "PHL" "Philippines" }
+    { "PLW" "Palau" }
+    { "PNG" "Papua New Guinea" }
+    { "POL" "Poland" }
+    { "PRI" "Puerto Rico" }
+    { "PRK" "Korea (Democratic People's Republic of)" }
+    { "PRT" "Portugal" }
+    { "PRY" "Paraguay" }
+    { "PSE" "Palestine, State of" }
+    { "PYF" "French Polynesia" }
+    { "QAT" "Qatar" }
+    { "REU" "Réunion" }
+    { "ROU" "Romania" }
+    { "RUS" "Russian Federation" }
+    { "RWA" "Rwanda" }
+    { "SAU" "Saudi Arabia" }
+    { "SDN" "Sudan" }
+    { "SEN" "Senegal" }
+    { "SGP" "Singapore" }
+    { "SGS" "South Georgia and the South Sandwich Islands" }
+    { "SHN" "Saint Helena, Ascension and Tristan da Cunha" }
+    { "SJM" "Svalbard and Jan Mayen" }
+    { "SLB" "Solomon Islands" }
+    { "SLE" "Sierra Leone" }
+    { "SLV" "El Salvador" }
+    { "SMR" "San Marino" }
+    { "SOM" "Somalia" }
+    { "SPM" "Saint Pierre and Miquelon" }
+    { "SRB" "Serbia" }
+    { "SSD" "South Sudan" }
+    { "STP" "Sao Tome and Principe" }
+    { "SUR" "Suriname" }
+    { "SVK" "Slovakia" }
+    { "SVN" "Slovenia" }
+    { "SWE" "Sweden" }
+    { "SWZ" "Eswatini" }
+    { "SXM" "Sint Maarten (Dutch part)" }
+    { "SYC" "Seychelles" }
+    { "SYR" "Syrian Arab Republic" }
+    { "TCA" "Turks and Caicos Islands" }
+    { "TCD" "Chad" }
+    { "TGO" "Togo" }
+    { "THA" "Thailand" }
+    { "TJK" "Tajikistan" }
+    { "TKL" "Tokelau" }
+    { "TKM" "Turkmenistan" }
+    { "TLS" "Timor-Leste" }
+    { "TON" "Tonga" }
+    { "TTO" "Trinidad and Tobago" }
+    { "TUN" "Tunisia" }
+    { "TUR" "Turkey" }
+    { "TUV" "Tuvalu" }
+    { "TWN" "Taiwan, Province of China" }
+    { "TZA" "Tanzania, United Republic of" }
+    { "UGA" "Uganda" }
+    { "UKR" "Ukraine" }
+    { "UMI" "United States Minor Outlying Islands" }
+    { "URY" "Uruguay" }
+    { "USA" "United States of America" }
+    { "UZB" "Uzbekistan" }
+    { "VAT" "Holy See" }
+    { "VCT" "Saint Vincent and the Grenadines" }
+    { "VEN" "Venezuela (Bolivarian Republic of)" }
+    { "VGB" "Virgin Islands (British)" }
+    { "VIR" "Virgin Islands (U.S.)" }
+    { "VNM" "Viet Nam" }
+    { "VUT" "Vanuatu" }
+    { "WLF" "Wallis and Futuna" }
+    { "WSM" "Samoa" }
+    { "YEM" "Yemen" }
+    { "ZAF" "South Africa" }
+    { "ZMB" "Zambia" }
+    { "ZWE" "Zimbabwe" }
+}
diff --git a/extra/countries/summary.txt b/extra/countries/summary.txt
new file mode 100644 (file)
index 0000000..b2e72a1
--- /dev/null
@@ -0,0 +1 @@
+Country-specific codes including ISO 3166-1