(*---------------------------------------------------------------------------
   :Program.    Kurve
   :Author.     Jörg Wesemann
   :Address.    Auf der Heide 10, 2807 Achim - Baden
   :Phone.      (0)4202 / 70658
   :Shortcut.   [jwe]
   :Version.    2.94
   :Date.       23.03.89
   :Copyright.  PD
   :Language.   Modula-II
   :Translator. M2Amiga
   :Imports.    none.
   :Update.     none.
   :Contents.   none.
   :Remark.     none.
---------------------------------------------------------------------------*)



DEFINITION MODULE imagedata;

  TYPE
    CARDPTR = POINTER TO CARDINAL;
  
  CONST
    oksize 	=  400;
    okhsize	=  400;
    wahlsize 	=  336;
    wahlhsize	=  336;


  PROCEDURE CopyToChip(von: CARDPTR; VAR nach: CARDPTR; n: LONGINT);
  PROCEDURE okimagedata;
  PROCEDURE okhimagedata;
  PROCEDURE wahlimagedata;
  PROCEDURE wahlhimagedata;

    
END imagedata.