matlab to fortran 1

[smile23]

hello how can i convert this expression fronm matlab to fortran?

for i=1:dt
y,i+1)=A*y,i);
end

where A is a matrix N*N and y a vector N*M

thanks

 

[FJacq]

Almost the same programming, except the use of the intrinsic function MATMUL :

double precision :: a(n,n),y(n,m)
integer :: i
...
do i=1,m-1
  y(:,i+1)=matmul(a,y(:,i))
enddo

 

[smile23]

thanks!
is there also a intrinsic function for the sum of arrays?

 

[FJacq]

is there also a intrinsic function for the sum of arrays?

Yes : "+" to add two arrays term by term (they must have the same shape and dimensions, the result being an array) and "sum" to sum the elements of an array. Notice that * is usable for arrays as well in multiplying term by term two arrays having the same shape and same dimensions (the result is an array). + and * may be used also to add/multiply an array by a scalar.

And there is also dot_product, transpose, product, maxval, minval, maxloc, minloc ...