Searched refs:lnshg (Results 1 – 2 of 2) sorted by relevance
318 int lnshg;355 lnshg = iarray[ 0 ] ;382 lnshg = iarray[ 0 ] ;385 if ( lnshg != *nshg ) {
556 & level,lnshg,lnnz_tot,n_sol) argument560 integer,intent(in) :: level,lnshg,lnnz_tot local573 if (lnshg.ne.0) then574 amg_nshg(level) = lnshg594 if (lnshg.ne.0) then