libsim  Versione6.3.0

◆ geo_coordvect_init()

recursive subroutine geo_coordvect_init ( type(geo_coordvect), intent(out)  this,
real(kind=fp_geo), dimension(:), intent(in), optional  lon,
real(kind=fp_geo), dimension(:), intent(in), optional  lat 
)

Costruisce un oggetto geo_coordvect 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. Il numero di punti dell'oggetto finale sarà uguale all'estensione del più breve vettore della coppia fornita.

Parametri
[out]thisoggetto da inizializzare
[in]lonlongitudine geografica
[in]latlatitudine geografica

Definizione alla linea 747 del file geo_coord_class.F90.

747  CALL import(this(i), unitsim=u)
748  ENDDO
749  ENDIF
750 20 CONTINUE
751  CLOSE(u)
752  IF (.NOT.ASSOCIATED(this)) THEN
753  CALL raise_warning('file '//trim(shpfilesim)//' vuoto o corrotto')
754  ENDIF
755  RETURN
756 30 CONTINUE
757  CALL raise_error('Impossibile aprire il file '//trim(shpfile))
758  RETURN
759 
760 ELSE IF (PRESENT(shpfile)) THEN
761 #ifdef HAVE_SHAPELIB

Generated with Doxygen.