# tcsamul8.run
puts "from  ecomp add8c.e csa4.e tcsamul8.e -o tcsamul8.net"
puts "from  esim < tcsamul8.run > tcsamul8.out"
esim load tcsamul8.net
# stop just before the first falling clock in order to print
esim run 49
for {set i 256} {$i} {incr i -1} {
puts "a= [esim show a]  b= [esim show b]  a*b= [esim show p]  cntr= [esim show cntr]  evck=[esim events]"
# stop just before falling clock in order to print
esim run 100
}
puts "tcsamul8.out finished"
exit