git.iko.soy/elk
on c8a14ff help sign in
elk/libraries/Graphics/WebGL.elm
21 lines 430 B history raw
1module Graphics.WebGL where
3{-| WebGL
5-}
7import Basics (Float)
8import MJS (V3,M4x4)
9import Color (Color)
10import Graphics.Element (Element)
11import Native.Graphics.WebGL
13type GLPoint = { pos: V3, color: Color }
14type GLTriangle = { a: GLPoint, b: GLPoint, c: GLPoint }
15type Model = [GLTriangle]
17data Scene = Node M4x4 [Scene] | Leaf Model
19glContext : Int -> Int -> Scene -> Element
20glContext = Native.Graphics.WebGL.glContext