libsim Versione 7.1.11
|
◆ geo_coord_init()
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.
Definizione alla linea 379 del file geo_coord_class.F90. 380!! lies to the northeast of the second
381elemental FUNCTION geo_coord_ur(this, that) RESULT(res)
382TYPE(geo_coord),INTENT(IN) :: this, that
383LOGICAL :: res
384
385res = (this%ilon > that%ilon .AND. this%ilat > that%ilat)
386
387END FUNCTION geo_coord_ur
388
389
392elemental FUNCTION geo_coord_lle(this, that) RESULT(res)
393TYPE(geo_coord),INTENT(IN) :: this, that
394LOGICAL :: res
395
396res = (this%ilon <= that%ilon .AND. this%ilat <= that%ilat)
397
398END FUNCTION geo_coord_lle
399
|