鍍金池/ 教程/ Java/ Fortran還原功能
Fortran還原功能
Fortran關(guān)系運(yùn)算符
Fortran運(yùn)算符優(yōu)先級(jí)
Fortran基本語(yǔ)法
Fortran文件輸入輸出
Fortran嵌套select case結(jié)構(gòu)
Fortran變量
Fortran Cycle語(yǔ)句
Fortran語(yǔ)言環(huán)境設(shè)置
Fortran數(shù)據(jù)類型
Fortran數(shù)組
Fortran字符
Fortran if...else if...else 語(yǔ)句
Fortran調(diào)試程序
Fortran編程風(fēng)格
Fortran if...then語(yǔ)句結(jié)構(gòu)
Fortran嵌套循環(huán)
Fortran常量
Fortran循環(huán)
Fortran導(dǎo)出數(shù)據(jù)類型
Fortran字符串
Fortran操作函數(shù)
Fortran do...while循環(huán)結(jié)構(gòu)
Fortran內(nèi)部函數(shù)
Fortran數(shù)字精度
Fortran選擇決策
Fortran重塑函數(shù)
Fortran運(yùn)算符
Fortran構(gòu)造函數(shù)
Fortran模塊
Fortran位置函數(shù)
Fortran數(shù)字
Fortran指針
Fortran算術(shù)運(yùn)算符
Fortran exit語(yǔ)句
Fortran動(dòng)態(tài)數(shù)組
Fortran嵌套if結(jié)構(gòu)
Fortran select case結(jié)構(gòu)
Fortran向量和矩陣乘法函數(shù)
Fortran邏輯運(yùn)算符
Fortran if...then...else 結(jié)構(gòu)
Fortran教程
Fortran過(guò)程
Fortran Stop語(yǔ)句
Fortran基本輸入輸出
Fortran do循環(huán)結(jié)構(gòu)
Fortran查詢函數(shù)

Fortran還原功能

下表描述了還原功能:

函數(shù) 描述
all(mask, dim) 它返回一個(gè)邏輯值,指明掩碼的所有關(guān)系是 .true。以及只有所需的維度,如果第二個(gè)參數(shù)是給定的。
any(mask, dim) 它返回一個(gè)邏輯值,指明掩碼的任何關(guān)系是.true。以及只有所需的維度,如果第二個(gè)參數(shù)是給定的。
count(mask, dim) 它返回一個(gè)數(shù)字值,該值為掩碼為 .true 關(guān)系的數(shù)目。以及所需的維數(shù),如果第二個(gè)參數(shù)給出。
maxval(array, dim, mask) 它返回 的數(shù)組的數(shù)組中最大的值,那些遵守于第三個(gè)參數(shù)掩碼的關(guān)系,如果一個(gè)給定的,以及具有只有所需的維數(shù),如果第二個(gè)參數(shù) dim給出的。
minval(array, dim, mask) 它返回?cái)?shù)組的數(shù)組中那些遵守于第三個(gè)參數(shù)掩碼的關(guān)系的最小值,如果一個(gè)給定的,以及具有僅在第二個(gè)參數(shù) dim 給出所期望的維度。
product(array, dim, mask) 它返回該產(chǎn)品遵守于第三個(gè)參數(shù)掩碼的關(guān)系,如果一個(gè)給定的,以及具有只有所需的維數(shù),如果第二個(gè)參數(shù) dim 給出的所有數(shù)組的數(shù)組中的元素,。
sum (array, dim, mask) 它返回 遵守于第三個(gè)參數(shù)掩碼關(guān)系的總和,如果給定以及具有只有所需的維數(shù),如果第二個(gè)參數(shù) dim給出的所有數(shù)組的數(shù)組中的元素。

例子

下面的例子演示了這一概念:

program arrayReduction

   real, dimension(3,2) :: a 
   a = reshape( (/5,9,6,10,8,12/), (/3,2/) ) 
   
   Print *, all(a>5)
   Print *, any(a>5)
   Print *, count(a>5)
   Print *, all(a>=5 .and. a<10)
  
end program arrayReduction

當(dāng)上述代碼被編譯和執(zhí)行時(shí),它產(chǎn)生了以下結(jié)果:

F
T
5
F

實(shí)例

下面的例子演示了這一概念:

program arrayReduction
implicit none

   real, dimension(1:6) :: a = (/ 21.0, 12.0,33.0, 24.0, 15.0, 16.0 /)
   Print *, maxval(a)
   Print *, minval(a)
   Print *, sum(a)
   Print *, product(a)
   
end program arrayReduction 

當(dāng)上述代碼被編譯和執(zhí)行時(shí),它產(chǎn)生了以下結(jié)果:

33.0000000    
12.0000000    
121.000000    
47900160.0