Revision 8cb2c8da847b4c6e53ee55172cf78036c95befd8 authored by M. Helena Gon\xe7alves on 06 June 2010, 00:00:00 UTC, committed by Gabor Csardi on 06 June 2010, 00:00:00 UTC
0 parent
matc.f
subroutine matc(a,b,n1,n2)
C b=a
implicit double precision (a-h,o-z)
dimension a(n1,n2),b(n1,n2)
do 10 i=1,n1
do 20 j=1,n2
b(i,j)=a(i,j)
20 continue
10 continue
return
end
Computing file changes ...