Skip to content
Snippets Groups Projects
Commit 9b23977b authored by Florian Prill's avatar Florian Prill
Browse files

[cdi-tiles] Added plain example.

parent 2d338ae3
No related branches found
No related tags found
No related merge requests found
......@@ -17,6 +17,7 @@ app/printinfo.h -text
basic_test/Makefile -text
basic_test/example.f90 -text
basic_test/main.c -text
basic_test/main_plain.c -text
/cdi.settings.in -text
config/compile -text
config/config.guess -text
......
......@@ -15,3 +15,8 @@ xce:
ftn -I../build/include cdilib.o example.f90 -L${NETCDF_DIR}/lib ${GRIB_API_LIB} -lgrib_api -lnetcdff -lnetcdf -o example
clean:
rm -f main main.o example cdilib.o
plain:
gcc ${CFLAGS} -I../build/include -c main_plain.c -o main_plain.o
gcc -L../build/lib64 main_plain.o -lcdi -o main_plain
LD_LIBRARY_PATH=$LD_LIBRARY_PATH:../build/lib64 ./main_plain
#include <stdlib.h>
#include <cdi.h>
int main(void) {
printf("\ncdi-tiles example\n-----------------\n\n");
/* Register additional GRIB keys which are read when file is opened. */
cdiDefAdditionalKey("identificationNumberOfTile");
cdiDefAdditionalKey("attribute");
int streamID = streamOpenRead("test.grb");
/* loop over variables */
int vlistID = streamInqVlist(streamID);
int nvars = streamInqNvars(streamID);
int
identificationNumberOfTile = 4,
attribute = 4;
printf("identificationNumberOfTile = %d\n", identificationNumberOfTile);
printf("attribute = %d\n\n", attribute);
for (int varID=0; varID<nvars; varID++)
{
char name[CDI_MAX_NAME];
vlistInqVarName(vlistID, varID, name);
printf("variable %-10.10s\n", name);
}
streamClose(streamID);
printf("done.\n");
return 0;
}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment