DynFit.mesa
Last edited by Maureen Stone May 15, 1984 11:01:58 am PDT
Last edited by Michael Plass 28-Jan-82 12:07:36
Michael Plass 30-Sep-81
DIRECTORY
Complex,
Seq;
DynFit: CEDAR DEFINITIONS =
BEGIN OPEN Seq;
PointNumber: TYPE = NAT;
Patch: TYPE = RECORD[c0,c1,c2,c3: REAL ← 0];
PatchSequence: TYPE = REF PatchSequenceRec;
PatchSequenceRec: TYPE = RECORD[element: SEQUENCE length:NAT OF Patch];
NearestZ: PUBLIC PROCEDURE [z: ComplexSequence, v:Complex.Vec] RETURNS [PointNumber];
Line: TYPE = RECORD [centerOfMass, direction: Complex.Vec];
BestLine: PROCEDURE [z: ComplexSequence, firstPoint, lastPoint: PointNumber]
RETURNS [r: Line];
Segments: TYPE = REF SegmentSequenceRec;
SegmentSequenceRec: TYPE = RECORD[endpoint: SEQUENCE length:NAT OF PointNumber];
FitSegments: PROCEDURE [z: ComplexSequence, tolerance: REAL]
RETURNS [segments: DynFit.Segments, totalBadness: REAL];
SampleSegments: PROCEDURE [segments: DynFit.Segments, z: ComplexSequence]
RETURNS [newSamples: ComplexSequence, len: NAT];
END.