Changeset 7 for trunk/include/ncutil.h

Timestamp:

03/07/11 11:49:01 (13 years ago)

Author:

jbrlod

Message:

rst write

File:

• trunk/include/ncutil.h (modified) (4 diffs)

trunk/include/ncutil.h

@@ -8 +8 @@
 #include <netcdf.h>
 
+#define YYDOUBLE //équivalent du YDOUBLE/YFLOAT de YAO
+//normalement YYDOUBLE et YBOUBLE doivent être définis en même temps
+//Verifié dans appli_start
+
+
+#ifdef YFLOAT
+#define NC_REAL NC_FLOAT
+#define nc_put_vara_real nc_put_vara_float
+#define YREAL float
+#else
+#define NC_REAL NC_DOUBLE
+#define nc_put_vara_real nc_put_vara_double
+#define YREAL double
+#endif
 
 void    handle_error (int status, char *txt);///*fonction de message d'erreur
@@ -23 +37 @@
 // renvoie un vecteur de dim znbval*ynbval*xnbval
 
+void voncwrite(int t,int znbval,int ynbval, int xnbval, char const *var_name,int ncid,int dimids[], YREAL vect[]);
+
+
 void sonclire(int t,int ynbval, int xnbval, int ncid, int varid, double vect[]);
 void sonclire(int t,int ynbval, int xnbval, int ncid, int varid, float vect[]);
@@ -31 +48 @@
 // lit la variable varid aux points (t,1:ynbval,1:xnbval) et
 // renvoie un vecteur de dim ynbval*xnbval
+void snclire(int ynbval, int xnbval, int ncid, int varid, float vect[]);
+void snclire(int ynbval, int xnbval, int ncid, int varid, double vect[]);
+
+void soncwrite(int t,int ynbval, int xnbval, char const *var_name,int ncid,int dimids[], YREAL vect[]);
 
 void zonclire(int t,int znbval, int ncid, int varid, double vect[]);
@@ -40 +61 @@
 // renvoie un vecteur de dim znbval
 
+void znclire(int znbval, int ncid, int varid, float vect[]);
+void znclire(int znbval, int ncid, int varid, double vect[]);
+
+void zoncwrite(int t,int znbval,char const *var_name,int ncid,int dimids[], YREAL vect[]);
+
+void zncwrite(int znbval,char const *var_name,int ncid,int dimids[], YREAL vect[]);
+void sncwrite(int ynbval, int xnbval, char const *var_name,int ncid,int dimids[], YREAL vect[]);
 #endif