Project

General

Profile

makedata4bug155.pl

perl script to generate data file for bug 155 - Anonymous, 06/25/2007 06:54 PM

 
1
#!/usr/bin/perl
2

    
3
$j=0;
4
for ($i=0;$i<2000001;$i++){
5
$j+=0.002;
6
printf "%-9.4f %12.4f \n",$j,1634.0;
7

    
8
}