anchor.diff:              RestartBatch state env
               OpenGL.Hl.Assert ()
   
  +        // compute center
  +        let center = position + pivot
  +
           // compute a coord flipping value
           let flipper =
               match flip with
  
positive.code: 
          // grab uniform locations
          let viewProjectionUniform = OpenGL.Gl.GetUniformLocation (shader, "viewProjection")
          let positionsUniform = OpenGL.Gl.GetUniformLocation (shader, "positions")
          let texCoordsesUniform = OpenGL.Gl.GetUniformLocation (shader, "texCoordses")
          let colorsUniform = OpenGL.Gl.GetUniformLocation (shader, "colors")
          let texUniform = OpenGL.Gl.GetUniformLocation (shader, "tex")
          OpenGL.Hl.Assert ()
  
          // fin
          (viewProjectionUniform, positionsUniform, texCoordsesUniform, colorsUniform, texUniform, shader)
  
      let private BeginBatch state env =
          env.State <- state
  
negative.code:               mutable ViewProjectionAbsolute : Matrix4x4
                mutable ViewProjectionRelative : Matrix4x4
                ViewProjectionUniform : int
                PerimetersUniform : int
                TexCoordsesUniform : int
                CentersUniform : int
                RotationsUniform : int
                ColorsUniform : int
                TexUniform : int
                Shader : uint
                Perimeters : single array
                Centers : single array
                Rotations : single array
                TexCoordses : single array
                Colors : single array
                Vao : uint
  