writegrid subroutine¶
Write NetCDF files.
How to use¶
-
subroutine
writegrid
(ifile, idata[, headerfile])¶ Parameters: Options: headerfile :: text file with metadata informations [character] [optional] [1]
Return: file :: NetCDF dataset
Call : writegrid(ifile,idata[,headerfile])
[1] | (1, 2, 3) Defined by user |
[Code example] Write data to NetCDF¶
Read netCDF temperature (°C) data, converts it to Farenheit and write other file.
program main
use fpl
implicit none
!Definition of dataset structure
!Variable to be read is float type, with 4 dimensions (longitude (float), latitude (float), time(float) and level(float))
type(nc4d_float_llf_tf_lf) :: tempC
character(len=32) :: input, output
input = "database/temp.mon.nc"
output = "database/temp.mon.farenheit.nc"
!Definition of attributes for reading the dataset
tempC%varname = "temp"
tempC%lonname = "longitude"
tempC%latname = "latitude"
tempC%timename = "time"
tempC%levelname = "level"
!Reads data from file
call readgrid(input, tempC)
!Convertion Celsius to Farenheit
where(tempC%ncdata.ne.tempC%FillValue) tempC%ncdata = (tempC%ncdata*9/5)+32
!Definition of new variable unit
tempC%varunits = "degF"
!Write the data on file
call writegrid(output, tempC)
end program main
#RedHat based systems
gfortran -o writegrid.out writegrid.f90 -I/usr/lib64/gfortran/modules/ -lFPL
#Debian based systems
gfortran -o writegrid.out writegrid.f90 -I/usr/include/ -lFPL
Important
-I<dir>
This option specifies where to put .mod files for compiled modules. It is also added to the list of directories to Influencing the linking step. See the GNU Fortran Compiler Documentation .
<dir>
is defined in Makefile as $(FPL_moddir)
. See Build Library.
After compilation run the program ./writegrid.out