program pointers
    INTEGER, POINTER :: val1
end program
