$j=0;
	for($i=0;$i<799;$i++)
	{
		$j=$j+0.01;
		print $WF1 "$j\t";
	}