huaijuliu 发表于 2013-5-9 00:29:54

CONTAINS内部还能不能继续用CONTAINS,WHY?

主程序内在子程序前可以添加CONTAINS，如果这个子程序内部调用了另一个子程序，是否可以继续用CONTAINS.而且如果主程序也调用了这另一个子程序，难道要在主程序中copy一遍这个子程序吗？谢谢您
问题即SUBROUTINE B被SUBROUTINE A和主程序同时调用，而SUBROUTINE A 也采用CONTAINS被主程序调用。

bvoodnuq 发表于 2013-6-4 10:23:56

主程序

contains

子程序1

子程序2

end 主程序

这样的话，主程序可以调用子程序1，2。子程序1，2之间也可以互相调用。没必要多次 contains，也不能多次 contains

huaijuliu 发表于 2013-6-4 15:52:12

bvoodnuq 发表于 2013-6-4 10:23 static/image/common/back.gif
主程序

contains


谢谢您的回复
页: [1]
查看完整版本: CONTAINS内部还能不能继续用CONTAINS,WHY?