org.simantics.g3d/scl/G3D/Math/Point3d.scl

   1 import "./Tuple3d"
   2
   3 import "JavaBuiltin" as Java
   4
   5 importJava "javax.vecmath.Point3d" where
   6   data Point3d
   7
   8   distance :: Point3d -> Point3d -> Double
   9   distanceSquared :: Point3d -> Point3d -> Double
  10
  11   @JavaName "<init>"
  12   createPoint3d :: Double -> Double -> Double -> Point3d
  13   @JavaName "<init>"
  14   copyPoint3d' :: Tuple3d -> Point3d
  15   @JavaName "<init>"
  16   defaultPoint3d :: Point3d
  17
  18 instance Tuple3dClass Point3d
  19
  20 copyPoint3d :: Tuple3dClass a => a -> Point3d
  21 copyPoint3d = copyPoint3d' . asTuple