fdurastante/amg4psblas
1
0
Fork 0
mirror of https://github.com/sfilippone/amg4psblas.git synced 2026-10-06 22:55:12 +00:00
Code Issues Packages Projects Releases Wiki Activity

Fixed stupid typo.

Browse Source
This commit is contained in:
Salvatore Filippone
2011-03-15 18:49:40 +00:00
parent 4bb7841ce7
commit 53d6992dea
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
mlprec/mld_dprecset.F90
+1 -1
View File
@@ -372,7 +372,7 @@ contains
class default
call level%sm%free(info)
if (info == 0) deallocate(level%sm)
n if (info == 0) allocate(mld_d_jac_smoother_type :: &
if (info == 0) allocate(mld_d_jac_smoother_type :: &
& level%sm, stat=info)
if (info == 0) allocate(mld_d_diag_solver_type :: &
& level%sm%sv, stat=info)