{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
module Hedgehog.Corpus (
agile
, animals
, boats
, cats
, colours
, cooking
, fruits
, glass
, metasyntactic
, muppets
, nfl
, nhl
, simpsons
, southpark
, vegetables
, viruses
, waters
, weather
) where
import Data.String (IsString(..))
cooking :: IsString a => [a]
cooking :: [a]
cooking = [
a
"salted"
, a
"stewed"
, a
"diced"
, a
"filleted"
, a
"sauteed"
]
muppets :: IsString a => [a]
muppets :: [a]
muppets = [
a
"kermit"
, a
"gonzo"
, a
"fozzy"
, a
"chef"
, a
"statler"
, a
"waldorf"
, a
"beaker"
, a
"animal"
]
southpark :: IsString a => [a]
southpark :: [a]
southpark = [
a
"kyle"
, a
"stan"
, a
"cartman"
, a
"timmy"
, a
"token"
, a
"chef"
, a
"garrison"
]
simpsons :: IsString a => [a]
simpsons :: [a]
simpsons = [
a
"homer"
, a
"marge"
, a
"maggie"
, a
"lisa"
, a
"bart"
, a
"flanders"
, a
"moe"
, a
"barney"
]
viruses :: IsString a => [a]
viruses :: [a]
viruses = [
a
"rotavirus"
, a
"smallpox"
, a
"norovirus"
, a
"chickenpox"
, a
"camelpox"
, a
"dengue"
, a
"echovirus"
, a
"equine morbillivirus"
, a
"gou virus"
, a
"measles"
, a
"monkeypox"
]
colours :: IsString a => [a]
colours :: [a]
colours = [
a
"red"
, a
"green"
, a
"blue"
, a
"yellow"
, a
"black"
, a
"grey"
, a
"purple"
, a
"orange"
, a
"pink"
]
weather :: IsString a => [a]
weather :: [a]
weather = [
a
"dry"
, a
"raining"
, a
"hot"
, a
"humid"
, a
"snowing"
, a
"fresh"
, a
"windy"
, a
"freezing"
]
waters :: IsString a => [a]
waters :: [a]
waters = [
a
"basin"
, a
"bay"
, a
"billabong"
, a
"canal"
, a
"channel"
, a
"creek"
, a
"estuary"
, a
"fjord"
, a
"harbour"
, a
"lake"
, a
"loch"
, a
"marsh"
, a
"ocean"
, a
"pond"
, a
"puddle"
, a
"reservoir"
, a
"river"
, a
"sea"
, a
"slough"
, a
"sound"
, a
"spring"
, a
"stream"
, a
"swamp"
, a
"wetland"
]
boats :: IsString a => [a]
boats :: [a]
boats = [
a
"barge"
, a
"battleship"
, a
"canoe"
, a
"catamaran"
, a
"dinghy"
, a
"ferry"
, a
"gondola"
, a
"jetski"
, a
"kayak"
, a
"longship"
, a
"motorboat"
, a
"pontoon"
, a
"powerboat"
, a
"rowboat"
, a
"ship"
, a
"steamboat"
, a
"tanker"
, a
"trawler"
, a
"tugboat"
, a
"yacht"
]
animals :: IsString a => [a]
animals :: [a]
animals = [
a
"alligator"
, a
"ant"
, a
"bear"
, a
"bee"
, a
"bird"
, a
"camel"
, a
"cat"
, a
"cheetah"
, a
"chicken"
, a
"chimpanzee"
, a
"cow"
, a
"crocodile"
, a
"deer"
, a
"dog"
, a
"dolphin"
, a
"duck"
, a
"eagle"
, a
"elephant"
, a
"fish"
, a
"fly"
, a
"fox"
, a
"frog"
, a
"giraffe"
, a
"goat"
, a
"goldfish"
, a
"hamster"
, a
"hippopotamus"
, a
"horse"
, a
"kangaroo"
, a
"kitten"
, a
"lion"
, a
"lobster"
, a
"monkey"
, a
"octopus"
, a
"owl"
, a
"panda"
, a
"pig"
, a
"puppy"
, a
"rabbit"
, a
"rat"
, a
"scorpion"
, a
"seal"
, a
"shark"
, a
"sheep"
, a
"snail"
, a
"snake"
, a
"spider"
, a
"squirrel"
, a
"tiger"
, a
"turtle"
, a
"wolf"
, a
"zebra"
]
vegetables :: IsString a => [a]
vegetables :: [a]
vegetables = [
a
"asparagus"
, a
"beans"
, a
"broccoli"
, a
"cabbage"
, a
"carrot"
, a
"celery"
, a
"corn"
, a
"cucumber"
, a
"eggplant"
, a
"green pepper"
, a
"lettuce"
, a
"onion"
, a
"peas"
, a
"potato"
, a
"pumpkin"
, a
"radish"
, a
"spinach"
, a
"sweet potato"
, a
"tomato"
, a
"turnip"
]
fruits :: IsString a => [a]
fruits :: [a]
fruits = [
a
"apple"
, a
"banana"
, a
"cherry"
, a
"grapefruit"
, a
"grapes"
, a
"lemon"
, a
"lime"
, a
"melon"
, a
"orange"
, a
"peach"
, a
"pear"
, a
"persimmon"
, a
"pineapple"
, a
"plum"
, a
"strawberry"
, a
"tangerine"
, a
"tomato"
, a
"watermelon"
]
cats :: IsString a => [a]
cats :: [a]
cats = [
a
"american curl"
, a
"american shorthair"
, a
"angora"
, a
"british shorthair"
, a
"bobtail"
, a
"exotic shorthair"
, a
"himalayan"
, a
"maine coon"
, a
"munchkin"
, a
"norwegian forest"
, a
"persian"
, a
"ragamuffin"
, a
"ragdoll"
, a
"russian blue"
, a
"scottish fold"
, a
"siamese"
, a
"siberian"
, a
"tabby"
]
nhl :: IsString a => [a]
nhl :: [a]
nhl = [
a
"Anaheim Ducks"
, a
"Arizona Coyotes"
, a
"Boston Bruins"
, a
"Buffalo Sabres"
, a
"Calgary Flames"
, a
"Carolina Hurricanes"
, a
"Chicago Blackhawks"
, a
"Colorado Avalanche"
, a
"Columbus Blue Jackets"
, a
"Dallas Stars"
, a
"Detroit Red Wings"
, a
"Edmonton Oilers"
, a
"Florida Panthers"
, a
"Los Angeles Kings"
, a
"Minnesota Wild"
, a
"Montréal Canadiens"
, a
"Nashville Predators"
, a
"New Jersey Devils"
, a
"New York Islanders"
, a
"New York Rangers"
, a
"Ottawa Senators"
, a
"Philadelphia Flyers"
, a
"Pittsburgh Penguins"
, a
"San Jose Sharks"
, a
"St. Louis Blues"
, a
"Tampa Bay Lightning"
, a
"Toronto Maple Leafs"
, a
"Vancouver Canucks"
, a
"Vegas Golden Knights"
, a
"Washington Capitals"
, a
"Winnipeg Jets"
]
nfl :: IsString a => [a]
nfl :: [a]
nfl = [
a
"Arizona Cardinals"
, a
"Atlanta Falcons"
, a
"Baltimore Ravens"
, a
"Buffalo Bills"
, a
"Carolina Panthers"
, a
"Chicago Bears"
, a
"Cincinnati Bengals"
, a
"Cleveland Browns"
, a
"Dallas Cowboys"
, a
"Denver Broncos"
, a
"Detroit Lions"
, a
"Green Bay Packers"
, a
"Houston Texans"
, a
"Indianapolis Colts"
, a
"Jacksonville Jaguars"
, a
"Kansas City Chiefs"
, a
"Los Angeles Chargers"
, a
"Los Angeles Rams"
, a
"Miami Dolphins"
, a
"Minnesota Vikings"
, a
"New England Patriots"
, a
"New Orleans Saints"
, a
"New York Giants"
, a
"New York Jets"
, a
"Oakland Raiders"
, a
"Philadelphia Eagles"
, a
"Pittsburgh Steelers"
, a
"San Francisco 49ers"
, a
"Seattle Seahawks"
, a
"Tampa Bay Buccaneers"
, a
"Tennessee Titans"
, a
"Washington Redskins"
]
agile :: IsString a => [a]
agile :: [a]
agile = [
a
"agile"
, a
"backlog"
, a
"burn-down chart"
, a
"decisioning"
, a
"epic"
, a
"extreme programming"
, a
"governance"
, a
"information radiator"
, a
"kanban"
, a
"lean"
, a
"pair programming"
, a
"planning poker"
, a
"product owner"
, a
"retrospective"
, a
"scrum"
, a
"scrum master"
, a
"spike"
, a
"sprint"
, a
"standup"
, a
"story points"
, a
"test driven"
, a
"user story"
, a
"velocity"
, a
"vertical slice"
]
metasyntactic :: IsString a => [a]
metasyntactic :: [a]
metasyntactic = [
a
"foo"
, a
"bar"
, a
"baz"
, a
"qux"
, a
"quux"
, a
"quuz"
, a
"corge"
, a
"grault"
, a
"garply"
, a
"waldo"
, a
"fred"
, a
"plugh"
, a
"xyzzy"
, a
"thud"
]
glass :: IsString a => [a]
glass :: [a]
glass = [
a
"काचं शक्नोम्यत्तुम् । नोपहिनस्ति माम् ॥"
, a
"kācaṃ śaknomyattum; nopahinasti mām."
, a
"ὕαλον ϕαγεῖν δύναμαι· τοῦτο οὔ με βλάπτει."
, a
"Μπορώ να φάω σπασμένα γυαλιά χωρίς να πάθω τίποτα."
, a
"Μπορῶ νὰ φάω σπασμένα γυαλιὰ χωρὶς νὰ πάθω τίποτα. "
, a
"Vitrum edere possum; mihi non nocet."
, a
"Je puis mangier del voirre. Ne me nuit."
, a
"Je peux manger du verre, ça ne me fait pas mal."
, a
"Pòdi manjar de veire, me nafrariá pas."
, a
"J'peux manger d'la vitre, ça m'fa pas mal."
, a
"Dji pou magnî do vêre, çoula m' freut nén må. "
, a
"Ch'peux mingi du verre, cha m'foé mie n'ma. "
, a
"Mwen kap manje vè, li pa blese'm."
, a
"Kristala jan dezaket, ez dit minik ematen."
, a
"Puc menjar vidre, que no em fa mal."
, a
"Puedo comer vidrio, no me hace daño."
, a
"Puedo minchar beire, no me'n fa mal . "
, a
"Eu podo xantar cristais e non cortarme."
, a
"Posso comer vidro, não me faz mal."
, a
"Posso comer vidro, não me machuca."
, a
"M' podê cumê vidru, ca ta maguâ-m '."
, a
"Ami por kome glas anto e no ta hasimi daño."
, a
"Posso mangiare il vetro e non mi fa male."
, a
"Sôn bôn de magnà el véder, el me fa minga mal."
, a
"Me posso magna' er vetro, e nun me fa male."
, a
"M' pozz magna' o'vetr, e nun m' fa mal."
, a
"Mi posso magnare el vetro, no'l me fa mae."
, a
"Pòsso mangiâ o veddro e o no me fà mâ."
, a
"Puotsu mangiari u vitru, nun mi fa mali. "
, a
"Jau sai mangiar vaider, senza che quai fa donn a mai. "
, a
"Pot să mănânc sticlă și ea nu mă rănește."
, a
"Mi povas manĝi vitron, ĝi ne damaĝas min. "
, a
"Mý a yl dybry gwéder hag éf ny wra ow ankenya."
, a
"Dw i'n gallu bwyta gwydr, 'dyw e ddim yn gwneud dolur i mi."
, a
"Foddym gee glonney agh cha jean eh gortaghey mee."
, a
"᚛᚛ᚉᚑᚅᚔᚉᚉᚔᚋ ᚔᚈᚔ ᚍᚂᚐᚅᚑ ᚅᚔᚋᚌᚓᚅᚐ᚜"
, a
"Con·iccim ithi nglano. Ním·géna."
, a
"Is féidir liom gloinne a ithe. Ní dhéanann sí dochar ar bith dom."
, a
"Ithim-s a gloine agus ní miste damh é."
, a
"S urrainn dhomh gloinne ithe; cha ghoirtich i mi."
, a
"ᛁᚳ᛫ᛗᚨᚷ᛫ᚷᛚᚨᛋ᛫ᛖᚩᛏᚪᚾ᛫ᚩᚾᛞ᛫ᚻᛁᛏ᛫ᚾᛖ᛫ᚻᛖᚪᚱᛗᛁᚪᚧ᛫ᛗᛖ᛬"
, a
"Ic mæg glæs eotan ond hit ne hearmiað me."
, a
"Ich canne glas eten and hit hirtiþ me nouȝt."
, a
"I can eat glass and it doesn't hurt me."
, a
"[aɪ kæn iːt glɑːs ænd ɪt dɐz nɒt hɜːt miː]"
, a
"⠊⠀⠉⠁⠝⠀⠑⠁⠞⠀⠛⠇⠁⠎⠎⠀⠁⠝⠙⠀⠊⠞⠀⠙⠕⠑⠎⠝⠞⠀⠓⠥⠗⠞⠀⠍⠑"
, a
"Mi kian niam glas han i neba hot mi."
, a
"Ah can eat gless, it disnae hurt us. "
, a
"𐌼𐌰𐌲 𐌲𐌻𐌴𐍃 𐌹̈𐍄𐌰𐌽, 𐌽𐌹 𐌼𐌹𐍃 𐍅𐌿 𐌽𐌳𐌰𐌽 𐌱𐍂𐌹𐌲𐌲𐌹𐌸."
, a
"ᛖᚴ ᚷᛖᛏ ᛖᛏᛁ ᚧ ᚷᛚᛖᚱ ᛘᚾ ᚦᛖᛋᛋ ᚨᚧ ᚡᛖ ᚱᚧᚨ ᛋᚨᚱ"
, a
"Ek get etið gler án þess að verða sár."
, a
"Eg kan eta glas utan å skada meg."
, a
"Jeg kan spise glass uten å skade meg."
, a
"Eg kann eta glas, skaðaleysur."
, a
"Ég get etið gler án þess að meiða mig."
, a
"Jag kan äta glas utan att skada mig."
, a
"Jeg kan spise glas, det gør ikke ondt på mig."
, a
"Æ ka æe glass uhen at det go mæ naue."
, a
"Ik kin glês ite, it docht me net sear."
, a
"Ik kan glas eten, het doet mij geen kwaad."
, a
"Iech ken glaas èèse, mer 't deet miech jing pieng."
, a
"Ek kan glas eet, maar dit doen my nie skade nie."
, a
"Ech kan Glas iessen, daat deet mir nët wei."
, a
"Ich kann Glas essen, ohne mir zu schaden."
, a
"Ich kann Glas verkasematuckeln, ohne dattet mich wat jucken tut."
, a
"Isch kann Jlaas kimmeln, uuhne datt mich datt weh dääd."
, a
"Ich koann Gloos assn und doas dudd merr ni wii."
, a
"Iech konn glaasch voschbachteln ohne dass es mir ebbs daun doun dud."
, a
"'sch kann Glos essn, ohne dass'sch mer wehtue."
, a
"Isch konn Glass fresse ohne dasses mer ebbes ausmache dud."
, a
"I kå Glas frässa, ond des macht mr nix!"
, a
"I ka glas eassa, ohne dass mar weh tuat."
, a
"I koh Glos esa, und es duard ma ned wei."
, a
"I kaun Gloos essen, es tuat ma ned weh."
, a
"Ich chan Glaas ässe, das schadt mir nöd."
, a
"Ech cha Glâs ässe, das schadt mer ned. "
, a
"Meg tudom enni az üveget, nem lesz tőle bajom."
, a
"Voin syödä lasia, se ei vahingoita minua."
, a
"Sáhtán borrat lása, dat ii leat bávččas."
, a
"Мон ярсан суликадо, ды зыян эйстэнзэ а ули."
, a
"Mie voin syvvä lasie ta minla ei ole kipie."
, a
"Minä voin syvvä st'oklua dai minule ei ole kibie. "
, a
"Ma võin klaasi süüa, see ei tee mulle midagi."
, a
"Es varu ēst stiklu, tas man nekaitē."
, a
"Aš galiu valgyti stiklą ir jis manęs nežeidžia "
, a
"Mohu jíst sklo, neublíží mi."
, a
"Môžem jesť sklo. Nezraní ma."
, a
"Mogę jeść szkło i mi nie szkodzi."
, a
"Lahko jem steklo, ne da bi mi škodovalo."
, a
"Ja mogu jesti staklo, i to mi ne šteti."
, a
"Ја могу јести стакло, и то ми не штети."
, a
"Можам да јадам стакло, а не ме штета."
, a
"Я могу есть стекло, оно мне не вредит."
, a
"Я магу есці шкло, яно мне не шкодзіць."
, a
"Ja mahu jeści škło, jano mne ne škodzić."
, a
"Я можу їсти скло, і воно мені не зашкодить."
, a
"Мога да ям стъкло, то не ми вреди."
, a
"მინას ვჭამ და არა მტკივა."
, a
"Կրնամ ապակի ուտել և ինծի անհանգիստ չըներ։"
, a
"Unë mund të ha qelq dhe nuk më gjen gjë."
, a
"Cam yiyebilirim, bana zararı dokunmaz."
, a
"جام ييه بلورم بڭا ضررى طوقونمز"
, a
"Men shisha yeyishim mumkin, ammo u menga zarar keltirmaydi."
, a
"Мен шиша ейишим мумкин, аммо у менга зарар келтирмайди."
, a
"আমি কাঁচ খেতে পারি, তাতে আমার কোনো ক্ষতি হয় না।"
, a
"मी काच खाऊ शकतो, मला ते दुखत नाही."
, a
"ನನಗೆ ಹಾನಿ ಆಗದೆ, ನಾನು ಗಜನ್ನು ತಿನಬಹುದು"
, a
"मैं काँच खा सकता हूँ और मुझे उससे कोई चोट नहीं पहुंचती."
, a
"എനിക്ക് ഗ്ലാസ് തിന്നാം. അതെന്നെ വേദനിപ്പിക്കില്ല."
, a
"நான் கண்ணாடி சாப்பிடுவேன், அதனால் எனக்கு ஒரு கேடும் வராது."
, a
"నేను గాజు తినగలను మరియు అలా చేసినా నాకు ఏమి ఇబ్బంది లేదు"
, a
"මට වීදුරු කෑමට හැකියි. එයින් මට කිසි හානියක් සිදු නොවේ."
, a
"میں کانچ کھا سکتا ہوں اور مجھے تکلیف نہیں ہوتی ۔"
, a
"زه شيشه خوړلې شم، هغه ما نه خوږوي"
, a
".من می توانم بدونِ احساس درد شيشه بخورم"
, a
"أنا قادر على أكل الزجاج و هذا لا يؤلمني. "
, a
"Nista' niekol il-ħ ġieġ u ma jagħmilli xejn."
, a
"אני יכול לאכול זכוכית וזה לא מזיק לי."
, a
"איך קען עסן גלאָז און עס טוט מיר נישט װײ. "
, a
"Metumi awe tumpan, ɜnyɜ me hwee."
, a
"Inā iya taunar gilāshi kuma in gamā lāfiyā."
, a
"إِنا إِىَ تَونَر غِلَاشِ كُمَ إِن غَمَا لَافِىَا"
, a
"Mo lè je̩ dígí, kò ní pa mí lára."
, a
"Nakokí kolíya biténi bya milungi, ekosála ngáí mabé tɛ́."
, a
"Naweza kula bilauri na sikunyui."
, a
"Saya boleh makan kaca dan ia tidak mencederakan saya."
, a
"Kaya kong kumain nang bubog at hindi ako masaktan."
, a
"Siña yo' chumocho krestat, ti ha na'lalamen yo'."
, a
"Au rawa ni kana iloilo, ia au sega ni vakacacani kina."
, a
"Aku isa mangan beling tanpa lara."
, a
"က္ယ္ဝန္တော္၊က္ယ္ဝန္မ မ္ယက္စားနုိင္သည္။ ၎က္ရောင္ ထိခုိက္မ္ဟု မရ္ဟိပာ။"
, a
"ကျွန်တော် ကျွန်မ မှန်စားနိုင်တယ်။ ၎င်းကြောင့် ထိခိုက်မှုမရှိပါ။"
, a
"Tôi có thể ăn thủy tinh mà không hại gì."
, a
"些 𣎏 世 咹 水 晶 𦓡 空 𣎏 害 咦"
, a
"ខ្ញុំអាចញុំកញ្ចក់បាន ដោយគ្មានបញ្ហារ"
, a
"ຂອ້ຍກິນແກ້ວໄດ້ໂດຍທີ່ມັນບໍ່ໄດ້ເຮັດໃຫ້ຂອ້ຍເຈັບ."
, a
"ฉันกินกระจกได้ แต่มันไม่ทำให้ฉันเจ็บ"
, a
"Би шил идэй чадна, надад хортой биш"
, a
"ᠪᠢ ᠰᠢᠯᠢ ᠢᠳᠡᠶᠦ ᠴᠢᠳᠠᠨᠠ ᠂ ᠨᠠᠳᠤᠷ ᠬᠣᠤᠷᠠᠳᠠᠢ ᠪᠢᠰᠢ "
, a
"म काँच खान सक्छू र मलाई केहि नी हुन्न् ।"
, a
"ཤེལ་སྒོ་ཟ་ནས་ང་ན་གི་མ་རེད།"
, a
"我能吞下玻璃而不伤身体。"
, a
"我能吞下玻璃而不傷身體。"
, a
"Góa ē-t àng chia̍h po-lê, mā bē tio̍h-siong."
, a
"私はガラスを食べられます。それは私を傷つけません。"
, a
"나는 유리를 먹을 수 있어요. 그래도 아프지 않아요"
, a
"Mi save kakae glas, hemi no save katem mi."
, a
"Hiki iaʻu ke ʻai i ke aniani; ʻaʻole nō lā au e ʻeha."
, a
"E koʻana e kai i te karahi, mea ʻā, ʻaʻe hauhau."
, a
"ᐊᓕᒍᖅ ᓂᕆᔭᕌᖓᒃᑯ ᓱᕋᙱᑦᑐᓐᓇᖅᑐᖓ"
, a
"Naika məkmək kakshət labutay, pi weyk ukuk munk-s ik nay."
, a
"Tsésǫʼ yishą́ągo bííníshghah dóó doo shił neezgai da. "
, a
"mi kakne le nu citka le blaci .iku'i le se go'i na xrani mi"
, a
"Ljœr ye caudran créneþ ý jor cẃran."
]