Searched refs:mem_err (Results 1 – 3 of 3) sorted by relevance
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 562 integer :: mem_err,mem_err_s local
567 & stat=mem_err)
568 mem_err_s = mem_err_s + mem_err
570 & stat=mem_err)
571 mem_err_s = mem_err_s + mem_err
576 & stat=mem_err)
577 mem_err_s = mem_err_s + mem_err
579 & stat=mem_err)
580 mem_err_s = mem_err_s + mem_err
582 & stat=mem_err)
[all …]
|
| H A D | ramg_coarse.f | 53 integer :: mem_err,mem_err_s local
200 allocate(amg_I_colm%p(amg_nshg(level1)),stat=mem_err)
201 mem_err_s = mem_err_s + mem_err
202 allocate(amg_I_rowp%pp(amg_nshg(level1)),stat=mem_err)
203 mem_err_s = mem_err_s + mem_err
204 allocate(amg_I%pp(amg_nshg(level1)),stat=mem_err)
205 mem_err_s = mem_err_s + mem_err
371 allocate(I_cf_colm(level1)%p(amg_nshg(level1)+1),stat=mem_err)
372 mem_err_s = mem_err_s + mem_err
373 allocate(I_cf_rowp(level1)%p(mnnz),stat=mem_err)
[all …]
|
| H A D | ramg_ITAI.f | 131 integer :: mem_err, mem_err_s local
148 allocate(ITA_rowp(mnnz),stat=mem_err)
149 allocate(ITA(mnnz),stat=mem_err)
179 allocate(ITA_rowp(mnnz),stat=mem_err)
180 allocate(ITA(mnnz),stat=mem_err)
229 deallocate(ITA_rowp,stat=mem_err)
230 deallocate(ITA,stat=mem_err)
|