On Mon, May 02, 2011, Ross Walker wrote:
> Looks like Portland Group does not work either which is a pain on Cray and
> other TeraGrid machines which are configured for this:
>
>
> _REAL_, parameter :: FC(1:17) =&
> (/ 1.0D0,1.0D0,2.0D0,6.0D0,24.0D0,120.0D0,720.0D0,5040.0D0, &
> & 40320.0D0,362880.0D0,3628800.0D0,39916800.0D0, &
> & 4.790016D+08,6.2270208D+09,8.71782912D+10, &
> & 1.307674368D+12,2.092278989D+13 /)
>
> _REAL_, parameter :: logFC(1:17) = (/ (log(FC(i)),i=1,17) /)
>
> I guess we should just replace the array with hard coded log values and
> ditch the intrinsic altogether?
I agree...this seems to be pushing the limits of existing fortran compilers.
....dac
_______________________________________________
AMBER-Developers mailing list
AMBER-Developers.ambermd.org
http://lists.ambermd.org/mailman/listinfo/amber-developers
Received on Mon May 02 2011 - 09:00:03 PDT