https://github.com/cran/bild
Tip revision: 6661b7703cf2271cb13756a6ff2969ef8e1d88f3 authored by M. Helena Goncalves on 03 November 2023, 14:40:02 UTC
version 1.2-1
version 1.2-1
Tip revision: 6661b77
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