Fortran

Fortran Coder 团队制作的视频特别适合自学和进阶的小伙伴：http://v.fcode.cn/
还有qq交流群分享学习：2338021

• Windows用户可以用 visual studio + parallel studio xe
  https://visualstudio.microsoft.com/ （Community版本免费）
  https://software.intel.com/en-us/parallel-studio-xe （有学生免费版）
  版本匹配问题详见Fortran Coder的网页：http://fcode.cn/codetools-6-1.html
• MacOS用户建议使用 gfortran

文件名随变量命名：

Character*10 :: kname
Integer :: k

Write(namek,'(I2)') k 
 !  I ：表示整数，浮点数表示为 (F5.2)
Open(182,file='k='//TRIM(ADJUSTL(namek))//'.dat')

文件续写不覆盖

open(123, file = 'new.dat', position = 'Append')

reshape的应用：

program main
    implicit none
    integer,parameter :: m = 2, n = 3, l = 4
    real*8 :: a(m,n), b(n,l), c(m,l)
    a = reshape((/1.0,2.0,3.0,4.0,5.0,6.0/),(/m,n/),order = (/2,1/))
    b = 1.0
    c = matmul(a,b)
    write(*,*)a
    write(*,*)c
end

gfortran 编译时，输出文件不同步：

write(197,*)  
flush(197)  !刷新通道号