1 C Copyright 1981-2016 ECMWF.
2 C
3 C This software is licensed under the terms of the Apache Licence
4 C Version 2.0 which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
5 C
6 C In applying this licence, ECMWF does not waive the privileges and immunities
7 C granted to it by virtue of its status as an intergovernmental organisation
8 C nor does it submit to any jurisdiction.
9 C
10       INTEGER QG200(200)
11       DATA QG200/
12      X  18,  25,  36,  40,
13      X  45,  50,  60,  64,
14      X  72,  72,  75,  81,
15      X  90,  96, 100, 108,
16      X 120, 125, 128, 135,
17      X 144, 150, 160, 160,
18      X 180, 180, 180, 192,
19      X 192, 200, 216, 216,
20      X 225, 225, 240, 240,
21      X 243, 250, 256, 270,
22      X 270, 288, 288, 288,
23      X 300, 300, 320, 320,
24      X 320, 320, 360, 360,
25      X 360, 360, 360, 360,
26      X 375, 375, 375, 384,
27      X 400, 400, 400, 400,
28      X 432, 432, 432, 432,
29      X 432, 450, 450, 450,
30      X 480, 480, 480, 480,
31      X 480, 480, 486, 500,
32      X 500, 500, 512, 512,
33      X 512, 540, 540, 540,
34      X 540, 540, 576, 576,
35      X 576, 576, 576, 576,
36      X 576, 576, 600, 600,
37      X 600, 600, 600, 640,
38      X 640, 640, 640, 640,
39      X 640, 640, 640, 640,
40      X 640, 648, 648, 675,
41      X 675, 675, 675, 675,
42      X 675, 675, 720, 720,
43      X 720, 720, 720, 720,
44      X 720, 720, 720, 720,
45      X 720, 720, 720, 720,
46      X 729, 729, 729, 750,
47      X 750, 750, 750, 750,
48      X 750, 750, 750, 768,
49      X 768, 768, 768, 768,
50      X 768, 768, 768, 800,
51      X 800, 800, 800, 800,
52      X 800, 800, 800, 800,
53      X 800, 800, 800, 800,
54      X 800, 800, 800, 800,
55      X 800, 800, 800, 800,
56      X 800, 800, 800, 800,
57      X 800, 800, 800, 800,
58      X 800, 800, 800, 800,
59      X 800, 800, 800, 800,
60      X 800, 800, 800, 800,
61      X 800, 800, 800, 800 /
62