source: trunk/cgi-bin/cross_contents @ 1

#file=cross_contents
$cross <crossinfo|
{
echo "<table border>"
echo "<captation><h3>"
 echol "Contenu de la base <em>$crossbl</em>" "Contents of the <em>$crossbl</em> database"
 echo "</h3></captation>"
read nu1 nu2
echo "<tr><th>&nbsp;"
 echol "mol&eacute;cule" "molecule"
 echo " </th><th>&nbsp;code </th><th>&nbsp;"
 echol "temp&eacute;rature/pression" "temperature/pressure"
 echo " </th></tr>"
while read m k tpl;do
echo "<tr><td align=center>$m</td><td align=center>$k</td><td><small>"
for tp in $tpl;do
if [ "$t" = "" ];then echo "$tp""/";t=$tp;else echo "$tp  &nbsp;";t=;fi
done
echo "</td></tr>";done
echo "<captation align=bottom><h4><ul><li>"
 echol "Domaine spectral" "Spectral range"
 echo ": <em>$nu1</em>&nbsp;"
 echol "&agrave;" "to"
 echo " <em>$nu2</em> cm<sup>-1</sup></li></ul></h4></captation>"
echo "</table>"
}