immutable class ANGLED < $ANGLES{FLTD,CPXD}, $BINARY , $ORDERED{ANGLED},


Flattened version is here

Ancestors
$IS_EQ $ORDERED{_} $IS_LT{_} $VALUE{_}
$NIL $IS_NIL $BINARY $ANGLES{_,_}



Public


Features

Iters


Private

const Half_Circle : FLTD := 180.0d ;
const Two_Pi : FLTD := FLTD::pi * 2.0d ;
****
const asize : CARD := 64 ;
****--FUDGE for asize!
priv_radians(

The Sather Home Page