libsim  Versione6.3.0

◆ geo_coordvect_delete()

subroutine geo_coordvect_delete ( type(geo_coordvect), intent(inout)  this)

Distrugge l'oggetto in maniera pulita, liberando l'eventuale spazio dinamicamente allocato.

Definizione alla linea 768 del file geo_coord_class.F90.

768  IF (ns > 0) THEN ! Alloco e leggo il mio oggetto
769  ALLOCATE(this(ns))
770  this(:)%vtype = shptype
771  DO i = 1, ns
772  CALL import(this(i), shphandle=shphandle, nshp=i-1)
773  ENDDO

Generated with Doxygen.