look-vertically ( player x -- )

Vocabulary

terrain

Inputs

player	an object
x	an object

Outputs

None

Definition

USING: accessors kernel math ;

IN: terrain

: look-vertically ( player x -- )
    [ + clamp-pitch ] curry change-pitch drop ; inline