![[BACK]](/icons/back.gif){kind=icon}
Return to caparesponse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework / caparesponse|
Return to caparesponse.pm CVS log | Up to [LON-CAPA] / loncom / homework / caparesponse |
| version 1.123, 2003/11/21 19:15:12 | version 1.124, 2003/11/25 14:37:11 |
|---|---|
| Line 410 sub format_number { | Line 410 sub format_number { |
| my $number = $1; | my $number = $1; |
| my $power = $2; | my $power = $2; |
| $power=~s/^\+//; | $power=~s/^\+//; |
| $power=~s/^(-?)0+(\d+)//; | $power=~s/^(-?)0+(\d+)/$1$2/; |
| $ans=$number.'$\times 10^{'.$1.$2.'}$'; #'stupidemacs | $ans=$number.'$\times 10^{'.$power.'}$'; #'stupidemacs |
| } | } |
| } | } |
| return $ans; | return $ans; |