/* TEACH GO_SQUARE                          Ben Rabau, 27th Aug 1993

This file refers to square objects in GO. Since they are implemented as
regular polygons with four sides, the user is also referred to:
TEACH * GO_POLYGON.

For more general detailed information see

HELP * GO
REF * GO

 */

;;; This requires the following files to be loaded:
uses go;
uses go_square;

;;; It also requires an active go_pane (see TEACH * GO_PANE):
go_init_rc();

;;; rather than a "regular  4-sided polygon" you can also use the go_square
;;; class:
vars a_square = instance go_square;
                    go_radius = 100;
                endinstance;
go_add_to( a_square, go_default_pane );

;;; Another major characteristic is the rotation angle: since squares are
;;; implemented by polygons the default square stands on its corner (this
;;; puts the reference point under a zero angle).
go_angle( a_square ) =>
 0 -> go_angle( a_square );
45 -> go_angle( a_square );

;;; This will influence scaling and the extent of the bounding box.

;;; The rest is as explained in TEACH * GO_POLYGON
;;; eof

--- C.all/lib/proto/go/teach/go_square
--- Copyright University of Sussex 1993. All rights reserved.
