Problem: Each item in the game has a level. The higher the level is, the higher basic parameters the item has. We shall consider only the following basic parameters: attack (atk), defense (def) and resistance to different types of impact (res).

Each item belongs to one class. In this problem we will only consider three of such classes: weapon, armor, orb.

Besides, there's a whole new world hidden inside each item. We can increase an item's level travelling to its world. We can also capture the so-called residents in the Item World

Residents are the creatures that live inside items. Each resident gives some bonus to the item in which it is currently located. We will only consider residents of types: gladiator (who improves the item's atk), sentry (who improves def) and physician (who improves res).

Each item has the size parameter. The parameter limits the maximum number of residents that can live inside an item. We can move residents between items. Within one moment of time we can take some resident from an item and move it to some other item if it has a free place for a new resident. We cannot remove a resident from the items and leave outside — any of them should be inside of some item at any moment of time.

Laharl has a certain number of items. He wants to move the residents between items so as to equip himself with weapon, armor and a defensive orb. The weapon's atk should be largest possible in the end. Among all equipping patterns containing weapon's maximum atk parameter we should choose the ones where the armor’s def parameter is the largest possible. Among all such equipment patterns we should choose the one where the defensive orb would have the largest possible res parameter. Values of the parameters def and res of weapon, atk and res of armor and atk and def of orb are indifferent for Laharl.

Find the optimal equipment pattern Laharl can get.

Input

The first line contains number n (3 ≤ n ≤ 100) — representing how many items Laharl has.

Then follow n lines. Each line contains description of an item. The description has the following form: "name class atk def res size" — the item's name, class, basic attack, defense and resistance parameters and its size correspondingly. 

  * name and class are strings and atk, def, res and size are integers. 
  * name consists of lowercase Latin letters and its length can range from 1 to 10, inclusive. 
  * class can be "weapon", "armor" or "orb". 
  * 0 ≤ atk, def, res ≤ 1000. 
  * 1 ≤ size ≤ 10. 



It is guaranteed that Laharl has at least one item of each class.

The next line contains an integer k (1 ≤ k ≤ 1000) — the number of residents.

Then k lines follow. Each of them describes a resident. A resident description looks like: "name type bonus home" — the resident's name, his type, the number of points the resident adds to the item's corresponding parameter and the name of the item which currently contains the resident. 

  * name, type and home are strings and bonus is an integer. 
  * name consists of lowercase Latin letters and its length can range from 1 to 10, inclusive. 
  * type may be "gladiator", "sentry" or "physician". 
  * 1 ≤ bonus ≤ 100. 



It is guaranteed that the number of residents in each item does not exceed the item's size.

The names of all items and residents are pairwise different.

All words and numbers in the input are separated by single spaces.

Output

Print on the first line the name of the weapon in the optimal equipping pattern; then print the number of residents the weapon contains; then print the residents' names.

Print on the second and third lines in the same form the names of the armor and defensive orb as well as the residents they contain. 

Use single spaces for separation.

If there are several possible solutions, print any of them.

Examples

Input

4
sword weapon 10 2 3 2
pagstarmor armor 0 15 3 1
iceorb orb 3 2 13 2
longbow weapon 9 1 2 1
5
mike gladiator 5 longbow
bobby sentry 6 pagstarmor
petr gladiator 7 iceorb
teddy physician 6 sword
blackjack sentry 8 sword


Output

sword 2 petr mike 
pagstarmor 1 blackjack 
iceorb 2 teddy bobby 


Input

4
sword weapon 10 2 3 2
pagstarmor armor 0 15 3 1
iceorb orb 3 2 13 2
longbow weapon 9 1 2 1
6
mike gladiator 5 longbow
bobby sentry 6 pagstarmor
petr gladiator 7 iceorb
teddy physician 6 sword
blackjack sentry 8 sword
joe physician 6 iceorb


Output

longbow 1 mike 
pagstarmor 1 bobby 
iceorb 2 petr joe 

Note

In the second sample we have no free space inside the items, therefore we cannot move the residents between them.

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
struct subj {
  string name;
  int sz;
  int val;
};
int main() {
  int n;
  cin >> n;
  vector<subj> atk, def, res;
  for (int i = 0; i < n; ++i) {
    string name, clss;
    int i1, i2, i3, sz;
    cin >> name >> clss >> i1 >> i2 >> i3 >> sz;
    subj cur;
    cur.name = name, cur.sz = sz;
    if (clss == "weapon") {
      cur.val = i1;
      atk.push_back(cur);
    } else if (clss == "armor") {
      cur.val = i2;
      def.push_back(cur);
    } else if (clss == "orb") {
      cur.val = i3;
      res.push_back(cur);
    }
  }
  map<string, int> insubj;
  map<string, int> insubjv1, insubjv2, insubjv3;
  map<string, vector<string> > insubjn;
  int k;
  cin >> k;
  vector<pair<int, string> > ratk, rdef, rres;
  for (int i = 0; i < k; ++i) {
    string name, type, home;
    int bonus;
    cin >> name >> type >> bonus >> home;
    insubj[home]++;
    insubjn[home].push_back(name);
    pair<int, string> cur(bonus, name);
    if (type == "gladiator") {
      ratk.push_back(cur);
      insubjv1[home] += bonus;
    } else if (type == "sentry") {
      rdef.push_back(cur);
      insubjv2[home] += bonus;
    } else if (type == "physician") {
      rres.push_back(cur);
      insubjv3[home] += bonus;
    }
  }
  bool allf = true;
  for (size_t i = 0; i < atk.size(); ++i) {
    if (atk[i].sz != insubj[atk[i].name]) allf = false;
  }
  for (size_t i = 0; i < def.size(); ++i) {
    if (def[i].sz != insubj[def[i].name]) allf = false;
  }
  for (size_t i = 0; i < res.size(); ++i) {
    if (res[i].sz != insubj[res[i].name]) allf = false;
  }
  if (allf) {
    int mval = -1, mind = -1;
    for (size_t i = 0; i < atk.size(); ++i) {
      int cv = atk[i].val + insubjv1[atk[i].name];
      if (cv > mval) {
        mval = cv;
        mind = i;
      }
    }
    const vector<string>& v1 = insubjn[atk[mind].name];
    cout << atk[mind].name << ' ' << v1.size();
    for (size_t i = 0; i < v1.size(); ++i) cout << ' ' << v1[i];
    cout << '\n';
    mval = -1, mind = -1;
    for (size_t i = 0; i < def.size(); ++i) {
      int cv = def[i].val + insubjv2[def[i].name];
      if (cv > mval) {
        mval = cv;
        mind = i;
      }
    }
    const vector<string>& v2 = insubjn[def[mind].name];
    cout << def[mind].name << ' ' << v2.size();
    for (size_t i = 0; i < v2.size(); ++i) cout << ' ' << v2[i];
    cout << '\n';
    mval = -1, mind = -1;
    for (size_t i = 0; i < res.size(); ++i) {
      int cv = res[i].val + insubjv3[res[i].name];
      if (cv > mval) {
        mval = cv;
        mind = i;
      }
    }
    const vector<string>& v3 = insubjn[res[mind].name];
    cout << res[mind].name << ' ' << v3.size();
    for (size_t i = 0; i < v3.size(); ++i) cout << ' ' << v3[i];
    cout << '\n';
    return 0;
  }
  sort(ratk.begin(), ratk.end(), greater<pair<int, string> >());
  sort(rdef.begin(), rdef.end(), greater<pair<int, string> >());
  sort(rres.begin(), rres.end(), greater<pair<int, string> >());
  int qatk = -1, qdef = -1, qres = -1;
  int natk = -1, ndef = -1, nres = -1;
  for (size_t i = 0; i < atk.size(); ++i) {
    const subj& th = atk[i];
    const vector<pair<int, string> >& vls = ratk;
    int csum = th.val;
    for (int j = 0; j < (int)vls.size() && j < th.sz; ++j) csum += vls[j].first;
    if (csum > qatk) {
      qatk = csum;
      natk = i;
    }
  }
  for (size_t i = 0; i < def.size(); ++i) {
    const subj& th = def[i];
    const vector<pair<int, string> >& vls = rdef;
    int csum = th.val;
    for (int j = 0; j < (int)vls.size() && j < th.sz; ++j) csum += vls[j].first;
    if (csum > qdef) {
      qdef = csum;
      ndef = i;
    }
  }
  for (size_t i = 0; i < res.size(); ++i) {
    const subj& th = res[i];
    const vector<pair<int, string> >& vls = rres;
    int csum = th.val;
    for (int j = 0; j < (int)vls.size() && j < th.sz; ++j) csum += vls[j].first;
    if (csum > qres) {
      qres = csum;
      nres = i;
    }
  }
  vector<string> aatk, adef, ares;
  int i = 0;
  while (i < atk[natk].sz && i < (int)ratk.size()) {
    aatk.push_back(ratk[i].second);
    ++i;
  }
  ratk.erase(ratk.begin(), ratk.begin() + i);
  i = 0;
  while (i < def[ndef].sz && i < (int)rdef.size()) {
    adef.push_back(rdef[i].second);
    ++i;
  }
  rdef.erase(rdef.begin(), rdef.begin() + i);
  i = 0;
  while (i < res[nres].sz && i < (int)rres.size()) {
    ares.push_back(rres[i].second);
    ++i;
  }
  rres.erase(rres.begin(), rres.begin() + i);
  while (!ratk.empty()) {
    string cur = ratk.back().second;
    if ((int)adef.size() != def[ndef].sz)
      adef.push_back(cur);
    else if ((int)ares.size() != res[nres].sz)
      ares.push_back(cur);
    ratk.pop_back();
  }
  while (!rdef.empty()) {
    string cur = rdef.back().second;
    if ((int)aatk.size() != atk[natk].sz)
      aatk.push_back(cur);
    else if ((int)ares.size() != res[nres].sz)
      ares.push_back(cur);
    rdef.pop_back();
  }
  while (!rres.empty()) {
    string cur = rres.back().second;
    if ((int)aatk.size() != atk[natk].sz)
      aatk.push_back(cur);
    else if ((int)adef.size() != def[ndef].sz)
      adef.push_back(cur);
    rres.pop_back();
  }
  cout << atk[natk].name << ' ' << aatk.size();
  for (size_t i = 0; i < aatk.size(); ++i) cout << ' ' << aatk[i];
  cout << '\n';
  cout << def[ndef].name << ' ' << adef.size();
  for (size_t i = 0; i < adef.size(); ++i) cout << ' ' << adef[i];
  cout << '\n';
  cout << res[nres].name << ' ' << ares.size();
  for (size_t i = 0; i < ares.size(); ++i) cout << ' ' << ares[i];
  cout << '\n';
  return 0;
}