Iri*_*eda 1 arrays size fortran
所以我有这样的事情：
INTEGER i REAL value(10) DO i = 1,5 value(i) = 1 ENDDO
所以现在我的值=（1,1,1,1,1,0,0,0,0,0）。给定size = 5（不带零的数组的大小）的函数是什么？
Vla*_*r F 5
只计算非零元素
print *, count(value/=0)
归档时间：
8 年，10 月 前
查看次数：
1798 次
最近记录：