data Glyph = Euro | CircleR | CircleC | TradeMark | ServiceMark
| Emdash | Ellipsis | Cent | Daggar | DoubleDaggar
| Clover | Flat | Sharp | Natural | CheckMark | XMark
- | LeftArrow | DoubleLeftArrow | DoubleRightArrow
+ | LeftArrow | RightArrow | DoubleLeftArrow | DoubleRightArrow
| DoubleLeftRightArrow | LeftRightArrow | Degree
data Login = Login String (Maybe String)