在優(yōu)化程序的過程中發(fā)現(xiàn)其中存在大量的派生類型變量(type)，同時(shí)發(fā)現(xiàn)Fortran子程序可以接受type類型數(shù)組中元素，即將type類型中元素當(dāng)作獨(dú)立的數(shù)組傳遞。傳遞過程如下所示:

...

為了測試派生類型數(shù)組傳遞的速度，編寫如下程序進(jìn)行對(duì)比

module

更改不同的num值可以得到程序耗時(shí)結(jié)果，

從表格中可以看出傳遞type數(shù)組中元素所耗時(shí)間是直接傳遞數(shù)組所需時(shí)間的3倍，當(dāng)然兩種數(shù)組的大小應(yīng)該在10000000以上才能體現(xiàn)差別。盡管在傳遞數(shù)組中元素在程序編寫上很方便，但是程序中存在需要頻繁傳遞變量的子程序時(shí)需要格外的注意。避免傳遞type數(shù)組額外耗時(shí)的解決方案：

使用module將變量封裝在不同模塊中，子程序使用不同module來達(dá)到傳遞變量的作用。經(jīng)過上述的程序可以發(fā)現(xiàn)使用type數(shù)組類型和使用數(shù)組在子程序中的耗時(shí)是一致的，說明子程序在傳遞函數(shù)的過程中會(huì)將type數(shù)組轉(zhuǎn)變?yōu)閿?shù)組，同時(shí)在運(yùn)算之后會(huì)傳遞回去。

將type中的元素直接定義為數(shù)組，在需要傳遞數(shù)組時(shí)直接傳遞type中數(shù)組。在實(shí)踐的過程中往往需要的是動(dòng)態(tài)數(shù)組，如果type中的元素過多，在使用時(shí)可能會(huì)導(dǎo)致各元素大小不一致，需要額外的檢查程序。

總結(jié)

以上是生活随笔為你收集整理的fortran subroutine_Fortran:派生数组与数组传递进子程序耗费时间比较的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。