6.156 MOVE_ALLOC — Move allocation from one object to another

Description:

MOVE_ALLOC(SRC, DEST) moves the allocation from SRC to DEST. SRC will become deallocated in the process.

Standard:

F2003 and later

Class:

Subroutine

Syntax:

CALL MOVE_ALLOC(SRC, DEST)

Arguments:

SRC	ALLOCATABLE, INTENT(INOUT), may be of any type and kind.
DEST	ALLOCATABLE, INTENT(OUT), shall be of the same type, kind and rank as SRC

Return value:

None

Example:

          program test_move_alloc
              integer, allocatable :: a(:), b(:)
          
              allocate(a(3))
              a = [ 1, 2, 3 ]
              call move_alloc(a, b)
              print *, allocated(a), allocated(b)
              print *, b
          end program test_move_alloc