定义一个浮点型数组，名字叫 A，其大小为 3*3 其初始值分别为： 1,2,1,3,2,3,2,3,4 （九个数字） reshape 的意思是，将 1,2,1,3,2,3,2,3,4 这个一维数组重新划分形状，变为二维数组。它等同于 real::A(N,N) = (/(/1,2,1/),(/3,2,3/),(/2,3,4/)/)
