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, closed: BOOLEAN, tolerance: REAL] RETURNS [segments: DynFit.Segments, totalBadness: REAL]; SampleSegments: PROCEDURE [segments: DynFit.Segments, z: ComplexSequence] RETURNS [newSamples: ComplexSequence, len: NAT]; END. ˜DynFit.mesa Last edited by Maureen Stone August 31, 1984 12:38:48 pm PDT Last edited by Michael Plass 28-Jan-82 12:07:36 Michael Plass 30-Sep-81 Êz˜Jšœ ™ Jšœ<™