Lines Matching refs:PI
8 use constant PI => 3.1415926;
13 return $ang - int($ang/(2*PI))*2*PI + 2*PI if $ang < 0;
14 return $ang - int($ang/(2*PI))*2*PI;
53 my $angle = $i * abs($start_angle-$end_angle)*PI/($spokes-1)/180;
54 $angle += $start_angle*PI/180;
87 if ((find_in_2pi($angle) < PI/2) ||
88 (find_in_2pi($angle) > 3*PI/2))
93 if (find_in_2pi($angle) > PI)
129 my $angle = $i * abs($start_angle-$end_angle)*PI/($spokes-1)/180;
130 $angle += $start_angle*PI/180;
158 if ((find_in_2pi($angle) <= PI/2) ||
159 (find_in_2pi($angle) > 3*PI/2))
170 if (find_in_2pi($angle) > PI)