Data.Memorable.Theme.Fantasy

Documentation

type TransitiveVerb = ToTree '["blending", "breaking", "bullying", "burning", "charming", "dominating", "fighting", "freezing", "growing", "kicking", "killing", "liquefying", "loving", "melting", "paralyzing", "peeling", "petrifying", "piercing", "pinching", "poking", "punching", "singeing", "slicing", "splattering", "squishing", "tearing", "teasing", "throwing", "tormenting", "tossing", "wooing", "zapping"]

type Weapons = ToTree '["axe", "club", "dagger", "dart", "flail", "halberd", "hammer", "javelin", "lance", "mace", "pick", "sling", "spear", "staff", "sword", "trident"]

type Armour = ToTree '["helm", "boots", "vest", "gauntlets", "great helm", "cuirasse", "shield", "pants", "shirt", "greaves", "hat", "leggings", "robes", "sandals", "amulet", "ring"]

type Aura = ToTree '["unholy", "holy", "sacred", "vile", "shimmering", "glowing", "sparkling", "demonic", "angelic", "cold", "terrifying", "ancient", "mouldy", "elvish", "apocryphal", "ghostly"]

type Monster = ToTree '["batrachian", "afreet", "ankheg", "annis", "assagim", "babau", "babbler", "banshee", "barghest", "basilisk", "behir", "blindheim", "blinkdog", "brownie", "bugbear", "bulette", "carbuncle", "caterwaul", "centaur", "chimaera", "cockatrice", "crabman", "cyclops", "dakon", "demoniac", "devilcat", "disenchanter", "doppelganger", "dracolisk", "dragon", "dretch", "dryad", "elemental", "erinyes", "ettercap", "ettin", "faun", "gargoyle", "genie", "ghast", "ghost", "ghoul", "giant", "gnoll", "goblin", "golem", "gorgon", "griffon", "grimlock", "harpy", "hellhound", "hippogriff", "hobgoblin", "homonculus", "hydra", "imp", "jackalwere", "kobold", "kraken", "lemure", "leprechaun", "lich", "locathah", "manticore", "medusa", "mephit", "merman", "minotaur", "mongrelman", "mould", "mummy", "naga", "necrophidius", "nereid", "nightmare", "nilbog", "nixie", "nymph", "ogre", "orc", "otyugh", "owlbear", "pegasus", "phantom", "phoenix", "piercer", "pixie", "poltergeist", "pseudodragon", "quasit", "quickling", "rakshasa", "remorhaz", "roc", "roper", "sahuagin", "shaitan", "shedu", "shrieker", "shub", "skeleton", "spectre", "sphinx", "sprite", "squealer", "stirge", "stunjelly", "succubus", "sylph", "titan", "treant", "triton", "troglodyte", "troll", "uduk", "unicorn", "vampire", "vilstrak", "volt", "vulchling", "wererat", "werewolf", "wight", "wraith", "wyvern", "xorn", "yeti", "zombie"]

type ArmourMaterial = ToTree '["bronze", "cloth", "golden", "iron", "leather", "silk", "studded", "wooden", "crystal", "mythril", "bone", "stone", "silver", "glass", "paper", "fur"]

type Buff = ToTree '["accuracy", "climbing", "constitution", "dexterity", "fear", "fortitude", "hope", "invisibility", "paralysis", "protection", "speed", "swimming", "telekinesis", "warmth", "wisdom", "wizardry"]

type RpgWeapons = ((Weapons :- "of") :- Monster) :- TransitiveVerb

type RpgArmour = ((ArmourMaterial :- Armour) :- "of") :- Buff

rpgWeapons :: Proxy (Aura :- RpgWeapons)

rpgArmour :: Proxy (Aura :- RpgArmour)