|
◆ geo_coord_vect_write_unit()
subroutine geo_coord_class::geo_coord_vect_write_unit |
( |
type(geo_coord), dimension(:), intent(in) |
this, |
|
|
integer, intent(in) |
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.
- Parametri
-
[in] | this | oggetto da scrivere |
[in] | unit | unità su cui scrivere |
Definizione alla linea 665 del file geo_coord_class.F90.
666 TYPE(shpobject) :: shpobj 669 IF ( PRESENT(unitsim)) THEN 670 IF (this%vsize > 0) THEN 672 WRITE(unitsim,*) SIZE(this%ll,1),-1.,5000.,-0.1,1.1, 'Area' 674 WRITE(unitsim,*)(this%ll(i,1:2), i=1,this%vsize) 676 CALL raise_warning( 'oggetto geo_coordvect vuoto, non scrivo niente in '// & 677 trim(to_char(unitsim)))
|