# Canopy This directory contains an (unfinished) attempt at writing a [Diplomacy]() adjudecation engine. ## File structure | File | Description | | ------------------------------------ | ------------------------------------------------------------------------------ | | [Tagless.purs](./src/Tagless.purs) | Experiments regarding tagless representations of inductive types | | [Graph.purs](./src/Graph.purs) | Simple directed-graph type | | [DipMap.purs](./src/DipMap.purs) | Representation for diplomacy maps | | [DipMap.purs](./src/Adjudecate.purs) | Types for logical propositions. The adjudecation logic was supposed to go here |