git.iko.soy/elk
on 4f4e6ac help sign in
elk/libraries/Graphics/WebGL.elm
21 lines 410 B history raw
1module Graphics.WebGL where
3{-| WebGL
5-}
7import Basics (Float)
8import MJS (V3)
9import Graphics.Element (Element)
10import Native.Graphics.WebGL
12type GLTriangle = { a: V3, b: V3, c: V3 }
13type GLColor = V3
14type Model = [(GLColor,GLTriangle)]
16data Transform = NoTransform
18data Scene = Node Transform [Scene] | Leaf Model
20glContext : Int -> Int -> Scene -> Element
21glContext = Native.Graphics.WebGL.glContext