f_coord.f90 File Reference

Demonstrates 3D surface temperature with time, lat, lon coordinate variables (Fortran) More...

Functions/Subroutines
program	f_coord
subroutine	handle_err (status)

Detailed Description

Demonstrates 3D surface temperature with time, lat, lon coordinate variables (Fortran)

This is the Fortran equivalent of coord.c, demonstrating 3D surface temperature data with time, latitude, and longitude coordinate variables following CF conventions. The program creates a surface temperature dataset on a 4x5 lat/lon grid with 3 time steps using the Fortran 90 NetCDF API.

Learning Objectives:

• Work with 3D data in Fortran (time, lat, lon)
• Define time coordinate variables with CF conventions
• Use the CF calendar attribute for time coordinates
• Add the coordinates attribute to data variables (CF best practice)
• Handle Fortran column-major array ordering for multi-dimensional data

Key Fortran Concepts:

• Array Ordering: sfc_temp(NLON, NLAT, NTIME) vs C sfc_temp[NTIME][NLAT][NLON]
• Dimension Order: dimids = (/lon_dimid, lat_dimid, time_dimid/) reversed from C
• 1-Based Indexing: Loop indices start at 1, adjust formula accordingly
• Character Attributes: nf90_put_att handles string length automatically

Prerequisites:

• f_coord_vars.f90 - 2D coordinate variables in Fortran
• coord.c - C equivalent for comparison

Related Examples:

• coord.c - C equivalent
• f_coord_vars.f90 - 2D version without time dimension
• f_unlimited_dim.f90 - Unlimited dimensions in Fortran
• f_var4d.f90 - 4D data in Fortran

Compilation:

gfortran -o f_coord f_coord.f90 -lnetcdff -lnetcdf

Usage:

./f_coord
ncdump f_coord.nc

Author

Edward Hartnett, Intelligent Data Design, Inc.

Date

2026

Function/Subroutine Documentation

f_coord()

program f_coord

handle_err()

subroutine f_coord::handle_err

(

integer, intent(in)

status

)