--- trunk/libf/dyn3d/ssum.f90 2010/04/01 09:07:28 30 +++ trunk/libf/dyn3d/ssum.f90 2010/06/08 15:37:21 35 @@ -1,6 +1,6 @@ real function ssum(n,sx,incx) - ! From cray.F, v 1.1.1.1 2004/05/19 12:53:05 + ! From cray.F, version 1.1.1.1 2004/05/19 12:53:05 IMPLICIT NONE