Problem: Suppose that there are some light sources and many spherical balloons. All light sources have sizes small enough to be modeled as point light sources, and they emit light in all directions. The surfaces of the balloons absorb light and do not reflect light. Surprisingly in this world, balloons may overlap.

You want the total illumination intensity at an objective point as high as possible. For this purpose, some of the balloons obstructing lights can be removed. Because of the removal costs, however, there is a certain limit on the number of balloons to be removed. Thus, you would like to remove an appropriate set of balloons so as to maximize the illumination intensity at the objective point.

The following figure illustrates the configuration specified in the first dataset of the sample input given below. The figure shows the xy-plane, which is enough because, in this dataset, the z-coordinates of all the light sources, balloon centers, and the objective point are zero. In the figure, light sources are shown as stars and balloons as circles. The objective point is at the origin, and you may remove up to 4 balloons. In this case, the dashed circles in the figure correspond to the balloons to be removed.

<image>

Figure G.1: First dataset of the sample input.



Input

The input is a sequence of datasets. Each dataset is formatted as follows.

N M R
S1x S1y S1z S1r
...
SNx SNy SNz SNr
T1x T1y T1z T1b
...
TMx TMy TMz TMb
Ex Ey Ez


The first line of a dataset contains three positive integers, N, M and R, separated by a single space. N means the number of balloons that does not exceed 2000. M means the number of light sources that does not exceed 15. R means the number of balloons that may be removed, which does not exceed N.

Each of the N lines following the first line contains four integers separated by a single space. (Six, Siy, Siz) means the center position of the i-th balloon and Sir means its radius.

Each of the following M lines contains four integers separated by a single space. (Tjx, Tjy, Tjz) means the position of the j-th light source and Tjb means its brightness.

The last line of a dataset contains three integers separated by a single space. (Ex, Ey, Ez) means the position of the objective point.

Six, Siy, Siz, Tjx, Tjy, Tjz, Ex, Ey and Ez are greater than -500, and less than 500. Sir is greater than 0, and less than 500. Tjb is greater than 0, and less than 80000.

At the objective point, the intensity of the light from the j-th light source is in inverse proportion to the square of the distance, namely

Tjb / { (Tjx − Ex)2 + (Tjy − Ey)2 + (Tjz − Ez)2 },

if there is no balloon interrupting the light. The total illumination intensity is the sum of the above.

You may assume the following.

1. The distance between the objective point and any light source is not less than 1.
2. For every i and j, even if Sir changes by ε (|ε| < 0.01), whether the i-th balloon hides the j-th light or not does not change.


The end of the input is indicated by a line of three zeros.

Output

For each dataset, output a line containing a decimal fraction which means the highest possible illumination intensity at the objective point after removing R balloons. The output should not contain an error greater than 0.0001.

Example

Input

12 5 4
0 10 0 1
1 5 0 2
1 4 0 2
0 0 0 2
10 0 0 1
3 -1 0 2
5 -1 0 2
10 10 0 15
0 -10 0 1
10 -10 0 1
-10 -10 0 1
10 10 0 1
0 10 0 240
10 0 0 200
10 -2 0 52
-10 0 0 100
1 1 0 2
0 0 0
12 5 4
0 10 0 1
1 5 0 2
1 4 0 2
0 0 0 2
10 0 0 1
3 -1 0 2
5 -1 0 2
10 10 0 15
0 -10 0 1
10 -10 0 1
-10 -10 0 1
10 10 0 1
0 10 0 260
10 0 0 200
10 -2 0 52
-10 0 0 100
1 1 0 2
0 0 0
5 1 3
1 2 0 2
-1 8 -1 8
-2 -3 5 6
-2 1 3 3
-4 2 3 5
1 1 2 7
0 0 0
5 1 2
1 2 0 2
-1 8 -1 8
-2 -3 5 6
-2 1 3 3
-4 2 3 5
1 1 2 7
0 0 0
0 0 0


Output

3.5
3.6
1.1666666666666667
0.0

Solution (in CPP):

Solution:
#include <map>
#include <set>
#include <queue>
#include <stack>
#include <cmath>
#include <string>
#include <cctype>
#include <vector>
#include <cstdio>
#include <climits>
#include <cstdlib>
#include <cstring>
#include <iostream>
#include <algorithm>
using namespace std;
const double eps = 1e-8;
inline double sqr(double x){
	return x*x;
}
inline int sgn(double x){
	return x<-eps?-1:x>eps;
}
struct Point{
	double x,y,z;
	Point(){}
	Point(double a,double b,double c):
		x(a),y(b),z(c){}
	void input(){
		scanf("%lf%lf%lf",&x,&y,&z);
	}
	void output(){
		printf("%f %f %f\n",x,y,z);
	}
	bool operator == (const Point &p)const{
		return sgn(x - p.x) == 0 && sgn(y - p.y) == 0 && sgn(z - p.z) == 0;
	}
	Point operator * (double k)const{
		return Point(x*k, y*k, z*k);
	}
	Point operator / (double k)const{
		return Point(x/k, y/k, z/k);
	}
	Point operator + (const Point &p)const{
		return Point(x + p.x, y + p.y, z + p.z);
	}
	Point operator - (const Point &p)const{
		return Point(x - p.x, y - p.y, z - p.z);
	}
	double operator / (const Point &p)const{
		return x*p.x + y*p.y + z*p.z;
	}
	Point operator * (const Point &p)const{
		return Point(y*p.z - p.y*z, p.x*z - x*p.z, x*p.y - p.x*y);
	}
	double len2()const{
		return x*x + y*y + z*z;
	}
	double len()const{
		return sqrt(len2());
	}
	double dis2(const Point &p)const{
		return (*this - p).len2();
	}
	double dis(const Point &p)const{
		return (*this - p).len();
	}
	Point scale(double k)const{
		return sgn(len2())?(*this)*(k / len()):(*this);
	}
};
struct Line{
	Point a,b;
	Line(){}
	Line(const Point &x,const Point &y):
		a(x),b(y){}
	Point getVector()const{
		return b - a;
	}
	double len2()const{
		return a.dis2(b);
	}
	double len()const{
		return a.dis(b);
	}
	Point PointToLine(const Point &p)const{
		return a + ((b-a).scale(((b-a)/(p-a))/a.dis(b)));
	}
	double PointDis2Line(const Point &p)const{
		return ((b-a)*(p-a)).len2()/(a.dis2(b));
	}
	bool PointOnLine(const Point &p)const{
		return sgn(((p-a)*(b-a)).len2()) == 0;
	}
	bool PointOnSeg(const Point &p)const{
		return PointOnLine(p) && sgn((p-a)/(p-b))<=0;
	}
	double PointDis2Seg(const Point &p){
		if(PointOnLine(p)){
			if(PointOnSeg(p)) return 0;
			else return min(p.dis2(a),p.dis2(b));
		}
		Point v = PointToLine(p);
		if(PointOnSeg(v)) return PointDis2Line(p);
		else return min(p.dis2(a),p.dis2(b));
	}
	double PointDis2MaxSeg(const Point &p){
		return max(p.dis2(a),p.dis2(b));
	}
};
const int N = 2005,M = 15;
int n,m,k;
Point c[N];
double r[N];
Point d[M];
double g[M];
Point yd;
vector<int> jd[M];
void solve(Point p,vector<int> &v){
	v.clear();
	int cnt = 0;
	Line ln(p,yd);
	for(int i=0;i<n;i++){
		double dis = ln.PointDis2Seg(c[i]);
		if(dis <= r[i] && ln.PointDis2MaxSeg(c[i])>=r[i]){
			v.push_back(i);
			if(++cnt > k){
				//for(int i=0;i<cnt;i++)cout<<v[i]<<" ";
				//cout<<endl;
				return;
			}
		}
	}
	//for(int i=0;i<cnt;i++)cout<<v[i]<<" ";
	//cout<<endl;
}
bool ud[N];
double getg(int op){
	int cnt = 0;
	double ans = 0.0;
	memset(ud,0,n);
	for(int i=0;i<m;i++)if(op>>i&1){
		for(int j=0,sz=jd[i].size();j<sz;j++){
			int v = jd[i][j];
			if(!ud[v]) cnt++;
			if(cnt > k) return 0;
			ud[v] = 1;
		}
		ans += g[i];
	}
	return ans;
}
int main(){
	//freopen("in.txt", "r", stdin);
	while(scanf("%d%d%d",&n,&m,&k),n||m||k){
		for(int i=0;i<n;i++){
			c[i].input();
			scanf("%lf",r+i);
			r[i] *= r[i];
		}
		for(int i=0;i<m;i++){
			d[i].input();
			scanf("%lf",g+i);
		}
		yd.input();
		for(int i=0;i<m;i++){
			g[i] /= d[i].dis2(yd);
			solve(d[i],jd[i]);
		}
		double ans = 0.0;
		for(int i=0,ed=1<<m;i<ed;i++){
			ans = max(ans,getg(i));
		}
		printf("%.15f\n",ans);
	}
	return 0;
}