Searched refs:rarray (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 728 subroutine ramg_dump(rarray,rn1,rfname) argument
733 real(kind=8),dimension(rn1) :: rarray local
746 write(264,*)i,rarray(i)
752 subroutine ramg_dump_ic(rarray,rn1,rn2,rfname) argument
757 integer,dimension(rn1,rn2) :: rarray local
770 write(264,*)j,(rarray(i,j),i=1,rn1)
775 subroutine ramg_dump_i(rarray,rn1,rn2,rfname)
780 integer,dimension(rn1,rn2) :: rarray variable
793 write(264,*)i,(rarray(i,j),j=1,rn2)
799 subroutine ramg_dump_ir(iarray,rarray,rn1,rn2,rfname) argument
[all …]
|