double a[2][5]; for( i=0; i<4; i++){ data[0][i] = i; data[1][i] = i+5; } FILE *fp fp = fopen("save.sav", "wb"); if((fp == NULL)){ printf("file open error\n"); } else{ fwrite( &result, sizeof(data), (2*5), fp );/*fwrite関数でバイナリデータを保存出来る*/ } fclose( fp );
data=dblarr(5,2) openr,1,'ファイルのアドレス' readu,1,data close,1
IDL> print, data 1 2 3 4 5 6 7 8 9 10