Fortran 向量数组下标

vec = [1, 5, 4, 9]
b = a(vec)
a(vec) = b
! 如果包含同一数字，则不能用于赋值左边！