(doseq [planet (take 1000 (filter #(if-not (or (< (count %) 4) (> (count %) 12) (re-find #"[aeiou]{3}" %) (re-find #"h[tcsz]h" %) (re-find #"[ui][wy]" %)) %) (repeatedly (fn[] (clojure.string/capitalize (apply str(take(* 3(+ 1(rand-int 3))) (interleave (repeatedly #(if(<(rand-int 3)2) (apply str(concat(rand-nth[[(rand-nth["b""d""g""c""f""t""k"])(rand-nth["r"""""""])] [(rand-nth["s""l""th""ch""sh""y""w""qu""z""v""m""n""t"])]]))) "")) (repeatedly #(rand-nth["a""o""e""i""u""a""o""e""i""eu""oa""io""ei""ai""ia""ia"])) (repeatedly #(if(<(rand-int 5)2) (rand-nth["s""p""t""n""n""m""b""g""d""rp""rm""rn""lm""zh""rt""sp""z""st""h""ch""x"]) "")))))) ))))] (println planet))
Standard input is empty
Teidi Theuzheg Idecu Chodkaitbria Eeirpcen Euzhgasp Uxoarngai Truschashe Thonquezio Eipneithi Thoocrai Moatiaze Thiartnialme Chiatavet Nupia Feuzh Zaifothoa Afoi Izhfridio Nichkeust Iarm Ankreumoa Yiase Cias Krai Beusp Uona Faivorpap Caitosp Mourmni Neyabqua Iazhiahan Iolmoa Batroli Shekeih Uchagoah Iagiozh Drio Thirm Iaazh Niathoalia Criarndadfit Iala Eurn Aizthache Sigisu Chia Grurm Gomi Biamaorm Yorn Kabriartkig Thacioch Iaswecra Ormlorp Sitalmed Netiogais Yeubreu Vioch Shia Ioshoalio Yoyen Geichvoaba Grog Viart Aiquarpto Boosa Thib Liayia Sherno Inci Eshio Oartuz Teebest Shocialmviag Diadro Ocroe Vugeuqua Thip Inadat Groco Tiaxis Dadia Zoshaisp Nedtheu Kreit Thia Ugchaistrern Kozhoaneus Deidrotaim Quozh Vaimiashed Miarmyasp Meug Thenu Intizh Wusheu Yodistain Ciartumfom Lebazhiox Iarnbortthia Thotia Terpcei Nuliadre Aigruncriot Chisp Iohio Greekria Tiakrip Iniostsha Fiosp Fiatha Taiti Iogix Bremoakia Setozhwa Faixuzh Gextrialm Koadio Figoaxiam Yeumalad Theirtce Ertmiacaizh Yarmtairm Oyeib Igarmoa Doceiz Diafup Iiazh Aigfaib Thudepwu Udkreu Iteosp Beifraisp Artiop Euzhlolmta Sheu Iofiaz Kinuirm Drirmai Drei Krux Boani Chiostine Tiartniptrei Iodirm Neustqua Oanwiarmgaig Ocod Ostya Uchweeg Teist Siozust Eyoaleu Iafeila Keibrio Adoskroa Zeuliazh Zosheu Foconlo Miondeirn Triage Chedvei Gugep Astaiz Kriati Quixdaa Shiofro Shiadai Omezdort Intuzh Geusp Eilm Thein Crolm Tiodebe Iasuse Eiart Edciatio Umtu Iohbiavozh Yiaquobeud Chaichofilm Zogrod Egfrao Iamyiozhneu Groacavo Crarnimei Difechmich Crelmcialoat Yabio Seist Iddeirp Vaishurpye Igai Fita Treipyebe Timaman Lerm Oagaistboap Biagoax Oawa Feinqua Thiakaixqui Geucep Miosp Simtrazh Ioesp Froyo Azeichio Eiskresp Iqui Acegirm Echoavi Geispdreihku Viacad Carmobia Bezhdokio Eistcheuna Drashe Tiania Cirnkoa Iohe Dreirt Aifrulm Airm Wiabveurm Cioboz Chainiolmort Braimudoa Sirmsoyi Iaxdo Trio Oadoased Badarn Thaizho Tiadai Ohbria Dist Izsheuspo Anarp Brirtbrinu Thiot Sotoada Ziowe Vanshia Diarp Teulm Sogete Ogreu Gerna Nazhaca Liangroa Estip Eunboa Almyoaz Ficriodeu Eutoti Foachei Liashia Tiornfeufu Foach Segqua Vetucig Weitolmost Iazh Sidtigce Tormniawo Siadbed Yaposhurm Dichafurp Doakio Ospu Theirp Arpciospfros Mibiatem Frei Thobriano Iaspnequern Fena Tecra Urmfodki Thaslesp Bomot Ialmoancre Shepquo Beshumian Iteu Kateichgusp Groa Tachfiabaisp Idcheukex Aichicarp Ziarmkrazh Fiatape Egrilmzon Fairn Shiafeb Dreb Uchiadri Diort Echwangelm Iancia Getoalmaich Brilmdi Okian Fecobyai Thahiadia Creti Kugrit Frachinu Leirnodwio Uxkru Thochairn Onfiawern Labteshan Eurpwoa Cria Daiz Miarp Giap Iotna Quadihfo Trestbialo Teisp Chiashoa Choche Drasteyart Ciadi Tugafei Gathoas Chuche Dicho Gairn Iakubio Thei Seurm Shenehtu Kafoa Urpteu Wusho Fiodo Ichfi Viosption Fadfai Galizdiast Iaih Axcia Ieuzasp Koshin Thiach Triacioyesp Iatio Treutha Brai Gagbod Thescri Oatrei Naih Iotho Shathe Kulogarp Eezei Euzbiasco Armoazhio Yiolmgeu Buch Boyio Okeca Yeibme Brewortio Godio Kiartfeu Eita Thirtai Chob Driothosai Leuch Troaxeulio Feid Zeun Drae Bipem Ainya Loaplet Sheinirn Thei Biortmap Vuchmiadyon Iata Mogiog Zudeusha Takiat Wethian Aiayio Tigi Trithoarmteu Caufo Breweu Shop Kaih Gilm Keuch Choubo Tiasptex Gube Zezato Asweo Wonechai Noafa Dreukia Diad Thiacoa Ifia Iadsoa Akiosno Airt Feuhteun Vacrach Opdreurmthob Tideceu Liaboatthia Liatiafriarm Kanfrio Feteu Vulochialm Thepi Misedyo Aiesp Ilialmgro Thitist Gerpshia Echueb Freix Foazhtiad Girn Esholmix Vayaicho Ohdotia Cenfai Aibria Ezimeh Cheigaitho Tria Bimia Falm Bishesp Sheu Miosshud Iaquo Iarnoge Kicre Tirt Lasbriayih Yimvikrast Dairpfru Freirn Zazta Shekre Groathei Cheptraap Diavech Dart Triospfancia Wianliaze Wuncilm Ciasp Miztoast Feulm Achiarn Tach Astiki Moazoa Eubre Thiaqui Aitco Fiafreu Quezhcrio Droxe Ufio Ialm Necoh Narma Thinwerm Shaxmio Oanbeipse Ciazhiozhfob Krorteern Agia Neurtgrainez Fumeis Yeucoch Kiasedriazh Thirnei Oalmkeuvu Kadresot Izhcarmgioh Urtoathe Shei Tiasptia Lart Cioki Wintruch Cospeum Lidu Dion Iacoa Brozchai Oaoh Miazmothoa Zebriafog Thaimdri Tothonu Greingich Kipbainshem Diabep Shobeulia Thiu Iosp Quociagoa Iasiat Moarnu Atyis Kroarttiono Kiostufeurm Ezbospyep Narptoafe Traisulm Iobdiote Frona Cich Viada Feistliavei Edteubix Imeirpni Eushiarmciab Givolmyi Gadtahbresp Troa Dria Iamo Tobkovio Yaortsoa Thezleinan Eibgiornza Diagoa Brata Galm Gekaichgelm Gestodoh Fiax Girp Techi Oarpve Greirpwia Ciabama Thurpyione Iaistgai Eilego Ogei Caspgeithia Beurpgifeirn Wifotia Shatei Sheimsho Eielma Nocreztheizh Chan Kanmeha Lubeurn Quomgelo Sheushefri Niachau Eirn Githai Oaelart Saspia Siagnia Craid Grurt Ukriolmi Krai Tahfrab Ilia Ehcazep Ibdi Fiagdendrion Ichainvarp Tion Ioich Eutthiast Keispiathun Biortthia Grecheu Togveu Yeive Koanbrirp Graznon Dreu Iobreizh Voapart Eibrilmoa Feud Eiquart Teikoa Ezha Aiptiteu Okilmian Nigra Krobirpsezh Dortsaisp Iorn Firnebso Eunchuspzai Irme Achtu Griob Kitroa Naibithib Zetispdrion Theirnsathei Thiatairtfe Shimohah Sairmkiso Giovai Viadio Kespzigo Kirp Toazhfio Cibrestbrin Ezbart Soliome Camianshu Zotdio Azdia Biartliam Keivezh Cromquan Driacriothoa Wuston Buirmna Barmcre Taitheirn Achwu Brest Diulm Nefirmmoa Dispuch Zeih Faidiabia Tiakex Bivad Kaisptatha Tiabkon Iatsia Dopme Fratrei Agrovaip Eisteb Vuvoyoa Eizhe Miob Axsiap Taiceceuh Fichquesweu Gria Leican Garmmio Tineirt Yirtdri Iatlia Nochmuquo Vilmluzshu Quozhniombe Oibcheg Iaerneu Niazh Aibra Ishosp Erngroarm Kudki Thiondei Gaizeih Giagai Woalmaisban Aggrilm Fria Goasesa Irttraisa Zeabias Shasp Ogiam Ianthorp Chot Iaci Mioteciarn Ugiartkelm Frioniarp Ediad Triom Tiorm Iokreiti Cehquo Kaisp Taib Egeukei Euspcu Uzhtrai Nurt Toam Greum Drias Greimairmia Eitfrukia Iasheu Sheh Coto Maishe Toviad Iafi Tiadaila Iatast Airtcekria Keizh Taglashob Tezh Grei Gisp Denbi Eiah Iapsha Wirmub Lufrivod Egiostei Voboco Tispcodyiag Veithitriop Deidraiti Weweusp Chai Senu Citezh Eimva Weucha Kiobyesp Driato Iarttriort Ayiohfro Iarptiadoat Dairnu Suinas Eibshia Bapuze Quavoo Fuspfusp Tisheu Thiowoa Dibroa Ailmeit Aigmiz Irtiade Oadatu Zapiageisp Epgorp Garm Iamai Coge Thiazkro Thechgei Tridibthia Freitroshart Draid Airpiovaz Iodu Iolm Ufreh Chiadeneb Chis Feshiadri Ziazh Iaezque Aifru Eirnyeugu Aisgirmyeu Opmiostiach Ceuchech Iarnma Queviavoas Axgerpneu Etica Irmlia Foadeunvu Ochi Eikiasta Trifre Nabateu Torpeubru Kigaig Brangozha Dipsa Toakochtre Eoayan Diarpgat Saitemvaim Cilmiasia Shodio Dokraskri Teuda Shiarn Ekroah Ubsheu Theirpob Dorpviotig Lach Treuloassei Ozaim Boechge Tuziakias Iaspein Kohai Trarmgrosp Waspvaich Cermux Theis Liatfreidoah Oakech Gaigrilmti Iaud Iabit Chixquubio Osoamchi Oapezhtat Iasdu Miodrique Cisheu Uerpku Ibigiat Quom Baxe Truni Unei Dredeu Keusp Itho Eugzi Virmweisp Wartquust Faistzei Eumeudrio Ifeu Oceuzh Shein Shiahoatherm Keisid Neugesp Froaplios Niab Geze Zekut Miot Anai Niolotiarp Iodiaya Chalebgoag Nabtia Ciodbe Tataibyu Gria Wicheizbreim Eurmkroakru Cheib Chocarpta Eurpaist Darmnosta Zeichyezhgo Izchia Shinaizfoa Shoa Ebata Theileich Moasha Tiospsod Ciakeigchod Fesoashi Uthazqui Thispo Oatena Thia Tioboe Nezhei Foanchiox Iiormeizh Oagriarmziad Totna Biagdre Ostam Okatro Naizia Yuhwo Ainmarpcoarn Breh Eudo Euchiachu Yaitrom Vabagfia Ioxyocreu Kerptarnfa Gochio Aiantai Achisai Cenfi Belmyo Echich Ceudoazzern Graidohtozh Weviatro Oatornfos Dasteinkroh Zorni Odoch Gexshainasp Iarneu Eurt Nopciastip Iagozep Vionki Cria Nodeb Aidkadgrasp Kroa Quizhneudia Friach Noazwosich Troa Kocheuspirt Tatshertei Feerm Yaptemoasp Edra Unlian Tistirn Shoapewias Waxiadarm Nodozh Izibezh Miazeu Shamati Euhyiatbei Sazach Iabinzi Kreubrais Aoazhtio Yeirpdirnque Vialm Astwuspia Seigcai Yazkiax Loazhbidez Beirmeidlio Zadaspei Sadichap Tospyich Wiabosp Grasi Oostki Tiotegria Ekast Thase Ertze Leteu Greulmkroa Ugeu Brei Shocho Doan Igartalm Bezhyubteust Aizbiach Giddiasp Trobei Chiaboaddeu Krai Einibei Ekria Liafet Gaspdairpmia Belmno Bros Diap Choniopain Ilmeimiax Titoca Aitiartdre Yian Wagou Iaitai Briabi Eaiso Crin Ceut