INTERFACE R6Rep; (* Definition and basic properties of the type "R6.T" *) IMPORT RealExtraExtras, RandomReal, GaussRandom; CONST N = 6; TYPE T = ARRAY [0..N-1] OF REAL; TYPE ElemT = REAL; CONST DefaultElemFmt = RealExtraExtras.ToText; CONST URandomCoord = RandomReal.Real; CONST NRandomCoord = GaussRandom.Real; END R6Rep.