/* * creates binary example files for the MPI-2 I/O demo programs * * IN1: 100 Integer a[i] = 100-i * IN2 100x100 Integer b[i][j] = 1000*i+j */ #include <stdio.h> #define FILE1 "IN1" #define SIZE1 100 #define FILE2 "IN2" #define SIZE2 100 void main(int argc, char *argv[]) { FILE *fp; int a[SIZE1]; int b[SIZE2][SIZE2]; int i, j; /* File 1 */ for (i=0;i<SIZE1;i++) { a[i] = SIZE1 - i; } fp = fopen(FILE1, "wb"); fwrite(a, sizeof(int), SIZE1, fp); fclose(fp); /* File 2 */ for (i=0;i<SIZE2;i++) { for (j=0;j<SIZE2;j++) { b[i][j] = 1000*i+j; } } fp = fopen(FILE2, "wb"); fwrite(b, sizeof(int), SIZE2*SIZE2, fp); fclose(fp); }