source: trunk/cgi-bin/geisa_form_moliso_nu @ 1

#file=geisa_form_moliso_nu
s=" checked"
c="<input type=\"radio\" name=\"Moliso\" value=\""
echo "<h3><li>"
 echol "Choix de la mol&eacute;cule" "Choosing one mole"
 echo "</li></h3>"
echo "<ul>"
$geisa <geisainf|
{
skip 15
while read m l;[ $m != ------ ];do
echo "</font><font size=4><strong>"
if [ $allisot = 0 ]; then echo "&nbsp;"; else echon "$c$m\"$s>";s=; fi
echo "$m</strong></font><font size=2>"
ifs=$IFS;IFS=" -";for n in `expr "$l" : '.*/\(.*\)/'`;do echo "$c$m"_"$n\"$s>$n";s=;done
IFS=$ifs;done
echo "</font>"
echo "</ul>"
skip 2;ifs=$IFS;IFS=" =";read l m n p q r s t u v nu1 x y nu2;IFS=$ifs
echo "<h3><li>"
 echol "Choix du domaine spectral en cm<sup>-1</sup>," "Choosing the spectral area in cm<sup>-1</sup>,"
 echol "de <em>$nu1</em> &agrave <em>$nu2</em>" "from <em>$nu1</em> to <em>$nu2</em>"
 echo "</li></h3>"
echo "<ul>"
echo "<em>"
 echol "Limite Inf&eacute;rieure" "Lower Bound"
 echo ":</em>&nbsp;<input type=\"text\" name=\"Nu1\" size=\"10\" maxlength=\"20\" value=\"$nu1\">"
echo " &nbsp;&nbsp;<em>"
 echol "Limite Sup&eacute;rieure" "Upper Bound"
 echo ":</em>&nbsp;<input type=\"text\" name=\"Nu2\" size=\"10\" maxlength=\"20\" value=\"$nu2\">"
}
[ "$dnu_opt" = 0 ]||
{
echo " &nbsp;&nbsp;<em>"
 echol "Pas d'Etude" "Sampling Step"
 echo ":</em>&nbsp;<input type=\"text\" name=\"Dnu\" size=\"10\" maxlength=\"20\">"
}
echo "</ul>"