--- loncom/homework/functionplotresponse.pm	2011/10/13 01:54:12	1.65
+++ loncom/homework/functionplotresponse.pm	2011/10/14 00:40:24	1.66
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: functionplotresponse.pm,v 1.65 2011/10/13 01:54:12 www Exp $
+# $Id: functionplotresponse.pm,v 1.66 2011/10/14 00:40:24 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -981,6 +981,13 @@ sub actualval {
    return $xmin+$i/400.*($xmax-$xmin);
 }
 
+sub fpr_val {
+   my ($arg)=@_;
+   return &actualval($Apache::functionplotresponse::functionplotrulelabels{$arg},
+                     $Apache::functionplotresponse::fpr_xmin,
+                     $Apache::functionplotresponse::fpr_xmax);
+}
+
 sub fpr_f {
    my ($arg)=@_;
    return $Apache::functionplotresponse::func[&array_index($Apache::functionplotresponse::fpr_xmin,