Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[REBOL] Re: REP: Introduce new functions for finding minimum and maximum of a se

From: lmecir:mbox:vol:cz at: 26-Dec-2000 18:41

Hi Pekr, one more suggestion, try the following modification: print "Finding min and max values using iteration ..." start: now/time mn: mx: copy/part img-data 4 loop (length? img-data) / 4 [ mn: min tmp: copy/part img-data 4 mn mx: max tmp mx img-data: skip img-data 4 ] end: now/time print end - start