(******************************************************************************
*                                VIEW3D1 .DEF                                 *
*                              ABO Software Dep.                              *
*                                                                             *
* Purpose : To provide routines for generating and executing 3D world to view-*
*         port definitions.                                                   *
*                                                                             *
*   Notes :                                                                   *
*                                                                             *
*         Version Date : 12/6/91                                              *
******************************************************************************)
DEFINITION MODULE VIEW3D1;

FROM MTRX3D1 IMPORT Matrix3D;
FROM PNT3D1  IMPORT Point3D;

TYPE

  View3D = RECORD
    Vmin        :Point3D;
    Vmax        :Point3D;
    Vtrans      :Matrix3D;
    Wtrans      :Matrix3D;
  END;

VAR
	viewport :View3D;
	
PROCEDURE genview(
	po,pz,py,pv          :Point3D;
	wmin,wmax            :Point3D;
	vmin,vmax            :Point3D):View3D;

PROCEDURE debugv(view:View3D);

END VIEW3D1.
