FREE

 FREE (integer)

 Class:  Intrinsic subroutine

 Frees a block of memory that is currently allocated.

 The argument must be of type INTEGER*8.  This value is the starting
 address of the memory to be freed, previously allocated by the
 MALLOC intrinsic function.

 If the freed address was not previously allocated by MALLOC, or if
 an address is freed more than once, results are unpredictable.

 Examples:

 Consider the following:

 INTEGER(4) ADDR, SIZE
 SIZE = 1024                 ! Size in bytes
 ADDR = MALLOC(SIZE)         ! Allocate the memory
 CALL FREE(ADDR)             ! Free it
 END