File: fort-dim.c

package info (click to toggle)
netcdf-fortran 4.4.4%2Bds-2
  • links: PTS, VCS
  • area: main
  • in suites: stretch
  • size: 8,420 kB
  • ctags: 8,797
  • sloc: fortran: 51,087; f90: 20,357; sh: 11,601; ansic: 7,034; makefile: 548; pascal: 313; xml: 173
file content (56 lines) | stat: -rw-r--r-- 1,165 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
/*
This file is part of the netCDF Fortran 77 API.

This file handles the netCDF dimension functions.

Copyright 2006, University Corporation for Atmospheric Research. See
the COPYRIGHT file for copying and redistribution conditions.

$Id: fort-dim.c,v 1.3 2006/08/16 03:56:51 ed Exp $
*/

#include <config.h>
#include "netcdf.h"
#include "ncfortran.h"


/*
 * Define a netCDF dimension.
 */
FCALLSCFUN4(NF_INT, nc_def_dim, NF_DEF_DIM, nf_def_dim,
	    NCID, STRING, COUNT, PDIMID)


/*
 * Obtain a netCDF dimension's index.
 */
FCALLSCFUN3(NF_INT, nc_inq_dimid, NF_INQ_DIMID, nf_inq_dimid,
	    NCID, STRING, PDIMID)


/*
 * Inquire about a netCDF dimension.
 */
FCALLSCFUN4(NF_INT, nc_inq_dim, NF_INQ_DIM, nf_inq_dim,
	    NCID, DIMID, PSTRING, PCOUNT)


/*
 * Obtain a netCDF dimension's name.
 */
FCALLSCFUN3(NF_INT, nc_inq_dimname, NF_INQ_DIMNAME, nf_inq_dimname,
	    NCID, DIMID, PSTRING)


/*
 * Obtain a netCDF dimension's length.
 */
FCALLSCFUN3(NF_INT, nc_inq_dimlen, NF_INQ_DIMLEN, nf_inq_dimlen,
	    NCID, DIMID, PCOUNT)


/*
 * Rename a netCDF dimension.
 */
FCALLSCFUN3(NF_INT, nc_rename_dim, NF_RENAME_DIM, nf_rename_dim,
	    NCID, DIMID, STRING)