Fortran写nc文件 f90 netcdf

netCDF的教程例子，用Fortran95把数据写到文件中

编译：gfortran  ****.f90 -I/usr/local/include -L/usr/local/lib -lnetcdff -o test1

运行：./test1

源代码：

program simple_xy_wr
  use netcdf
  implicit none

  ! 定义数据文件的名称

  character (len = *), parameter :: FILE_NAME = "simple_xy.nc"

  ! 写一个12*6的二维数据
  integer, parameter :: NDIMS = 2
  integer, parameter :: NX = 6, NY = 12

  ! 当创建netCDF文件的时候，变量和维数都有一个对应的ID

  integer :: ncid, varid, dimids(NDIMS)
  integer :: x_dimid, y_dimid
 
  ! 要保存到文件的数据数组

  integer, dimension(:,:), allocatable :: data_out

 

  ! 为数据数组分配内存

  allocate(data_out(NY, NX))

  ! 随意往数据数组里写一些数据