Lines Matching refs:fname
263 character :: fname*80 local
273 write(fname,'((A8)(I1))')'tarray_a',i
274 call ramg_dump(tarray(i)%p,amg_nshg(i),fname)
279 write(fname,'((A8)(I1))')'tarray_i',i
280 call ramg_dump(tarray(i)%p,amg_nshg(i),fname)
285 write(fname,'((A8)(I1))')'tarray_b',i
286 call ramg_dump(tarray(i)%p,amg_nshg(i),fname)
886 & fname) argument
897 character fname*10,mtxname*5 local
905 mfname = trim(fname)//'.dat'//cname(myrank+1)
928 & fname) argument
939 character fname*10 local
950 & fname)
954 mfname = trim(fname)//'.dat'//cname(myrank+1)
977 & fname,mtxname) argument
982 character fname*10,mtxname*5 local
988 mfname = trim(fname)//'.mws'