Matlab写入、Fortran读取二进制文件

Mankai_2022

已于 2022-10-14 09:22:17 修改

阅读量940

点赞数 1

分类专栏： Fortran matlab 文章标签：开发语言

于 2022-10-10 15:36:05 首次发布

本文链接：https://blog.csdn.net/weixin_44808352/article/details/127244606

版权

matlab 同时被 2 个专栏收录

5 篇文章 0 订阅

订阅专栏

Fortran

2 篇文章 0 订阅

订阅专栏

Matlab写入

clc;
clear;
close all;

sourcedata = zeros(2,2,3);
sourcedata(:,:,1) = [ 1.1 2.2 ; 3.3 5.5 ] ;
sourcedata(:,:,2) = [ 1.1 2.2 ; 3.3 6.5 ] ;
sourcedata(:,:,3) = [ 1.1 2.2 ; 3.3 5.5 ] ;

fid = fopen('IQDATA.bin','wb');
fwrite(fid,sourcedata,'double');

Fortran读取

program main

    implicit none
    
    integer :: i,j,k,n
    real(8) :: sourcedata(2,2,3)

    ! matlab定义的数据类型为double，是8个字节，因此recl=8
    open(unit=99,file='IQDATA.bin',access='direct',form='unformatted',recl=8)

    n = 1
    do k = 1,3
        do j = 1,2
            do i = 1,2
                read(99,rec=n) sourcedata(i,j,k)
                n = n+1
            end do
        end do
    end do

    close(99)
    print *, sourcedata(1,1,1)

end program