/[lmdze]/trunk/dyn3d/ssum.f
ViewVC logotype

Diff of /trunk/dyn3d/ssum.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 30 by guez, Thu Apr 1 09:07:28 2010 UTC revision 35 by guez, Tue Jun 8 15:37:21 2010 UTC
# Line 1  Line 1 
1  real function ssum(n,sx,incx)  real function ssum(n,sx,incx)
2    
3    ! 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
4    
5    IMPLICIT NONE    IMPLICIT NONE
6    
Legend:
Removed from v.30  
changed lines
  Added in v.35
  ViewVC Help
Powered by ViewVC 1.1.21