Changes to Test Script 1 between r15 and r16

======
set ret [list]
foreach line [split [getpage 0] \n] {
    set ret [linsert $ret [expr int(rand() * [llength $ret])] $line]
}

puts [join $ret \n]

puts ""

puts "Page count: [countpages]"

puts "@include [expr int(rand() * [countpages])]" --> puts "\[@include [expr int(rand() * [countpages])]\]"

return
======

Legend

     Only in r15
     Only in r16
     -->      Modified slightly between r15 and r16