frustum ( dim -- -x x -y y near far )

Vocabulary

terrain

Inputs

dim

an object

Outputs

-x	an object
x	an object
-y	an object
y	an object
near	an object
far	an object

Definition

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

IN: terrain

: frustum ( dim -- -x x -y y near far )
    dup first2 min v/n NEAR-PLANE FOV / v*n first2
    [ [ neg ] keep ] bi@ NEAR-PLANE FAR-PLANE ;