MOVE_ALLOC
— Move allocation from one object to anotherMOVE_ALLOC(FROM, TO)
moves the allocation from FROM to
TO. FROM will become deallocated in the process.
CALL MOVE_ALLOC(FROM, TO)
FROM | ALLOCATABLE , INTENT(INOUT) , may be
of any type and kind.
|
TO | ALLOCATABLE , INTENT(OUT) , shall be
of the same type, kind and rank as FROM.
|
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