<p-matrix> ( dim fov near-plane far-plane -- matrix )

Vocabulary

papier.render

Inputs

dim	an object
fov	an object
near-plane	an object
far-plane	an object

Outputs

matrix

an object

Definition

USING: kernel math math.matrices.simd math.order math.vectors
sequences ;

IN: papier.render

:: <p-matrix> ( dim fov near-plane far-plane -- matrix )
    dim dup first2 min >float v/n fov v*n near-plane v*n
    near-plane far-plane frustum-matrix4 ; inline