{- |
Module      :  ./CSMOF/XMLKeywords.hs
Description :  keywords used for XML conversion
Copyright   :  (c) Daniel Calegari Universidad de la Republica, Uruguay 2013
License     :  GPLv2 or higher, see LICENSE.txt
Maintainer  :  dcalegar@fing.edu.uy
Stability   :  provisional
Portability :  portable
-}

module CSMOF.XMLKeywords where

import Text.XML.Light

metamodelK :: QName
metamodelK :: QName
metamodelK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "Metamodel", qURI :: Maybe String
qURI = String -> Maybe String
forall a. a -> Maybe a
Just "urn:CSMOF.ecore", qPrefix :: Maybe String
qPrefix = String -> Maybe String
forall a. a -> Maybe a
Just "CSMOF"}

metamodelNameK :: QName
metamodelNameK :: QName
metamodelNameK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "name", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

modelK :: QName
modelK :: QName
modelK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "model", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

modelNameK :: QName
modelNameK :: QName
modelNameK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "name", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

elementK :: QName
elementK :: QName
elementK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "element", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

elementNameK :: QName
elementNameK :: QName
elementNameK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "name", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

elementTypeK :: QName
elementTypeK :: QName
elementTypeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "type", qURI :: Maybe String
qURI = String -> Maybe String
forall a. a -> Maybe a
Just "http://www.w3.org/2001/XMLSchema-instance", qPrefix :: Maybe String
qPrefix = String -> Maybe String
forall a. a -> Maybe a
Just "xsi"}

elementIsAbstractK :: QName
elementIsAbstractK :: QName
elementIsAbstractK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "isAbstract", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

elementSuperClassK :: QName
elementSuperClassK :: QName
elementSuperClassK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "superClass", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeK :: QName
ownedAttributeK :: QName
ownedAttributeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "ownedAttribute", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeLowerK :: QName
ownedAttributeLowerK :: QName
ownedAttributeLowerK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "lower", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeUpperK :: QName
ownedAttributeUpperK :: QName
ownedAttributeUpperK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "upper", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeNameK :: QName
ownedAttributeNameK :: QName
ownedAttributeNameK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "name", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeTypeK :: QName
ownedAttributeTypeK :: QName
ownedAttributeTypeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "type", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

ownedAttributeOppositeK :: QName
ownedAttributeOppositeK :: QName
ownedAttributeOppositeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "opposite", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

objectK :: QName
objectK :: QName
objectK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "object", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

objectNameK :: QName
objectNameK :: QName
objectNameK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "name", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

objectTypeK :: QName
objectTypeK :: QName
objectTypeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "type", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

linkK :: QName
linkK :: QName
linkK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "link", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

linkTypeK :: QName
linkTypeK :: QName
linkTypeK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "type", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

linkSourceK :: QName
linkSourceK :: QName
linkSourceK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "source", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}

linkTargetK :: QName
linkTargetK :: QName
linkTargetK = QName :: String -> Maybe String -> Maybe String -> QName
QName {qName :: String
qName = "target", qURI :: Maybe String
qURI = Maybe String
forall a. Maybe a
Nothing, qPrefix :: Maybe String
qPrefix = Maybe String
forall a. Maybe a
Nothing}