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

[REBOL] Re: Clunky-looking code

From: rgombert:essentiel at: 2-Apr-2001 20:29

try : MultiplyBlocks: func [ Block1 Block2 /local sum ][ sum: 0 repeat i min length? Block1 length? Block2 [ sum: sum + (Block1/:i * Block2/:i) ] return sum ] Renaud