check complex numbers

src/stream_cdf.c

@@ -361,15 +361,19 @@ int cdfInqDatatype(int xtype)
 #if  defined  (HAVE_LIBNETCDF)
 int cdfDefDatatype(int datatype)
 {
+  static char func[] = "cdfDefDatatype";
   int xtype;
 
-  if      ( datatype == DATATYPE_INT8  )  xtype = NC_BYTE;
-  else if ( datatype == DATATYPE_UINT8 )  xtype = NC_SHORT;
-  else if ( datatype == DATATYPE_INT16 )  xtype = NC_SHORT;
+  if ( datatype == DATATYPE_CPX32 || datatype == DATATYPE_CPX64 )
+    Error(func, "CDI/netCDF library does not support complex numbers!");
+
+  if      ( datatype == DATATYPE_INT8   ) xtype = NC_BYTE;
+  else if ( datatype == DATATYPE_UINT8  ) xtype = NC_SHORT;
+  else if ( datatype == DATATYPE_INT16  ) xtype = NC_SHORT;
   else if ( datatype == DATATYPE_UINT16 ) xtype = NC_INT;
-  else if ( datatype == DATATYPE_INT32 )  xtype = NC_INT;
+  else if ( datatype == DATATYPE_INT32  ) xtype = NC_INT;
   else if ( datatype == DATATYPE_UINT32 ) xtype = NC_INT;
-  else if ( datatype == DATATYPE_FLT64 )  xtype = NC_DOUBLE;
+  else if ( datatype == DATATYPE_FLT64  ) xtype = NC_DOUBLE;
   else                                    xtype = NC_FLOAT;
 
   return (xtype);

src/stream_grb.c

@@ -16,8 +16,12 @@
 
 int grbBitsPerValue(int datatype)
 {
+  static char func[] = "grbBitsPerValue";
   int bitsPerValue = 16;
 
+  if ( datatype == DATATYPE_CPX32 || datatype == DATATYPE_CPX64 )
+    Error(func, "CDI/GRIB library does not support complex numbers!");
+
   if ( datatype != CDI_UNDEFID )
     {
       if ( datatype > 0 && datatype <= 32 )

src/stream_ieg.c

@@ -47,8 +47,12 @@ int iegInqDatatype(int prec)
 
 int iegDefDatatype(int datatype)
 {
+  static char func[] = "iegDefDatatype";
   int prec;
 
+  if ( datatype == DATATYPE_CPX32 || datatype == DATATYPE_CPX64 )
+    Error(func, "CDI/IEG library does not support complex numbers!");
+
   if ( datatype != DATATYPE_FLT32 && datatype != DATATYPE_FLT64 )
     datatype = DATATYPE_FLT32;
 

src/stream_srv.c

@@ -45,8 +45,12 @@ int srvInqDatatype(int prec)
 
 int srvDefDatatype(int datatype)
 {
+  static char func[] = "srvDefDatatype";
   int prec;
 
+  if ( datatype == DATATYPE_CPX32 || datatype == DATATYPE_CPX64 )
+    Error(func, "CDI/SERVICE library does not support complex numbers!");
+
   if ( datatype != DATATYPE_FLT32 && datatype != DATATYPE_FLT64 )
     datatype = DATATYPE_FLT32;