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
|
#include <stdlib.h>
#include "grib2.h"
void g2_free(gribfield *gfld)
//$$$ SUBPROGRAM DOCUMENTATION BLOCK
// . . . .
// SUBPROGRAM: g2_free
// PRGMMR: Gilbert ORG: W/NP11 DATE: 2002-10-28
//
// ABSTRACT: This routine frees up memory that was allocated for
// struct gribfield.
//
// PROGRAM HISTORY LOG:
// 2002-10-28 Gilbert
//
// USAGE: g2_free(gribfield *gfld)
// ARGUMENT:
// gfld - pointer to gribfield structure (defined in include file grib2.h)
// returned from routine g2_getfld.
//
// REMARKS: This routine must be called to free up memory used by
// the decode routine, g2_getfld, when user no longer needs to
// reference this data.
//
// ATTRIBUTES:
// LANGUAGE: C
// MACHINE:
//
//$$$
{
if (gfld->idsect != 0 ) free(gfld->idsect);
if (gfld->local != 0 ) free(gfld->local);
if (gfld->list_opt != 0 ) free(gfld->list_opt);
if (gfld->igdtmpl != 0 ) free(gfld->igdtmpl);
if (gfld->ipdtmpl != 0 ) free(gfld->ipdtmpl);
if (gfld->coord_list != 0 ) free(gfld->coord_list);
if (gfld->idrtmpl != 0 ) free(gfld->idrtmpl);
if (gfld->bmap != 0 ) free(gfld->bmap);
if (gfld->fld != 0 ) free(gfld->fld);
free(gfld);
return;
}
|
