<> <> <> <<>> DIRECTORY SC, DABasics; SCAreaEst: CEDAR DEFINITIONS = BEGIN StatProc: TYPE = PROC [clientData: REF, j: INT] RETURNS [p: REAL]; Poisson: PUBLIC PROC [a: REAL, k: INT] RETURNS [res: REAL]; Power: PUBLIC PROC [i: REAL, n: INT] RETURNS [res: REAL]; Factorial: PUBLIC PROC [n: INT] RETURNS [p: REAL]; Choose: PUBLIC PROC [n: INT, i: INT] RETURNS [p: REAL]; SumOver: PUBLIC PROC [clientData: REF, clientProc: StatProc, start, end: INT] RETURNS [sum: REAL]; ExpectedVal: PUBLIC PROC [clientData: REF, clientProc: StatProc, start, end: INT] RETURNS [val: REAL]; EstimateArea: PUBLIC PROC [handle: SC.Handle, numRows: NAT, basic: BOOLEAN] RETURNS[size: DABasics.Position]; END.