libsim  Versione6.3.0

◆ 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
thisoggetto da inizializzare
[in]lonlongitudine geografica
[in]latlatitudine geografica
[in]iloninteger longitudine geografica (nint(lon*1.e5)
[in]ilatinteger latitudine geografica (nint(lat*1.e5)

Definizione alla linea 399 del file geo_coord_class.F90.

399 
402 elemental FUNCTION geo_coord_ll(this, that) RESULT(res)
403 TYPE(geo_coord),INTENT(IN) :: this, that
404 LOGICAL :: res
405 
406 res = (this%ilon < that%ilon .AND. this%ilat < that%ilat)
407 
408 END FUNCTION geo_coord_ll
409 
410 
416 SUBROUTINE geo_coord_read_unit(this, unit)
417 TYPE(geo_coord),INTENT(out) :: this
418 INTEGER, INTENT(in) :: unit
419 

Generated with Doxygen.