]> gerrit.simantics Code Review - simantics/3d.git/blob - TurnComponent.scl
c5be3778a078037e3d8d5cb4bd1b91f50338f2bc
[simantics/3d.git] / TurnComponent.scl
1 import "./PipelineComponent"
2
3 import "g3d/math/Vector3d"
4
5 importJava "org.simantics.plant3d.scenegraph.TurnComponent" where
6   data TurnComponent
7   
8   getType :: TurnComponent -> String
9   getControlPoint :: TurnComponent -> PipeControlPoint
10   getPipeRun :: TurnComponent -> Maybe PipeRun
11   
12   isVariableAngle :: TurnComponent -> Boolean
13   getTurnAngle :: TurnComponent -> Maybe Double
14   setTurnAngle :: TurnComponent -> Maybe Double -> ()
15   
16   getTurnAxis :: TurnComponent -> Vector3d
17   
18   getRotationAngle :: TurnComponent -> Maybe Double
19   setRotationAngle :: TurnComponent -> Maybe Double -> ()
20