Subversion Repositories wimsdev

Rev

Rev 8077 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. <ul class="inline nopuce">
  2. <li><table class="wimsborder">
  3. <caption>$addtable</caption>
  4. <tr><td $opcolor>+</td>
  5. !for j=0 to $q-1
  6.  <td $hdcolor>$(el$j)</td>
  7. !next j
  8. </tr>
  9. !for i=0 to $q-1
  10.  <tr><td $hdcolor>$(el$i)</td>
  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
  17.   <td>$(el$t)</td>
  18.  !next j
  19.  </tr>
  20. !next i
  21. </table>
  22. </li><li>
  23. <table class="wimsborder">
  24. <caption>$multable</caption>
  25. <tr><td $opcolor>*</td>
  26. !for j=0 to $q-1
  27.  <td $hdcolor>$(el$j)</td>
  28. !next j
  29. </tr>
  30. !for i=0 to $q-1
  31.  <tr><td $hdcolor>$(el$i)</td>
  32.  !for j=0 to $q-1
  33.   <td>
  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)
  40.   </td>
  41.  !next j
  42.  </tr>
  43. !next i
  44. </table>
  45. </li></ul>
  46.