libsim Versione 7.2.0
|
◆ geo_coord_vect_write_unit()
Scrive su un'unità di file il contenuto dell'oggetto this. Il record scritto potrà successivamente essere letto con la ::read_unit. Il metodo controlla se il file è aperto per un I/O formattato o non formattato e fa la cosa giusta.
Definizione alla linea 654 del file geo_coord_class.F90. 655#endif
656 nshp)
657TYPE(geo_coordvect), INTENT(INOUT) :: this
658INTEGER,OPTIONAL,INTENT(IN) :: unitsim
659#ifdef HAVE_SHAPELIB
660TYPE(shpfileobject),OPTIONAL,INTENT(INOUT) :: shphandle
661#endif
662INTEGER,OPTIONAL,INTENT(IN) :: nshp
663
664INTEGER :: i, lnshp
665#ifdef HAVE_SHAPELIB
666TYPE(shpobject) :: shpobj
667#endif
668
669IF (PRESENT(unitsim)) THEN
|