プログラムを動かすと、REAL*8 FUNC(A,A)のAの値を変えるごとにプログラムの速度が違う様なんです。
配列数を変えることによってプログラム実行速度はかわってくるのでしょうか？
6000＞10秒
5800＞5秒
5600＞10秒
5400＞4.8秒
もう何が何やらorz

環境はWindows pen４　メモリ１Gの環境です。