How to write an unformatted binary file in MATLAB that will be read in FORTRAN

3 views (last 30 days)
I have tried the following code, but I keep getting the following error:
The code I used to write the file in MATLAB is as follows:
a = [1 2; 3 4];
fid = fopen('K,'wb');
fwrite(fid,a,'*double');
fclose(fid);
The code I used to read the matrix in FORTAN is the following:
C =============================================================================
INTEGER N
PARAMETER N = 2
INTEGER LDA
PARAMETER LDA = N
CHARACTER K
DOUBLE PRECISION A( LDA, N )
OPEN ( UNIT = 1, FILE = "K", FORM = "unformatted",
$ STATUS = "old" )
READ (1) A
CLOSE (1)
C Check whether it produced the correct matrix
WRITE (*,*) A(1,1)
WRITE (*,*) A(1,2)
WRITE (*,*) A(2,1)
WRITE (*,*) A(2,2)
END
I would like the code to have the same effect as me just manually putting the matrix in FORTRAN as shown in the following:
DATA A/
$1, 2,
$3, 4,
$ /

Answers (0)

Categories

Find more on Fortran with MATLAB in Help Center and File Exchange

Tags

Products


Release

R2018b

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!