X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=org.simantics.plant3d%2Fscl%2Fplant3d%2Fscenegraph%2FPipelineComponent.scl;h=f8eab1766c9620fcc7ad975bfa7c0d9d87046360;hb=1e376c6afa94eae6a13c3a8fe227dc665dece431;hp=94dc9a47fb16c6e873bfa049eb85bb2296aca083;hpb=0602e0f78f22aaf27211ef1de801ddc631e103c0;p=simantics%2F3d.git diff --git a/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl b/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl index 94dc9a47..f8eab176 100644 --- a/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl +++ b/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl @@ -1,6 +1,6 @@ import "g3d/math/Tuple3d" - -import "./PipeRun" +import "g3d/math/Quat4d" +import "g3d/math/Vector3d" importJava "org.simantics.plant3d.scenegraph.PipelineComponent" where data PipelineComponent @@ -31,14 +31,40 @@ importJava "org.simantics.plant3d.scenegraph.PipelineComponent" where getFlowLength :: PipelineComponent -> Maybe Double getEnds :: PipelineComponent -> Tuple3d -> Tuple3d -> () -importJava "org.simantics.plant3d.scenegraph.PipeControlPoint$Type" where + getOrientation :: PipelineComponent -> Quat4d + getPosition :: PipelineComponent -> Vector3d + + setOrientation :: PipelineComponent -> Quat4d -> () + setPosition :: PipelineComponent -> Vector3d -> () + + getWorldOrientation :: PipelineComponent -> Quat4d + getWorldPosition :: PipelineComponent -> Vector3d + + setWorldOrientation :: PipelineComponent -> Quat4d -> () + setWorldPosition :: PipelineComponent -> Vector3d -> () + +importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint$PointType" where data PointType -importJava "org.simantics.plant3d.scenegraph.PipeControlPoint.Direction" where + INLINE :: PointType + TURN :: PointType + END :: PointType + +importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint$Direction" where data Direction -importJava "org.simantics.plant3d.scenegraph.PipeControlPoint.PositionType" where + @JavaName NEXT + DNEXT :: Direction + @JavaName PREVIOUS + DPREVIOUS :: Direction + +importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint$PositionType" where data PositionType + + NEXT :: PositionType + PREVIOUS :: PositionType + SPLIT :: PositionType + PORT :: PositionType importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint" where data PipeControlPoint @@ -51,4 +77,19 @@ importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint" wher isFixed :: PipeControlPoint -> Boolean getSubPoint :: PipeControlPoint -> [PipeControlPoint] - getParentPoint :: PipeControlPoint -> Maybe PipeControlPoint \ No newline at end of file + getParentPoint :: PipeControlPoint -> Maybe PipeControlPoint + +importJava "org.simantics.plant3d.scenegraph.PipeRun" where + data PipeRun + + getTurnRadius :: PipeRun -> Double + setTurnRadius :: PipeRun -> Double -> () + + getPipeDiameter :: PipeRun -> Double + setPipeDiameter :: PipeRun -> Double -> () + + addChild :: PipeRun -> PipelineComponent -> () + getChild :: PipeRun -> [PipelineComponent] + remChild :: PipeRun -> PipelineComponent -> () + + getSortedChild :: PipeRun -> [PipelineComponent] \ No newline at end of file