test_pointer_remap -

INTERFACE:

    logical function test_pointer_remap()

DESCRIPTION:

Tests the support of pointer remapping. USES:

    IMPLICIT NONE

LOCAL VARIABLES:

    REALTYPE,dimension(3,2),target  :: t2d
    REALTYPE,dimension(:,:),pointer :: p2d