-- file: MFMoves.mesa -- Pascal-to-Mesa translator output, translated at October 31, 1985 4:28:00 pm PST DIRECTORY PascalBasic, PascalWizardFiles, MFTypes; MFMoves: DEFINITIONS IMPORTS = BEGIN OPEN PascalBasic, PascalWizardFiles, MFTypes; Move: LONG POINTER TO ARRAY PascalInteger[0..MoveSize] OF PascalInteger; MovePtr: PascalInteger[0..MoveSize]; BisectStack: LONG POINTER TO ARRAY PascalInteger[0..BistackSize] OF PascalInteger; BisectPtr: PascalInteger[0..BistackSize]; --:269----311:-- MakeMoves: PROCEDURE[Xx0,Xx1,Xx2,Xx3,Yy0,Yy1,Yy2,Yy3: Scaled, XiCorr,EtaCorr: SmallNumber]; SmoothMoves: PROCEDURE[B,T: PascalInteger]; END.