Return to graph.png CVS log | Up to [LON-CAPA] / loncom / cgi |
version 1.7, 2002/01/22 15:12:05 | version 1.8, 2002/01/23 12:39:19 |
---|---|
Line 53 my $Range; | Line 53 my $Range; |
if ( $PNo > 10 ) {$Range = 30*$PNo;} | if ( $PNo > 10 ) {$Range = 30*$PNo;} |
else { $Range = 300+30*$PNo; } | else { $Range = 300+30*$PNo; } |
$Max += (10 - $Max % 10); | $Max+=(10 - $Max % 10); |
$Max=int($Max); | |
my $MyGraph = GD::Graph::bars3d->new($Range, 400); | my $MyGraph = GD::Graph::bars3d->new($Range, 400); |