Searched refs:rn1 (Results 1 – 2 of 2) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 705 subroutine ramg_readin_i(iarray,rn1,rfname)
709 integer rn1 variable
710 integer,dimension(rn1) :: iarray
721 do i=1,rn1
728 subroutine ramg_dump(rarray,rn1,rfname) argument
732 integer rn1 local
733 real(kind=8),dimension(rn1) :: rarray
744 do i=1,rn1
752 subroutine ramg_dump_ic(rarray,rn1,rn2,rfname) argument
756 integer rn1,rn2 local
[all …]
|
| /phasta/phSolver/compressible/ |
| H A D | itrbc.f | 31 dimension rn1(nshg), rmagn1(nshg)
|