version 1.2.8.1, 2010/08/20 03:52:20
|
version 1.4, 2010/06/10 22:37:12
|
Line 1
|
Line 1
|
<problem> |
<problem> |
<startouttext />Accept an answer of around 90 or -90<endouttext /> |
|
<customresponse answerdisplay="something near 90 or -90"> |
<startouttext /> |
|
Accept an answer of around 90 or -90 |
|
<endouttext /> |
|
|
|
<customresponse answerdisplay="something near 90 or -90"> |
<answer type="loncapa/perl"> |
<answer type="loncapa/perl"> |
# We do not want a vector |
# We do not want a vector |
if ($submission=~/\,/) { return 'EXTRA_ANSWER'; } |
if ($submission=~/\,/) { return 'EXTRA_ANSWER'; } |
Line 14 if ($difference < 0.001) { return 'APPRO
|
Line 18 if ($difference < 0.001) { return 'APPRO
|
return 'INCORRECT'; |
return 'INCORRECT'; |
</answer> |
</answer> |
<textline /> |
<textline /> |
</customresponse> |
</customresponse> |
</problem> |
|
|
|
|
</problem> |