|
◆ geo_coord_init()
subroutine geo_coord_init |
( |
type(geo_coord) |
this, |
|
|
real(kind=fp_geo), intent(in), optional |
lon, |
|
|
real(kind=fp_geo), intent(in), optional |
lat, |
|
|
integer(kind=int_l), intent(in), optional |
ilon, |
|
|
integer(kind=int_l), intent(in), optional |
ilat |
|
) |
| |
Costruisce un oggetto geo_coord con i parametri opzionali forniti.
Se sono presenti lon e lat, inizializza le coordinate geografiche ignorando utme e utmn, mentre se sono specificati utme e utmn succede il contrario; non è possibile specificare le coordinate in entrambi i sistemi, usare eventualmente to_geo. Se non viene passato nessun parametro opzionale l'oggetto è inizializzato a valore mancante.
- Parametri
-
| this | oggetto da inizializzare |
[in] | lon | longitudine geografica |
[in] | lat | latitudine geografica |
[in] | ilon | integer longitudine geografica (nint(lon*1.e5) |
[in] | ilat | integer latitudine geografica (nint(lat*1.e5) |
Definizione alla linea 384 del file geo_coord_class.F90.
385 res = (this%ilon > that%ilon .AND. this%ilat > that%ilat) 387 END FUNCTION geo_coord_ur 392 elemental FUNCTION geo_coord_lle(this, that) RESULT(res) 393 TYPE(geo_coord), INTENT(IN) :: this, that 396 res = (this%ilon <= that%ilon .AND. this%ilat <= that%ilat) 398 END FUNCTION geo_coord_lle 402 elemental FUNCTION geo_coord_ll(this, that) RESULT(res) 403 TYPE(geo_coord), INTENT(IN) :: this, that
|