	   program test
	   integer a(20)
       do 10 i = 1, 20
         a(i) = i
10	   continue
       end
