Problem: Mr. Denjiro is a science teacher. Today he has just received a specially ordered water tank that will certainly be useful for his innovative experiments on water flow.

<image>
---
Figure 1: The water tank

The size of the tank is 100cm (Width) * 50cm (Height) * 30cm (Depth) (see Figure 1). For the experiments, he fits several partition boards inside of the tank parallel to the sideboards. The width of each board is equal to the depth of the tank, i.e. 30cm. The height of each board is less than that of the tank, i.e. 50 cm, and differs one another. The boards are so thin that he can neglect the thickness in the experiments.

<image>
---
Figure 2: The front view of the tank

The front view of the tank is shown in Figure 2.

There are several faucets above the tank and he turns them on at the beginning of his experiment. The tank is initially empty. Your mission is to write a computer program to simulate water flow in the tank.



Input

The input consists of multiple data sets. D is the number of the data sets.

D
DataSet1
DataSet2
...
DataSetD


The format of each data set (DataSetd , 1 <= d <= D) is as follows.

N
B1 H1
B2 H2
...
BN HN
M
F1 A1
F2 A2
...
FM AM
L
P1 T1
P2 T2
...
PL TL


Each line in the data set contains one or two integers.

N is the number of the boards he sets in the tank . Bi and Hi are the x-position (cm) and the height (cm) of the i-th board, where 1 <= i <= N .

Hi s differ from one another. You may assume the following.

> 0 < N < 10 ,
>  0 < B1 < B2 < ... < BN < 100 ,
>  0 < H1 < 50 , 0 < H2 < 50 , ..., 0 < HN < 50.

M is the number of the faucets above the tank . Fj and Aj are the x-position (cm) and the amount of water flow (cm3/second) of the j-th faucet , where 1 <= j <= M .

There is no faucet just above any boards . Namely, none of Fj is equal to Bi .

You may assume the following .

> 0 < M <10 ,
>  0 < F1 < F2 < ... < FM < 100 ,
>  0 < A1 < 100, 0 < A2 < 100, ... 0 < AM < 100.

L is the number of observation time and location. Pk is the x-position (cm) of the k-th observation point. Tk is the k-th observation time in seconds from the beginning.

None of Pk is equal to Bi .

You may assume the following .

> 0 < L < 10 ,
>  0 < P1 < 100, 0 < P2 < 100, ..., 0 < PL < 100 ,
>  0 < T1 < 1000000, 0 < T2 < 1000000, ... , 0 < TL < 1000000.

Output

For each data set, your program should output L lines each containing one real number which represents the height (cm) of the water level specified by the x-position Pk at the time Tk.

Each answer may not have an error greater than 0.001. As long as this condition is satisfied, you may output any number of digits after the decimal point.

After the water tank is filled to the brim, the water level at any Pk is equal to the height of the tank, that is, 50 cm.

Example

Input

2
5
15 40
35 20
50 45
70 30
80 10
3
20 3
60 2
65 2
6
40 4100
25 7500
10 18000
90 7000
25 15000
25 22000
5
15 40
35 20
50 45
70 30
80 10
2
60 4
75 1
3
60 6000
75 6000
85 6000


Output

0.666667
21.4286
36.6667
11.1111
40.0
50.0
30.0
13.3333
13.3333

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
/*
  l:テ・ツキツヲテァツォツッ
  r:テ・ツ渉ウテァツォツッ
  h:テァツ渉セテ・ツ慊ィテ」ツ?ョテヲツーツエテ、ツスツ?
  w:1テァツァツ津」ツ?づ」ツ?淌」ツつ甘」ツ?ョテヲツーツエテ」ツ?ョテゥツ??
  lkabe:テ・ツキツヲテ」ツ?ョテ・ツ」ツ?」ツ?ョテゥツォツ佚」ツ??
  rkabe:テ・ツキツヲテ」ツ?ョテ・ツ」ツ?」ツ?ョテゥツォツ佚」ツ??
*/
const double EPS = 1e-8; 
struct dat{double l,r,h,w,lkabe,rkabe;};
typedef pair<double,double> P;
typedef pair<P,int> PP;
vector<dat> A;

double getMinTime(){
  double res = 1e9;
  for(dat a:A){
    if(a.w==0)continue;
    double t = ((min(a.lkabe,a.rkabe) - a.h)*(a.r-a.l)*30)/a.w;
    res = min(res,t);
  }
  return res;
}

dat Merge(dat l,dat r){
  dat res;
  res.l = l.l;
  res.r = r.r;
  res.h = min(r.h,l.h);
  res.w = l.w + r.w;
  res.lkabe = l.lkabe;
  res.rkabe = r.rkabe;
  return res;
}

bool replace(int idx,int flg){
  A[idx+flg].w += A[idx].w;
  A[idx].w = 0;
  if(abs(A[idx+flg].h-A[idx].h)>EPS) return 0 ;
  if(flg == 1) A[idx] = Merge(A[idx],A[idx+1]);
  if(flg == -1)A[idx] = Merge(A[idx-1],A[idx]);
  A.erase(A.begin()+idx+flg);
  return 1;
}

void adTime(double sec){
  for(int i=0;i<(int)A.size();i++){
    if(A[i].w==0)continue;
    A[i].h += (sec*A[i].w)/(30*(A[i].r-A[i].l));
  }

  int update = 1;
  while(update){
    update = 0;
    for(int i=0;i<(int)A.size();i++){
      if(A[i].w==0)continue;
      
      if(A[i].lkabe<=A[i].h+EPS){ update=1,replace(i,-1);break;}
      else if(A[i].rkabe<=A[i].h+EPS) { update=1,replace(i,1);break;}
    } 
  }
}

void sim(double t){
  while(t){
    double sec = min(t,getMinTime());
    assert(sec>=0);
    adTime(sec);
    t -=sec;
  }
}


double getH(int x){
  for(int i=0;i<(int)A.size();i++) if(A[i].l<x && x<A[i].r) return A[i].h;
  return -1;
}

int main(){
  int q;
  cin>>q;
  while(q--){
    int n;
    cin>>n;
    A.resize(n+1);
    double l=0,r,lkabe=1e15,rkabe;
    for(int i=0;i<n; i++,l=r,lkabe = rkabe){
      cin>>r>>rkabe;
      A[i] = (dat){l,r,0,0,lkabe,rkabe};
      if(i==n-1) A[n] = (dat){r,100,0,0,rkabe,1e15};
    }
    
    int m;
    cin>>m;
    for(int i=0,x,w;i<m;i++){
      cin>>x>>w;
      for(dat &a:A) if(a.l<x&&x<a.r)a.w+=w;
    }
    int L;
    cin>>L;
    vector<PP> que(L);
    for(int i=0;i<L;i++)cin>>que[i].first.second>>que[i].first.first,que[i].second = i;
    sort(que.begin(),que.end());
    
    vector<double>ans(L);
    int sec=0;
    for(int i=0;i<L;i++){
      double x =que[i].first.second,t = que[i].first.first;
      int idx = que[i].second;
      sim(t-sec);
      ans[idx] = min(50.0,getH(x));
      sec = t;
    }

    for(int i=0;i<L;i++)printf("%.8f\n",ans[i]);
  }
  return 0;
}