libsim Versione 7.2.6

◆ geo_coord_getval()

elemental subroutine geo_coord_getval ( type(geo_coord), intent(in) this,
real(kind=fp_geo), intent(out), optional lon,
real(kind=fp_geo), intent(out), optional lat,
integer(kind=int_l), intent(out), optional ilon,
integer(kind=int_l), intent(out), optional ilat )
private

Restituisce il valore di uno o più componenti di un oggetto geo_coord.

Qualsiasi combinazione dei parametri opzionali è consentita; se il tipo di coordinata richiesta non è stato inizializzato né calcolato, restituisce il corrispondente valore mancante.

Parametri
[in]thisoggetto di cui restituire i componenti
[out]lonlongitudine geografica
[out]latlatitudine geografica
[out]iloninteger longitudine geografica (nint(lon*1.e5)
[out]ilatinteger latitudine geografica (nint(lat*1.e5)

Definizione alla linea 410 del file geo_coord_class.F90.

411!> Legge da un'unità di file il contenuto dell'oggetto \a this.
412!! Il record da leggere deve essere stato scritto con la ::write_unit
413!! e, nel caso \a this sia un vettore, la lunghezza del record e quella
414!! del vettore devono essere accordate. Il metodo controlla se il file è
415!! aperto per un I/O formattato o non formattato e fa la cosa giusta.
416SUBROUTINE geo_coord_read_unit(this, unit)
417TYPE(geo_coord),INTENT(out) :: this !< oggetto da leggere
418INTEGER, INTENT(in) :: unit !< unità da cui leggere
419
420CALL geo_coord_vect_read_unit((/this/), unit)
421
422END SUBROUTINE geo_coord_read_unit

Generated with Doxygen.