不同子程序之间用common实现数据传递的问题！

jakiepeng

请问不同子程序之间如何用common block 实现数据传递啊，有人用过吗？求告知！应该怎么弄啊，我在两个子程序分别用common定义了个数组，可是没有值，不知道问题出在哪里。
在UMAT里这样定义：common /t/B(100,9)。
在URDFIL里这样定义： common /t/A(100,9)。A数组输出的时候是有值的，可是输出B数组的时候却一直是0，哪位大神知道是咋回事吗？

akakac

最近也在做这块儿，有大佬来说说吗？