mirror of https://github.com/ecmwf/eccodes.git
20 lines
397 B
Modula-2
20 lines
397 B
Modula-2
# (C) Copyright 2005- ECMWF.
|
|
|
|
# Predefined grid 25
|
|
|
|
constant Ni = 72;
|
|
constant Nj = 19;
|
|
|
|
constant longitudeOfFirstGridPoint = 0;
|
|
constant longitudeOfLastGridPoint = 355000;
|
|
|
|
constant latitudeOfFirstGridPoint = 0;
|
|
constant latitudeOfLastGridPoint = 90000;
|
|
|
|
constant iDirectionIncrement = 5000;
|
|
constant jDirectionIncrement = 5000;
|
|
|
|
constant numberOfDataPoints=1368;
|
|
constant numberOfValues=1297 ;
|
|
|