|
◆ griddim_get_val()
subroutine griddim_get_val |
( |
type(griddim_def), intent(in) | this, |
|
|
integer, intent(out), optional | nx, |
|
|
integer, intent(out), optional | ny, |
|
|
double precision, intent(out), optional | xmin, |
|
|
double precision, intent(out), optional | xmax, |
|
|
double precision, intent(out), optional | ymin, |
|
|
double precision, intent(out), optional | ymax, |
|
|
double precision, intent(out), optional | dx, |
|
|
double precision, intent(out), optional | dy, |
|
|
integer, intent(out), optional | component_flag, |
|
|
type(geo_proj), intent(out), optional | proj, |
|
|
character(len=*), intent(out), optional | proj_type, |
|
|
double precision, intent(out), optional | lov, |
|
|
integer, intent(out), optional | zone, |
|
|
double precision, intent(out), optional | xoff, |
|
|
double precision, intent(out), optional | yoff, |
|
|
double precision, intent(out), optional | longitude_south_pole, |
|
|
double precision, intent(out), optional | latitude_south_pole, |
|
|
double precision, intent(out), optional | angle_rotation, |
|
|
double precision, intent(out), optional | longitude_stretch_pole, |
|
|
double precision, intent(out), optional | latitude_stretch_pole, |
|
|
double precision, intent(out), optional | stretch_factor, |
|
|
double precision, intent(out), optional | latin1, |
|
|
double precision, intent(out), optional | latin2, |
|
|
double precision, intent(out), optional | lad, |
|
|
integer, intent(out), optional | projection_center_flag, |
|
|
double precision, intent(out), optional | ellips_smaj_axis, |
|
|
double precision, intent(out), optional | ellips_flatt, |
|
|
integer, intent(out), optional | ellips_type ) |
Query the object content.
- Parametri
-
[in] | this | object to be queried |
[out] | nx | number of points along the x axis |
[out] | ny | number of points along the y axis |
[out] | xmin | longitudini e latitudini minime e massime |
[out] | xmax | longitudini e latitudini minime e massime |
[out] | ymin | longitudini e latitudini minime e massime |
[out] | ymax | longitudini e latitudini minime e massime |
[out] | ymax | grid extremes in projection units (degrees or meters depending on the projection type) |
[out] | dx | grid steps in x and y directions |
[out] | dy | grid steps in x and y directions |
[out] | component_flag | Resolved u- and v- components of vector quantities relative to 0=the easterly and northerly directions 1=the defined grid in the direction of increasing x and y (or i and j) coordinates respectively (0=north, 128=south) |
[out] | proj | the complete projection object associated |
[out] | proj_type | type of projection |
[out] | lov | line of view, also known as reference longitude or orientation of the grid (polar projections) |
[out] | zone | Earth zone (mainly for UTM), sets lov to the correct zone central meridian |
[out] | xoff | offset on x axis (false easting) |
[out] | yoff | offset on y axis (false northing) |
[out] | longitude_south_pole | longitude of the southern pole of projection |
[out] | latitude_south_pole | latitude of the southern pole of projection |
[out] | angle_rotation | angle of rotation of projection |
[out] | longitude_stretch_pole | longitude of the pole of stretching |
[out] | latitude_stretch_pole | latitude of the pole of stretching |
[out] | stretch_factor | stretching factor |
[out] | latin1 | first standard latitude from main pole (Lambert) |
[out] | latin2 | second standard latitude from main pole (Lambert) |
[out] | lad | latitude at which dx and dy (in m) are specified (Lambert, grib2 only) |
[out] | projection_center_flag | flag indicating which pole is represented |
[out] | ellips_smaj_axis | Earth semi-major axis |
[out] | ellips_flatt | Earth flattening |
[out] | ellips_type | number in the interval [1,nellips] indicating a predefined ellipsoid, alternative to the previous arguments |
Definizione alla linea 652 del file grid_class.F90.
659res = this%proj == that%proj .AND. &
660 this%grid == that%grid
661
662END FUNCTION grid_eq
663
664
665ELEMENTAL FUNCTION griddim_eq(this, that) RESULT(res)
666TYPE(griddim_def),INTENT(IN) :: this, that
667LOGICAL :: res
668
669res = this%grid == that%grid .AND. &
670 this%dim == that%dim
671
672END FUNCTION griddim_eq
673
674
675ELEMENTAL FUNCTION grid_ne(this, that) RESULT(res)
676TYPE(grid_def),INTENT(IN) :: this, that
677LOGICAL :: res
678
679res = .NOT.(this == that)
680
681END FUNCTION grid_ne
682
683
684ELEMENTAL FUNCTION griddim_ne(this, that) RESULT(res)
685TYPE(griddim_def),INTENT(IN) :: this, that
686LOGICAL :: res
687
688res = .NOT.(this == that)
689
690END FUNCTION griddim_ne
691
692
698SUBROUTINE griddim_import_grid_id(this, ingrid_id)
699#ifdef HAVE_LIBGDAL
700USE gdal
701#endif
702TYPE(griddim_def),INTENT(inout) :: this
703TYPE(grid_id),INTENT(in) :: ingrid_id
704
705#ifdef HAVE_LIBGRIBAPI
706INTEGER :: gaid
707#endif
|