JaM USING [State],

Cubic USING [Bezier],

FitState USING [Handle],

FitIO USING [Context];

InitProc: TYPE = PROC[state: JaM.State];

RegisterInit: PROC[id: ATOM, proc: InitProc];

defaultFitIO: FitIO.Context;

defaultFitState: FitState.Handle;

HiLight: PUBLIC PROC[state: JaM.State, x, y: REAL]; -- inverts a small area around the given point, to give some feedback about what in going on.

ShowBezierInverted: PUBLIC PROC[state: JaM.State, bezier: Cubic.Bezier];

}.