fortran90程序設計chapter13

1、第十三章第十三章接口與模塊接口與模塊13.113.1接口界面塊接口界面塊在調(diào)用執(zhí)行外部子程序時一般要用EXTERNAL語句對調(diào)用的外部子程序進行聲明但這種聲明只給出外部子程序名并沒有給出外部函數(shù)子程序名和參數(shù)的類型。由于主調(diào)程序單元與外部子程序獨立編寫分別編譯所以僅聲明子程序名有時系統(tǒng)難以獲得外部子程序詳細、準確的調(diào)用信息從而無法正確編譯導致程序調(diào)用失敗。FTRAN90新增接口界面塊功能可有效解決這些問題同時還能提高程序的可讀性。接口界

2、面塊可用在主程序單元、模塊單元、外部子程序單元中以指明主調(diào)程序與被調(diào)用外部子程序之間的接口信息以便保證外部子程序的正確使用。例如使用接口界面塊求三個整數(shù)最大值的示例程序如下:!主程序單元PROGRAMmainIMPLICITNONEINTERFACEFUNCTIONmax3(abc)IMPLICITNONEINTEGERmax3abcENDFUNCTIONENDINTERFACEINTEGERxyzREADxyzWRITE(“(1X三個

3、數(shù)的最大值為:I4)“)max3(xyz)END!求三個整數(shù)最大值的外部函數(shù)子程序FUNCTIONmax3(abc)INTEGERmax3abcmaxmax=aIF(Bmax)max=BIF(Cmax)max=Cmax3=maxENDFUNCTION第十三章接口與模塊366SUBROUTINEP2(A1A2)INTEGERDIMENSION(4050)::A1A2ENDSUBROUTINE!定義矩陣相乘函數(shù)F1接口界面FUNCTIONF

4、1(XY)INTEGERDIMENSION(5050)::F1XYENDFUNCTION!定義計算向量X和Y內(nèi)積的函數(shù)F2接口界面FUNCTIONF2(XY)REALF2X(10)Y(10)ENDFUNCTIONENDINTERFACE接口界面塊定義后在調(diào)用其定義的外部子程序時可使用關(guān)鍵詞指定實在參數(shù)允許改變實在參數(shù)傳遞位置如:CALLP1(matrix1matrix2matrix3)!按形參定義次序依次傳遞CALLP1(A=matri

5、x1C=matrix3B=matrix2)!按指定形參關(guān)鍵字傳遞CALLP1(A=matrix1C=matrix3)!B數(shù)組內(nèi)容區(qū)默認值13.213.2模塊模塊外部子程序為人們提供了一種并行設計、共享使用子程序的有效機制對提高程序設計質(zhì)量和效率有很大幫助。外部子程序支持模塊程序設計方法。外部子程序也有它的局限性只能對子程序發(fā)揮作用但對數(shù)據(jù)、類型或接口定義不能達到并行設計、共享使用的目的。目前面向?qū)ο蟪绦蛟O計方法方興未艾支持面向?qū)ο蟪绦蛟O

6、計方法體現(xiàn)面向?qū)ο蟪绦蛟O計特色已成為新一代程序設計語言不可缺少的內(nèi)容。面向?qū)ο蟪绦蛟O計方法中有幾個非常重要的概念:數(shù)據(jù)封裝、特性繼承、操作重載、公私分隔等這些概念的應用使程序更加安全、可靠、高效易于修改。例如儲蓄所保險柜中的錢款只有儲蓄所有關(guān)人員才有權(quán)從中取錢或存錢嚴格禁止顧客進行這些活動顧客只能在柜臺前完成存取款操作。如果儲蓄所的保險柜對所有人開放其結(jié)果可想而知。儲蓄所的操作規(guī)程是數(shù)據(jù)封裝在現(xiàn)實生活中的具體應用。設計和編寫程序亦如此。