在優化程序的過程中發現其中存在大量的派生類型變量(type)，同時發現Fortran子程序可以接受type類型數組中元素，即將type類型中元素當作獨立的數組傳遞。傳遞過程如下所示:

...

為了測試派生類型數組傳遞的速度，編寫如下程序進行對比

module

更改不同的num值可以得到程序耗時結果，

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

使用module將變量封裝在不同模塊中，子程序使用不同module來達到傳遞變量的作用。經過上述的程序可以發現使用type數組類型和使用數組在子程序中的耗時是一致的，說明子程序在傳遞函數的過程中會將type數組轉變為數組，同時在運算之后會傳遞回去。

將type中的元素直接定義為數組，在需要傳遞數組時直接傳遞type中數組。在實踐的過程中往往需要的是動態數組，如果type中的元素過多，在使用時可能會導致各元素大小不一致，需要額外的檢查程序。

總結

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

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。