"Fossies" - the Fresh Open Source Software Archive

Member "netcdf-fortran-4.4.5/libsrc/fort-dim.c" (31 Jan 2019, 1165 Bytes) of package /linux/misc/netcdf-fortran-4.4.5.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) C and C++ source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. For more information about "fort-dim.c" see the Fossies "Dox" file reference documentation.

    1 /*
    2 This file is part of the netCDF Fortran 77 API.
    3 
    4 This file handles the netCDF dimension functions.
    5 
    6 Copyright 2006, University Corporation for Atmospheric Research. See
    7 the COPYRIGHT file for copying and redistribution conditions.
    8 
    9 $Id: fort-dim.c,v 1.3 2006/08/16 03:56:51 ed Exp $
   10 */
   11 
   12 #include <config.h>
   13 #include "netcdf.h"
   14 #include "ncfortran.h"
   15 
   16 
   17 /*
   18  * Define a netCDF dimension.
   19  */
   20 FCALLSCFUN4(NF_INT, nc_def_dim, NF_DEF_DIM, nf_def_dim,
   21         NCID, STRING, COUNT, PDIMID)
   22 
   23 
   24 /*
   25  * Obtain a netCDF dimension's index.
   26  */
   27 FCALLSCFUN3(NF_INT, nc_inq_dimid, NF_INQ_DIMID, nf_inq_dimid,
   28         NCID, STRING, PDIMID)
   29 
   30 
   31 /*
   32  * Inquire about a netCDF dimension.
   33  */
   34 FCALLSCFUN4(NF_INT, nc_inq_dim, NF_INQ_DIM, nf_inq_dim,
   35         NCID, DIMID, PSTRING, PCOUNT)
   36 
   37 
   38 /*
   39  * Obtain a netCDF dimension's name.
   40  */
   41 FCALLSCFUN3(NF_INT, nc_inq_dimname, NF_INQ_DIMNAME, nf_inq_dimname,
   42         NCID, DIMID, PSTRING)
   43 
   44 
   45 /*
   46  * Obtain a netCDF dimension's length.
   47  */
   48 FCALLSCFUN3(NF_INT, nc_inq_dimlen, NF_INQ_DIMLEN, nf_inq_dimlen,
   49         NCID, DIMID, PCOUNT)
   50 
   51 
   52 /*
   53  * Rename a netCDF dimension.
   54  */
   55 FCALLSCFUN3(NF_INT, nc_rename_dim, NF_RENAME_DIM, nf_rename_dim,
   56         NCID, DIMID, STRING)