for($i=$slices;$i>0;$i--){
    ...
		$xn[$v]=cos($ang*$j);
		$x[$v]=($zradius*$xn[$v]);
		$yn[$v]=sin($ang*$j);
		$y[$v]=$zradius*$yn[$v];
		$zn[$v]=cos((-2*$height*$zradius/pow($radius,2))*exp(-pow($zradius,2)/pow($radius,2)));
		$z[$v]=$height*exp((-pow($zradius,2))/pow($radius,2));
		$v++;
	}