X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=org.simantics.plant3d%2Fscl%2Fplant3d%2Fscenegraph%2FPipelineComponent.scl;fp=org.simantics.plant3d%2Fscl%2Fplant3d%2Fscenegraph%2FPipelineComponent.scl;h=94dc9a47fb16c6e873bfa049eb85bb2296aca083;hb=0602e0f78f22aaf27211ef1de801ddc631e103c0;hp=0000000000000000000000000000000000000000;hpb=1c986f49dd51037e0a189df77a76abce890ae8ae;p=simantics%2F3d.git diff --git a/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl b/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl new file mode 100644 index 00000000..94dc9a47 --- /dev/null +++ b/org.simantics.plant3d/scl/plant3d/scenegraph/PipelineComponent.scl @@ -0,0 +1,54 @@ +import "g3d/math/Tuple3d" + +import "./PipeRun" + +importJava "org.simantics.plant3d.scenegraph.PipelineComponent" where + data PipelineComponent + + getPipeRun :: PipelineComponent -> PipeRun + setPipeRun :: PipelineComponent -> PipeRun -> () + + getAlternativePipeRun :: PipelineComponent -> Maybe PipeRun + setAlternativePipeRun :: PipelineComponent -> PipeRun -> () + + updateParameters :: PipelineComponent -> () + + getNext :: PipelineComponent -> Maybe PipelineComponent + setNext :: PipelineComponent -> Maybe PipelineComponent -> () + + getPrevious :: PipelineComponent -> Maybe PipelineComponent + setPrevious :: PipelineComponent -> Maybe PipelineComponent -> () + + getBranch0 :: PipelineComponent -> Maybe PipelineComponent + setBranch0 :: PipelineComponent -> Maybe PipelineComponent -> () + + getType :: PipelineComponent -> String + + //getControlPoint :: PipelineComponent -> PipeControlPoint + + remove :: PipelineComponent -> () + + getFlowLength :: PipelineComponent -> Maybe Double + getEnds :: PipelineComponent -> Tuple3d -> Tuple3d -> () + +importJava "org.simantics.plant3d.scenegraph.PipeControlPoint$Type" where + data PointType + +importJava "org.simantics.plant3d.scenegraph.PipeControlPoint.Direction" where + data Direction + +importJava "org.simantics.plant3d.scenegraph.PipeControlPoint.PositionType" where + data PositionType + +importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint" where + data PipeControlPoint + + getPipelineComponent :: PipeControlPoint -> PipelineComponent + + //@JavaName getType + //getPointType :: PipeControlPoint -> PointType + + isFixed :: PipeControlPoint -> Boolean + + getSubPoint :: PipeControlPoint -> [PipeControlPoint] + getParentPoint :: PipeControlPoint -> Maybe PipeControlPoint \ No newline at end of file