Exemplo n.º 1
0
def id11(box):
    """
    Given a 4-tuple of (s, n, w, e), return
    an 11 character ID.
    """
    lat,lon = eqarea.centre(box)
    return '%+05.1f%+06.1f' % (lat,lon)
Exemplo n.º 2
0
def cells_logged(box, log='log/step5.log'):
    """
    Return the set of cells that are used in a particular box
    (by examining the step5 log file `log`).
    """

    try:
        box_i = int(box)
    except ValueError:
        pass
    else:
        from code import eqarea
        boxes = list(eqarea.grid())
        # Note: use Hansen's 1-based convention.
        bounds = boxes[box_i-1]
        centre = eqarea.centre(bounds)
        box = "LND@%+03.0f%+04.0fT" % tuple(centre)

    with open(log) as log:
        for row in log:
            row = row.split(' ', 2)
            if row[1] != 'cells':
                continue
            if box in row[0]:
                cells = json.loads(row[2])
                return set(cell[0] for cell in cells if cell[1] > 0)
Exemplo n.º 3
0
def id11frombox(s, bos):
    """Convert a record suffix (5 words) as it appears in the BX file
    into an 11 character V2 Mean style station identifier.

    The returned strings will be of the form BOX@+NN+EEE where "+NN" and
    "+EEE" gives the lat/lon of the box centre.
    """

    d = struct.unpack("%s5i" % bos, s)
    box = d[1:5]
    centre = eqarea.centre(box)
    return "BOX@%+03.0f%+04.0f" % centre
Exemplo n.º 4
0
def id11frombox(s, bos):
    """Convert a record suffix (5 words) as it appears in the BX file
    into an 11 character V2 Mean style station identifier.

    The returned strings will be of the form BOX@+NN+EEE where "+NN" and
    "+EEE" gives the lat/lon of the box centre.
    """

    d = struct.unpack("%s5i" % bos, s)
    box = d[1:5]
    centre = eqarea.centre(box)
    return "BOX@%+03.0f%+04.0f" % centre
Exemplo n.º 5
0
def blog20110106(arg):
    """Generates KML file for blog post.  One of the ccc-gistemp boxes,
    and the extended box used to do station culling.
    """

    from code import earth
    import math
    from code import eqarea

    p = (64.2,-90)
    d = 1200.0/earth.radius
    dd = math.degrees(d)

    circle = surfcircle(p, d)
    circle.append(circle[0])

    allboxes = list(eqarea.gridsub())
    # Let *box* be Boundaries of box in order: S, N, W, E.
    box,cells = allboxes[6]
    # Let *cells* be all the cells in that box.
    # Get the Northwest most cell.
    nwcell = max(cells, key=lambda x:x[1]-x[2])
    nwcentre = eqarea.centre(nwcell)
    s,n,w,e = box
    # List of coordinates for box 7.
    box7 = [(n,w), (n,e), (s,e), (s,w)]
    box7.append(box7[0])

    # "Extended" box.
    span = e-w
    ebox = [s-dd, n+dd, w-span/2, e+span/2]
    s,n,w,e = ebox
    # List of coordinate for extended box 7.
    ebox7 = [(n,w), (n,e), (s,e), (s,w)]
    ebox7.append(ebox7[0])

    circle2 = surfcircle(nwcentre, d)
    circle2.append(circle2[0])

    print """<?xml version="1.0" encoding="UTF-8"?>
<kml xmlns="http://www.opengis.net/kml/2.2">
<Document>
  <name>Station Culling</name>
""" + kmlpolystyle(color='aa0000ff', id='s0') + """
""" + kmlpolystyle(color='aaffffff', id='s1') + """
""" + kmlpolystyle(color='5500ff00', id='s2') + """
""" + kmlplace("1200 km circle", circle, style="#s0") + """
""" + kmlplace("circle at %r" % (nwcentre,), circle2, style="#s1") + """
""" + kmlplace("Culling Box", ebox7, style="#s2") + """
""" + kmlplace("Box 7", box7, style="#s1") + """
Exemplo n.º 6
0
def convert(inp, out):
    """Convert a file inp from subbox to V2 mean format."""

    # Clear Climate Code
    from code import eqarea

    v2 = gio.GHCNV2Writer(file=out, scale=0.01)

    subbox = iter(gio.SubboxReader(inp))
    # First record is metadata, which we ignore.
    subbox.next()
    for record in subbox:
        lat, lon = eqarea.centre(record.box)
        record.uid = '%+05.1f%+06.1fC' % (lat, lon)
        v2.write(record)
    v2.close()
Exemplo n.º 7
0
def convert(inp, out):
    """Convert a file inp from subbox to V2 mean format."""

    # Clear Climate Code
    from code import eqarea

    v2 = gio.GHCNV2Writer(file=out, scale=0.01)

    subbox = iter(gio.SubboxReader(inp))
    # First record is metadata, which we ignore.
    subbox.next()
    for record in subbox:
        lat,lon = eqarea.centre(record.box)
        record.uid = '%+05.1f%+06.1fC' % (lat,lon)
        v2.write(record)
    v2.close()
Exemplo n.º 8
0
def rectangle(out, latbound=(-90.0,+90.0), lonbound=(-180.0,+180.0)):
    """*latbound* should be a pair of (southernbound, northernbound),
    *lonbound* should be a pair of (westernbound, easternbound).
    On *out* will be written a step5mask file where every cell whose
    centre is within the specified rectangle will be marked as
    "1.000" and every other cell marked as "0.000".
    """

    from code import eqarea
    from code import giss_data

    s,n = latbound
    w,e = lonbound

    for cell in eqarea.grid8k():
        lat,lon = eqarea.centre(cell)
        if s <= lat < n and w <= lon < e:
            m = 1.0
        else:
            m = 0.0
        out.write("%sMASK%.3f\n" % (giss_data.boxuid(cell), m))
Exemplo n.º 9
0
def rectangle(out, latbound=(-90.0, +90.0), lonbound=(-180.0, +180.0)):
    """*latbound* should be a pair of (southernbound, northernbound),
    *lonbound* should be a pair of (westernbound, easternbound).
    On *out* will be written a step5mask file where every cell whose
    centre is within the specified rectangle will be marked as
    "1.000" and every other cell marked as "0.000".
    """

    from code import eqarea
    from code import giss_data

    s, n = latbound
    w, e = lonbound

    for cell in eqarea.grid8k():
        lat, lon = eqarea.centre(cell)
        if s <= lat < n and w <= lon < e:
            m = 1.0
        else:
            m = 0.0
        out.write("%sMASK%.3f\n" % (giss_data.boxuid(cell), m))