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. ”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 Êv˜Jšœ ™ Jšœ9™9Jšœ/™/Jšœ™J˜šÏk ˜ J˜J˜J˜—Jšœœ œ˜Jšœœ˜Jšœ œœ˜Jšœœœœ˜,Jšœœœ˜+Jš œœœ œœœ˜GJ˜J˜JšÏnœœ œ%œ˜UJ˜Jšœœœ(˜;J˜šžœ œ9˜LJšœ ˜J˜—Jšœ œœ˜(Jš œœœ œœœ˜PJ˜šž œ œ!œ˜=Jšœ+œ˜8J˜—šžœ œ0˜IJšœ$œ˜0J˜—Jšœ˜J˜—…—nx