Linux  R2.6.32-358.18.1.el6.x86_64 FORTRAN90/SX         Rev.501        Fri Jun  5 11:02:14 2015
FILE NAME: mul.f
PROGRAM NAME: mul
TRANSFORMATION LIST

  LINE                   FORTRAN STATEMENT

     1        subroutine mul(n, moda, i, j, k, a, b, c)
     2        implicit real(8)(a-h,o-z)
     3        real(8) a(n+moda,n),b(n+moda,n)
     4        real(4) c(n+moda,n)
     5  
     6        a(i,j)=a(i,j)+b(i,k)*c(k,j)
     7  
     8        return
     9        end
Linux  R2.6.32-358.18.1.el6.x86_64 FORTRAN90/SX         Rev.501        Fri Jun  5 11:02:14 2015
FILE NAME: mul.f
PROGRAM NAME: mul
FORMAT LIST

  LINE    LOOP      FORTRAN STATEMENT

     1:                   subroutine mul(n, moda, i, j, k, a, b, c)
     2:                   implicit real(8)(a-h,o-z)
     3:                   real(8) a(n+moda,n),b(n+moda,n)
     4:                   real(4) c(n+moda,n)
     5:             
     6:                   a(i,j)=a(i,j)+b(i,k)*c(k,j)
     7:             
     8:                   return
     9:                   end
