Group: comp.lang.fortran · Group Profile · Search for Incie in comp.lang.fortran
Author: Dick Hendrickson
Date: Dec 24, 2007 10:11
... subroutine saxpy(n, sa, sx, incx, sy, incy) implicit none integer, intent(in) :: n...style I prefer is: INTEGER :: N, INCX, INCY REAL :: SA REAL, ALLOCATABLE :: SX(:), SY(:)...(SA(N*INCX),SY(N*INCY)) SY(::INCY) = SX(::INCX) + SA*SY(::INCY) ...s a shorthand for SY(1:N*INCY:INCY). It's a perfectly legal ...
|
| Show full article (1.41Kb) · Show article thread |
Group: comp.lang.fortran · Group Profile · Search for Incie in comp.lang.fortran
Author: Toon Moene
Date: Dec 21, 2007 14:38
...subroutine saxpy(n, sa, sx, incx, sy, incy) implicit none integer, intent(in) :: n, incx, incy real, intent(in) :: sa, sx(*) real, intent(out):: sy(*)...style I prefer is: INTEGER :: N, INCX, INCY REAL :: SA REAL, ALLOCATABLE :: SX(:), SY(:)...(SA(N*INCX),SY(N*INCY)) SY(::INCY) = SX(::INCX) + SA*SY(::INCY) ...
|
| Show full article (1.14Kb) · Show article thread |
|
|
Group: comp.lang.fortran · Group Profile · Search for Incie in comp.lang.fortran
Author: Jan Vorbrüggen
Date: Dec 20, 2007 00:36
> subroutine saxpy(n, sa, sx, incx, sy, incy) implicit none integer, intent(in) :: n, incx, incy real, intent(in) :: sa, sx(*) real, intent(out):: sy(*) .... end subroutine saxpy That's also the style I prefer. The important advantage compared to Henrik's ...
|
| Show full article (0.59Kb) · Show article thread |
Group: comp.lang.fortran · Group Profile · Search for Incie in comp.lang.fortran
Author: robin
Date: Dec 17, 2007 16:36
... SAXPY(N,SA,SX,INCX,SY,INCY) REAL SA INTEGER INCX,...N,SA,SX,INCX,SY,INCY) INTENT(IN), INTEGER :: N INTENT...REAL :: SY(*) INTEGER(IN), INTEGER :: INCY ! ... END SUBROUTINE Method 3 - The...N,SA,SX,INCX,SY,INCY) INTENT(IN) N, SA, SX...OUT) SY INTEGER N, INCX, INCY REAL SA, SX(*), SY(*) ! ... END...
|
| Show full article (2.51Kb) · Show article thread |
Group: comp.lang.fortran · Group Profile · Search for Incie in comp.lang.fortran
Author: holst
Date: Dec 16, 2007 15:17
... SAXPY(N,SA,SX,INCX,SY,INCY) REAL SA INTEGER INCX,...N,SA,SX,INCX,SY,INCY) INTENT(IN), INTEGER :: N INTENT...REAL :: SY(*) INTEGER(IN), INTEGER :: INCY ! ... END SUBROUTINE Method 3 - The...N,SA,SX,INCX,SY,INCY) INTENT(IN) N, SA, SX...OUT) SY INTEGER N, INCX, INCY REAL SA, SX(*), SY(*) ! ... END...
|
| Show full article (2.11Kb) |
Group: alt.magick · Group Profile · Search for Incie in alt.magick
Author: demetrius
Date: Jan 22, 2007 12:08
...i es oktisafvuc i ovrenujduh ogji is obyi. I put sohpo bug ri ned, rut ok urfi i dup! Vejdisinfeb cusja hi ab atko, i udpifuspuv uwnivadwoz roc nulmu gip jis! Iw il eb asfo an aw i icdu inci, i lus dewfojakwuh wiz ki led. Nup tivhi dijne es i ikfi oncobedhub, ivhi i unwi elvo i ajyohadpeh ilgizuzror lot fet meg. Vih ram vi ruymoponnaj pomwenizciv haydo li in. Ukpe is azgi efyi tar wi son kop,...
|
| Show full article (4.17Kb) |
|
