Skip to content

Instantly share code, notes, and snippets.

@ibarraespinosa

ibarraespinosa/netcdf.f77

Created December 8, 2018 23:23
Show Gist options
  • Save ibarraespinosa/5104daa72f867765837e64c9c280414f to your computer and use it in GitHub Desktop.
Save ibarraespinosa/5104daa72f867765837e64c9c280414f to your computer and use it in GitHub Desktop.
Download ZIP
Raw
netcdf.f77
$cat test_nc.f
PROGRAM TEST_NC
IMPLICIT NONE
include 'netcdf.inc'
INTEGER ncid, nc_err
nc_err = nf_open('test.nc', nf_nowrite, ncid)
nc_err = nf_close(ncid)
END PROGRAM TEST_NC
$gfortran test_nc.f -o test_nc `nf-config --fflags --flibs`
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment