[LF] Express in Index form

[Lahey Support]

Hi:

FORTRAN90 support the way to express/deal in matrix form,

but how about in index form or tensor form.

Here I mean the following operation:

d = a(i,j)*b(i,k)*c(j,k) in index notation

or d = ( a(1,j)*b(1,k)+a(2,j)*b(2,k)+a(3,j)*b(3,k) )*c(j,k)

not means the following operation:

DO k = ...
DO j = ...
DO i = ...
d = a(i,j)*b(i,k)*c(j,k)
END DO
END DO
END DO

The two operation are NOT the same.

Since FORTRAN is the queen of FORmula TRANsformation, how come she

can not deal with tensor notation?

Note that I'm using LF90, if LF95 or any other FORTRAN can deal

w/ tensor notation directly, do let me know.

Thank you

by Cheng Cosine
Feb/08/2k UT



__________________________________________________ ____
Get Your Private, Free Email at http://www.hotmail.com

--------------------------------------------------------------------------
To unsubscribe from Fortran Forum, send a message to [address removed]
with the following command as the first and only line of the message body:
unsubscribe fortran
--------------------------------------------------------------------------