Fortran DO 循环语法错误

Bensun

       do n = 1, num_train
         read(1,210) n,(train(n,i),i=1,num_in)
       end do
上述程序语句在编译过程当中，提示，语法错误如下：Error: Variable 'n' at (1) cannot be redefined inside loop beginning at (2)
请问，哪位有这方面的经验，上述程序如何修改，谢谢！