|
version 1.12, 2006/12/19 17:44:16
|
version 1.13, 2007/04/19 17:40:43
|
|
Line 101 sub maxima_run {
|
Line 101 sub maxima_run {
|
| } |
} |
| my $reply=&runscript($socket,$script); |
my $reply=&runscript($socket,$script); |
| &disconnect($socket); |
&disconnect($socket); |
| if ($reply=~/^\s*true\s*$/) { return 'EXACT_ANS'; } |
if ($reply=~/^\s*true\s*$/i) { return 'EXACT_ANS'; } |
| if ($reply=~/^\s*false\s*/) { return 'INCORRECT'; } |
if ($reply=~/^\s*false\s*$/i) { return 'INCORRECT'; } |
| return 'BAD_FORMULA'; |
return 'BAD_FORMULA'; |
| } |
} |
| |
|
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmaxima.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework