简单阅读csv文件教程代码给出了错误

Question

在Windows10中使用GNU fortran编译器的Fortran的CodeBlocks 17.12

我对Fortran完全陌生，并且想通过下面的简单教程代码使用Fortran读取csv文件。但是，它给我一个错误：“程序收到信号SIGSEGV：分段错误-无效的存储器引用。”我完全迷路了。

这个问题可能太简单了，但是如果有人可以给我建议，我真的很感激。

    program readSimpleCSV
      implicit none
      integer, parameter :: n = 5
      real x, y, z
      integer i
      open (17, file='book1.csv', status='old')
      read (17, '()')      ! skipping the header
      do i = 1, n
        read (17, *) x, y, z
        print *, x, y, z
      end do
      close (17)
    end program readSimpleCSV

csv文件：“ book1.csv”如下

    X,Y,Z
    1.2,3.4,5.0
    2.2,3.3,6.2
    0.3,2.1,5.98
    4.2,3.6,1.25
    5.03,2.3,3.44