Vis.VisObject

Documentation

data VisObject a

Constructors

VisObjects [VisObject a]

Trans (V3 a) (VisObject a)

RotQuat (Quaternion a) (VisObject a)

RotDcm (M33 a) (VisObject a)

RotEulerRad (Euler a) (VisObject a)

RotEulerDeg (Euler a) (VisObject a)

Scale (a, a, a) (VisObject a)

Cylinder (a, a) Color

Box (a, a, a) Flavour Color

Cube a Flavour Color

Sphere a Flavour Color

Ellipsoid (a, a, a) Flavour Color

Line (Maybe a) [V3 a] Color

Line' (Maybe a) [(V3 a, Color)]

Arrow (a, a) (V3 a) Color

Axes (a, a)

Plane (V3 a) Color Color

Triangle (V3 a) (V3 a) (V3 a) Color

Quad (V3 a) (V3 a) (V3 a) (V3 a) Color

Text3d String (V3 a) BitmapFont Color

Text2d String (a, a) BitmapFont Color

Points [V3 a] (Maybe GLfloat) Color

ObjModel LoadedObjModel Color

Instances

Functor VisObject

Methods

fmap :: (a -> b) -> VisObject a -> VisObject b

(<$) :: a -> VisObject b -> VisObject a

Generic (VisObject a)

Associated Types

type Rep (VisObject a) :: * -> *

Methods

from :: VisObject a -> Rep (VisObject a) x

to :: Rep (VisObject a) x -> VisObject a

Binary a => Binary (VisObject a)

Methods

put :: VisObject a -> Put

get :: Get (VisObject a)

type Rep (VisObject a)

type Rep (VisObject a) = D1 (MetaData "VisObject" "Vis.VisObject" "not-gloss-0.7.7.0-FUSTuXwr9c53SEKoBkQbhb" False) ((:+:) ((:+:) ((:+:) ((:+:) (C1 (MetaCons "VisObjects" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [VisObject a]))) (C1 (MetaCons "Trans" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a)))))) ((:+:) (C1 (MetaCons "RotQuat" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Quaternion a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a))))) ((:+:) (C1 (MetaCons "RotDcm" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (M33 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a))))) (C1 (MetaCons "RotEulerRad" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Euler a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a)))))))) ((:+:) ((:+:) (C1 (MetaCons "RotEulerDeg" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Euler a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a))))) ((:+:) (C1 (MetaCons "Scale" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a, a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (VisObject a))))) (C1 (MetaCons "Cylinder" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color)))))) ((:+:) (C1 (MetaCons "Box" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a, a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Flavour)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) ((:+:) (C1 (MetaCons "Cube" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 a)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Flavour)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) (C1 (MetaCons "Sphere" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 a)) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Flavour)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))))))) ((:+:) ((:+:) ((:+:) (C1 (MetaCons "Ellipsoid" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a, a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Flavour)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) ((:+:) (C1 (MetaCons "Line" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [V3 a])) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) (C1 (MetaCons "Line'" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [(V3 a, Color)])))))) ((:+:) (C1 (MetaCons "Arrow" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) ((:+:) (C1 (MetaCons "Axes" PrefixI False) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a)))) (C1 (MetaCons "Plane" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color)))))))) ((:+:) ((:+:) (C1 (MetaCons "Triangle" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a)))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) ((:+:) (C1 (MetaCons "Quad" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a)))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color)))))) (C1 (MetaCons "Text3d" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (V3 a)))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 BitmapFont)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))))) ((:+:) (C1 (MetaCons "Text2d" PrefixI False) ((:*:) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 String)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (a, a)))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 BitmapFont)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) ((:+:) (C1 (MetaCons "Points" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [V3 a])) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe GLfloat))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color))))) (C1 (MetaCons "ObjModel" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 LoadedObjModel)) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Color)))))))))

drawObjects :: VisObject GLdouble -> IO ()

data LoadedObjModel

Constructors

LoadedObjModel (Vector Double) (Vector Double) Int

Instances

Generic LoadedObjModel

Associated Types

type Rep LoadedObjModel :: * -> *

Methods

from :: LoadedObjModel -> Rep LoadedObjModel x

to :: Rep LoadedObjModel x -> LoadedObjModel

Binary LoadedObjModel

Methods

put :: LoadedObjModel -> Put

get :: Get LoadedObjModel

type Rep LoadedObjModel

type Rep LoadedObjModel = D1 (MetaData "LoadedObjModel" "Vis.VisObject" "not-gloss-0.7.7.0-FUSTuXwr9c53SEKoBkQbhb" False) (C1 (MetaCons "LoadedObjModel" PrefixI False) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Vector Double))) ((:*:) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Vector Double))) (S1 (MetaSel (Nothing Symbol) NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 Int)))))

loadObjModel :: Foldable f => f (V3 Double, V3 Double) -> LoadedObjModel

turn a list of vertexnormal tuples into vertexnormal arrays

setPerspectiveMode :: IO ()

Orphan instances

Binary Flavour

Methods

put :: Flavour -> Put

get :: Get Flavour

Binary BitmapFont

Methods

put :: BitmapFont -> Put

get :: Get BitmapFont

Binary Color

Methods

put :: Color -> Put

get :: Get Color