home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / graphics / aim_xtra / acros.aim next >
Text File  |  1988-08-17  |  592b  |  19 lines
  1. * Abindon Cross benchmark ( prof. Kendall Preston )
  2. * implementation in AIM by Frans Groen
  3. *
  4. * display is put off to obtain the operation times
  5. * separated from the display times
  6. * bench mark time = (a) + (b) + (c) + (d)
  7. *
  8. dof               * display of
  9. ton               * timer on
  10. readf ACROS.IM,A  * read image
  11. gdisp             * display
  12. unif A,B,31       * uniform filter (a)
  13. gdisp B           * display result
  14. thresh B,B,1,147  * threshold (b)
  15. bdisp B,1         * display
  16. skelet 100,1,0,B  * skeleton (c)
  17. bdisp B,1         * display (d)
  18. don               * display on
  19.