The result is an array of the same type as SOURCE and has rank n+1 where n equals the rank of SOURCE . Example: PROGRAM test_spread INTEGER :: a = 1, b(2) = (/ ...
確定! 回上一頁