The OpenGL Module

There is no real documentation right now. Only the interface:

module pervasive GL
    export all

    fcn NewWin (width, height : int) : boolean
    proc CloseWin ()

    proc Cls ()
    proc Update ()
    
    % 1 is enabled 0 is disabled. Disabled by default
    proc SetLight (enabled : int)

    % pushmatrix and popmatrix manipulate the matrix stack (you don't need to know how to use this.)
    % clearmatrix resets all transforms
    proc PushMatrix ()
    proc PopMatrix ()
    proc ClearMatrix ()

    % transforms. These apply to anything drawn after they are called. These can be changed with the matrix functions.
    proc Scale (x, y, z : real)
    proc Translate (x, y, z : real)
    proc Rotate (angle, x, y, z : real)

    % coordinates go from -1 to 1 on both axes for the default viewport.
    % this means square windows will have distorted coordinates.
    % you can fix this with a scale transform.
    proc DrawLine (x1, y1, z1, x2, y2, z2 : real, r, g, b : int)
    proc DrawFillTriangle (x1, y1, z1, x2, y2, z2, x3, y3, z3 : real, r, g, b : int)
    proc DrawTriangle (x1, y1, z1, x2, y2, z2, x3, y3, z3 : real, r, g, b : int)
end GL