integer :: a (10)