git.iko.soy/elk
on f71cbfa help sign in
elk/libraries/Graphics/WebGL.elm
32 lines 891 B history raw
1module Graphics.WebGL (makeGL, linkProgram, linkModel, webgl) where
3{-| WebGL
5-}
7import Basics (Float)
8import Signal (Signal)
9import MJS (V3,M4x4)
10import Color (Color)
11import Graphics.Element (Element)
12import Native.Graphics.WebGL
14data GLContext = Fake_Context
16makeGL : Int -> Int -> Signal GLContext
17makeGL = Native.Graphics.WebGL.makeGL
19data GLShader declarations = Fake_GLShader
20data GLProgram attributes = Fake_Program
22linkProgram : GLShader { attribute : a, uniform : u, varying : v } -> GLShader { attribute : {}, uniform : {}, varying : v } -> GLContext -> GLProgram { attribute : a, uniform : u }
23linkProgram = Native.Graphics.WebGL.linkProgram
25data GLModel = Fake_Model
27linkModel : (GLProgram { attribute : a, uniform : u }) -> u -> [a] -> GLModel
28linkModel = Native.Graphics.WebGL.linkModel
30webgl : GLContext -> [GLModel] -> Element
31webgl = Native.Graphics.WebGL.webgl