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 |
Safe Haskell | Safe-Inferred |
Documentation
basicAna :: (Transformation, Sign, GlobalAnnos) -> Result (Transformation, ExtSign Sign (), [Named Sen])
buildSignature :: Transformation -> (Sign, [Diagnosis])
buildRelations :: Sign -> Sign -> [Relation] -> ((Map String RuleDef, Map String RuleDef), [Diagnosis])
separateTopFromNonTop :: [Relation] -> ([Relation], [Relation])
createRuleDef :: Sign -> Sign -> Relation -> (Map String RuleDef, [Diagnosis]) -> (Map String RuleDef, [Diagnosis])
getTypesFromVars :: Sign -> Sign -> [PrimitiveDomain] -> Domain -> Domain -> ([TypeClass], [Diagnosis])
getPrimitiveDomainType :: Sign -> Sign -> PrimitiveDomain -> (Maybe TypeClass, [Diagnosis])
getSomething :: [Maybe a] -> [a]
buildSentences :: Sign -> Transformation -> ([Named Sen], [Diagnosis])
propKeysCheckOK :: Sign -> String -> [PropKey] -> Bool
propKeyCheckOK :: Sign -> String -> PropKey -> Bool
findPropertyByTypeAndRole :: [PropertyT] -> [String] -> String -> Bool
getTargetType :: String -> PropertyT -> String
getOppositeType :: String -> PropertyT -> String
buildRules :: Sign -> (String, String, Metamodel) -> (String, String, Metamodel) -> [Relation] -> ([Named Sen], [Diagnosis])
checkRules :: Sign -> (String, String, Metamodel) -> (String, String, Metamodel) -> [Relation] -> ([RelationSen], [Diagnosis])
checkRule :: Sign -> (String, String, Metamodel) -> (String, String, Metamodel) -> Relation -> ([RelationSen], [Diagnosis])
collectParSet :: [PrimitiveDomain] -> Domain -> Domain -> [RelVar]
collectVarSet :: [RelVar] -> [PrimitiveDomain] -> Domain -> Domain -> [RelVar]
collectPrimDomVarSet :: [PrimitiveDomain] -> [RelVar]
collectDomainVarSet :: Domain -> [RelVar]
collectRecursiveRelInvoc :: String -> String -> [PropertyTemplate] -> Sign -> [RelVar] -> ([(PropertyT, RelVar, RelVar)], [Diagnosis])
getVarFromTemplate :: PropertyTemplate -> [RelVar] -> Maybe RelVar
findVarFromName :: String -> [RelVar] -> Maybe RelVar
collectRecursivePreds :: [RelVar] -> Maybe ObjectTemplate -> [(String, String, OCL)]
getOclExpre :: String -> [RelVar] -> PropertyTemplate -> [(String, String, OCL)]
getObjectTemplates :: Domain -> [ObjectTemplate]
getOT :: [PropertyTemplate] -> [ObjectTemplate]