[問題] 如何知道矩陣大小

[s06yji3 (阿南)]

我想將a(:,1:m)的內容用loop寫出來
例如
DO i=1, k
DO j=1, m
write(*,*)a(i,j)
END DO
END DO

但是我不知道a(:,1:m)中，括號中前面的:有多大，也就是說不知道k要設多少。
(因為這是一個套裝軟體的某一個
source code，目前我還沒找到哪個subroutine會call他去計算。)
所以沒辦法寫出來。
直接寫出來是沒問題，但是會相當雜亂，資料也非常多，
為了方便閱讀以及做下一步處理，所以我想用loop寫出來。

請問FORTRAN有沒有類似MATLAB的指令
如
b=[1,2,3,4,5]
length(b)=5
我即可知道b裡面有五個元素
甚至我可以寫成

for i=1,length(b)
...
end

就可以將元素一一列出來

謝謝指教

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.109.112.98
※ 編輯: s06yji3         來自: 140.109.112.98       (02/24 20:24)
推 charlesdc:如果是查詢矩陣有多少元素的話 SIZE(array,[,dim]) 試試
→ charlesdc:B(2:4,-3:1) a=size(B) !a=15  ; a=size(b,dim=2) !a=5
→ s06yji3:謝謝