initial checkin from subversion

dateifd.c

@@ -0,0 +1,26 @@
+#include <stdio.h>
+#include <stdlib.h>
+int main ()
+{
+FILE * fp;
+int i;
+double dwert;
+fp = fopen ("double.dat","wb");
+if (fp == NULL)
+  {
+  fprintf(stderr,"\nKein Öffnen.\n");
+  exit (3);
+  }
+dwert = 1.001;
+for (i = 0; i < 200; i++)
+  {
+  if (fwrite(&dwert,sizeof(dwert),1,fp) !=1)
+    {
+    fprintf(stderr,"\nKein Schreiben\n");
+    fclose (fp);
+    exit (4);
+    }
+  dwert += 0.002;
+  }
+return (fclose (fp));
+}