Subversion Repositories wimsdev

!!INDEX
!! Erase the above line to hide your page from wims search engine.
!! Line starting with double exclamations are comment lines.
!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!
!! Indexing definitions. You should modify them according to your case.
!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!! Put every definition in ONE LINE!!
!let module_author      =XIAO, Gang
!let module_address     =
!let module_maintainer_address=wimsdev@groupes.renater.fr
!let module_title       = Andere WIMS-Websites
!let module_description =list of publically accessible WIMS sites around the world.
!let module_version     =2.08
!let module_wims_version=2.08

!! This is German template file
!let module_language    =de

!!Your copyright policy.
!!Your page will be included in wims distribution if the word `GNU'
!! appears in the following definition.
!let module_copyright   =&copy; 1998 (<a href="COPYING">GNU GPL</a>)

!! Possible categories: exercise, tool, dictionary, course, recreation.
!let module_category    =adm

!! En: elementary school. Hn: high school. Un: undergrad.
!! G: graduate. R: research.
!! E1,...,E6; H1...,H6; U1,...,U4; G; R
!let module_level       =E1 E2 E3 E4 E5 E6 H1 H2 H3 H4 H5 H6 U1 U2 U3 U4 G R

!! e.g. algebra, analysis, geometry, etc.
!let module_domain      =

!! For search engines; anything you like.
!let module_keywords    =


!!INDEXEND

!header1
<h1 class="wims_title">
WWW Interactive Multipurpose Server<br>
<span style="font-size:small">at <a href="/">$httpd_HTTP_HOST</a></span> <br>
$module_title</h1>

!set mir=wimshome/public_html/html/mirrors.en
!set thissite=!tolower $httpd_SERVER_NAME
!set n=!recordcnt $mir
!set c=
!for i_=1 to $n
 !set m_=!record $i_ of $mir
 !set l_=!line 1 of $m_
 !set l_=!trim $l_
 !set l_=!translate / to $\
$ in $l_
 !set l_=!line 1 of $l_
 !set l_=!lower $l_
 !if $l_!=$thissite
  !set c=!append item $i_ to $c
 !endif
!next i_
!set n=!itemcnt $c
!if $n<1
 <p>
 This WIMS site does not keep a list of mirror sites. Sorry.
 </p>
!else
 Here are the other WIMS sites known to be open to the general public.
 If you use WIMS regularly in your work, we suggest
 that you bookmark at least some of these addresses, so that if your favorite
 site becomes temporarily unavailable, you would not see your work disrupted.

 $table_header
 $table_hdtr<th>Site</th>
 <th>Location</th>
 <th>Country</th>
 <th>Supported<br>languages</th>
 <th>Comments</th>
 </tr>
 !for i_=1 to $n
  !set j_=!item $i_ of $c
  !set l_=!record $j_ of $mir
  !distribute lines $l_ into u_,t_,C_,l_,m_,e_,r_
  !readproc mirror.proc
  $table_tr<td>
  <a href="$u_">$U_</a></td>
  <td>$t_</td>
  <td>$C_</td>
  <td>
  !for L_ in $l_
   <img src="gifs/$L_.gif" alt="$L_.gif" height="16">
  !next L_
!!  <td align="center">!mailurl n$e_ $m_\nWIMS site
  </td><td>$r_&nbsp;</td></tr>
 !next i_
 $table_end
!endif

:end
If you have a WIMS installation and want it to be listed here, please write to
!mailurl wimsdev@groupes.renater.fr wimsdev\
wims mirror
.
<p>
WIMS is a software which can be freely
!href module=adm/light&phtml=download.phtml.$lang downloaded

 and can be installed on Linux operating systems.
Please see the <a href="README">README</a> file for more
details on how to install WIMS.
</p>
!tail