Function Setup-Projection

Part of:

package cityscape
( setup-projection &optional (near (car *view-depth*)) (far (cdr *view-depth*)) )