Lines Matching refs:in
28 integer,intent(in) :: level1,level2
30 real(kind=8),intent(in),dimension(amg_nshg(level2)) :: VC
32 integer,intent(in),dimension(nlwork) :: ilwork
33 integer,intent(in),dimension(nshg) :: iBC,iper
34 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
68 integer,intent(in) :: level1,level2
69 real(kind=8),intent(in),dimension(amg_nshg(level1)) :: vf
109 integer,intent(in) :: gnshg,gnnz_tot
110 integer,intent(in),dimension(gnshg+1) :: gcolm
111 integer,intent(in),dimension(gnnz_tot) :: growp
112 real(kind=8),intent(in),dimension(gnnz_tot) :: glhs
113 real(kind=8),intent(in),dimension(gnshg) :: v
115 integer,intent(in) :: gcomm
144 integer,intent(in),dimension(nlwork) :: ilwork
145 integer,intent(in),dimension(nshg) :: iBC,iper
146 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
147 integer,intent(in),dimension(nshg+1) :: colm
148 integer,intent(in),dimension(nnz_tot) :: rowp
150 real(kind=8),intent(in),dimension(9,nnz_tot) :: lhsK
151 real(kind=8),intent(in),dimension(4,nnz_tot) :: lhsP
152 integer,intent(in) :: level
155 integer,intent(in) :: gcomm
206 integer,intent(in),dimension(nlwork) :: ilwork
207 integer,intent(in),dimension(nshg) :: iBC,iper
208 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
210 integer,intent(in) :: level
213 integer,intent(in) :: gcomm
214 integer,intent(in) :: diag !=1: NOT include diagonal A_(i,i)
257 integer,intent(in),dimension(nlwork) :: ilwork
258 integer,intent(in),dimension(nshg) :: iBC,iper
259 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
312 integer,intent(in),dimension(nlwork) :: ilwork
313 integer,intent(in),dimension(nshg) :: iBC,iper
314 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
349 integer,intent(in),dimension(nlwork) :: ilwork
350 integer,intent(in),dimension(nshg) :: iBC,iper
351 real(kind=8),intent(in),dimension(nshg,ndofBC) :: BC
444 integer,intent(in) :: nshg,nnz_tot
445 integer,intent(in),dimension(nshg+1) :: colm
446 integer,intent(in),dimension(nnz_tot) :: rowp
447 real(kind=8),intent(in),dimension(nnz_tot) :: lhs
490 real(kind=8),intent(in),dimension(amg_nshg(level),redun) ::v,u
514 integer,intent(in) :: nshg
515 real(kind=8),intent(in),dimension(nshg) :: v
531 integer,intent(in) :: vflow,level
532 real(kind=8),intent(in),dimension(amg_nshg(level),vflow) :: v
560 integer,intent(in) :: level,lnshg,lnnz_tot
561 integer,intent(in) :: n_sol