<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
  <head>
    <title>Produces</title>
    <link rel="stylesheet" href="style.css">
  </head>

  <body>
    <? prevnext "<h1>Produces...</h1>" ?>

    <?
set i 1
puts "<table>"

while { $i <= 8 } {
    puts "<tr>"
    for {set j 1} {$j <= 8} {incr j} {
	set num [ expr {$i * $j * 4 - 1} ]
	puts [ format "<td bgcolor=%2x%2x%2x > $num $num $num </td>" \
		$num $num $num ]
    }
    incr i
    puts "</tr>"
}

puts "</table>"
    ?>


  </body>
</html>