>>318
ありがとうございます！
テストコードを302に書き込みました。これでお願いできたらありがたいです！

問題点のほうは、まとめると、
302のプログラムで
y(1:25,1:25)=x(1:25,1:25)
を100000回実行すると、
real(8)::x(25,25),y(50,50) のとき　=>1.53秒かかる。
real(8)::x(25,25),y(25,25) のとき　=>0.60秒かかる。
「2.5倍もかからんでええやろ」
ということです。

おわかりいただけたでしょうか？


ifort10.1を試みてみました。XEON5160です。
% time a10.out　　　　　：ifort10.1
1.288u 0.000s 0:01.31 97.7%
% time a09.out　　　　　：ifort9.1
1.916u 0.004s 0:01.96 97.4%
だいぶ差があるなあ・・というところです。