Frees storage allocated for allocatable arrays and pointer targets.
It takes the following form:
DEALLOCATE (object [,object]...[,STAT=sv])
object Is a structure component or the name of a variable,
and must be a pointer or allocatable array.
sv Is a scalar integer variable in which the status
of the deallocation is stored.
If a STAT variable is specified, it must not be deallocated in the
DEALLOCATE statement in which it appears. If the deallocation is
successful, the variable is set to zero. If the deallocation is
not successful, an error condition occurs, and the variable is set
to a positive integer value (representing the run-time error). If
no STAT variable is specified and an error condition occurs,
program execution terminates.
It is recommended that all explicitly allocated storage be
explicitly deallocated when it is no longer needed.
For information on deallocation of allocatable arrays and pointer
targets, see the HP Fortran for OpenVMS Language Reference Manual.
EXAMPLES:
The following is an example of the DEALLOCATE statement:
INTEGER ALLOC_ERR
REAL, ALLOCATABLE :: A(:), B(:,:)
...
ALLOCATE (A(10), B(-2:8,1:5))
...
DEALLOCATE(A, B, STAT = ALLOC_ERR)