Language.PureScript.Sugar.CaseDeclarations