<> <> <> <> <> <<>> DIRECTORY FunctionCache, GGBasicTypes, Imager; GGCircleCache: CEDAR DEFINITIONS = BEGIN Point: TYPE = GGBasicTypes.Point; Cache: TYPE = FunctionCache.Cache; Context: TYPE = Imager.Context; CachedCircle: TYPE = REF CachedCircleObj; CachedCircleObj: TYPE = RECORD [ bitmap: Imager.SampleMap, cw, ch: INT ]; Create: PROC [] RETURNS [Cache]; Insert: PROC [x: Cache, radius: REAL]; Lookup: PROC [x: Cache, radius: REAL] RETURNS [CachedCircle]; <> Remove: PROC [x: Cache, radius: REAL]; RemoveAll: PROC [x: Cache]; DrawCachedCircle: PROC [context: Context, point: Point, circle: CachedCircle]; END.