DEALLOCATE

 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)