Subversion Repositories wimsdev

Rev

Rev 535 | Rev 10294 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
535 bpr 1 
 
8077 bpr 2 
<table class="wimscenter wimsborder">
3 
<tr><th colspan="$[$q+1]">$addtable</th></tr>
4 
<tr><td $opcolor>+</td>
535 bpr 5 
!for j=0 to $q-1
6 
 <td $hdcolor>$(el$j)</td>
7 
!next j
8077 bpr 8 
</tr>
535 bpr 9 
!for i=0 to $q-1
8077 bpr 10 
 <tr><td $hdcolor>$(el$i)</td>
535 bpr 11 
 !for j=0 to $q-1
12 
  !if $field=prime
13 
   !set t=!eval ($i+$j)%$q
14 
  !else
15 
   !set t=!item $i+1 of $(add$j)
16 
  !endif
8077 bpr 17 
  <td>$(el$t)</td>
535 bpr 18 
 !next j
8077 bpr 19 
 </tr>
535 bpr 20 
!next i
21 
</table>
22 
 
8077 bpr 23 
<table class="wimscenter wimsborder">
24 
<tr><th colspan="$[$q+1]">$multable</th></tr>
25 
<tr><td $opcolor>*</td>
535 bpr 26 
!for j=0 to $q-1
8077 bpr 27 
 <td $hdcolor>$(el$j)</td>
535 bpr 28 
!next j
8077 bpr 29 
</tr>
535 bpr 30 
!for i=0 to $q-1
8077 bpr 31 
 <tr><td $hdcolor>$(el$i)</td>
535 bpr 32 
 !for j=0 to $q-1
8077 bpr 33 
  <td>
535 bpr 34 
  !if $field=prime
35 
   !set t=!eval ($i*$j)%$q
36 
  !else
37 
   !set t=!item $i+1 of $(mul$j)
38 
  !endif
39 
  $(el$t)
8077 bpr 40 
  </td>
535 bpr 41 
 !next j
8077 bpr 42 
 </tr>
535 bpr 43 
!next i
44 
 
8077 bpr 45 
</table>
46