importJava "org.simantics.district.network.DistrictNetworkUtil" where
calculateDistance :: Resource -> Resource -> <ReadGraph> Double
+ nearbyVertices :: Resource -> Double -> <ReadGraph> [Resource]
importJava "org.simantics.district.network.ModelledCRS" where
xToLongitude :: Double -> <Proc> Double
()
importJava "org.simantics.district.network.DistrictNetworkUtil" where
- createVertex :: Resource -> Vector Double -> Resource -> <WriteGraph, Proc> Resource
- createEdge :: Resource -> Resource -> <WriteGraph, Proc> Resource
+ createVertex :: Resource -> Vector Double -> Double -> Resource -> <WriteGraph, Proc> Resource
+ createEdge :: Resource -> Resource -> Vector Double -> <WriteGraph, Proc> Resource
"""
Tries to look for the Resource representing the configuration component
"""
"""
-possibleMappedComponentPropertyValue :: String -> Resource -> <ReadGraph> Maybe Double
+possibleMappedComponentPropertyValue :: Serializable a => Typeable a => String -> Resource -> <ReadGraph> Maybe a
possibleMappedComponentPropertyValue propName r = match possibleMappedComponentVariable r with
Nothing -> Nothing
Just mv -> possiblePropertyValue mv propName
"""
"""
-mappedComponentPropertyValue :: Double -> String -> Resource -> <ReadGraph> Double
+mappedComponentPropertyValue :: Serializable a => Typeable a => a -> String -> Resource -> <ReadGraph> a
mappedComponentPropertyValue def propName r = match possibleMappedComponentVariable r with
Nothing -> def
Just mv -> match possiblePropertyValue mv propName with
"""
dnElementsMappedToComponents :: [Resource] -> <ReadGraph> [Resource]
dnElementsMappedToComponents mappedComponents = mapMaybe possibleDNElementMappedToComponent mappedComponents
+
+
+importJava "org.simantics.district.network.DistrictNetworkUtil" where
+ createNetworkDiagram :: Resource -> Resource -> String -> Resource -> Resource -> Resource -> Resource -> Resource -> <WriteGraph, Proc> Resource
+ changeMappingType :: Resource -> [Resource] -> <WriteGraph, Proc> ()
+ findDNElementById :: Resource -> String -> <ReadGraph, Proc> Maybe Resource
+ findDNElementByXYCoordinates :: Resource -> Double -> Double -> Double -> <ReadGraph, Proc> [Resource]
+