Default GLOBAL=.true. for MEMORY_USE

7 months ago · 83d435b49e
parent af3fda9690
commit 83d435b49e
4 changed files with 4 additions and 4 deletions
--- a/amgprec/impl/level/amg_c_base_onelev_memory_use.f90
+++ b/amgprec/impl/level/amg_c_base_onelev_memory_use.f90
@ -89,7 +89,7 @@ subroutine amg_c_base_onelev_memory_use(lv,il,nl,ilmin,info,iout,verbosity,prefi
  if (present(global)) then
    global_ = global
  else
-    global_ = .false.
+    global_ = .true.
  end if
  if (present(prefix)) then
--- a/amgprec/impl/level/amg_d_base_onelev_memory_use.f90
+++ b/amgprec/impl/level/amg_d_base_onelev_memory_use.f90
@ -89,7 +89,7 @@ subroutine amg_d_base_onelev_memory_use(lv,il,nl,ilmin,info,iout,verbosity,prefi
  if (present(global)) then
    global_ = global
  else
-    global_ = .false.
+    global_ = .true.
  end if
  if (present(prefix)) then
--- a/amgprec/impl/level/amg_s_base_onelev_memory_use.f90
+++ b/amgprec/impl/level/amg_s_base_onelev_memory_use.f90
@ -89,7 +89,7 @@ subroutine amg_s_base_onelev_memory_use(lv,il,nl,ilmin,info,iout,verbosity,prefi
  if (present(global)) then
    global_ = global
  else
-    global_ = .false.
+    global_ = .true.
  end if
  if (present(prefix)) then
--- a/amgprec/impl/level/amg_z_base_onelev_memory_use.f90
+++ b/amgprec/impl/level/amg_z_base_onelev_memory_use.f90
@ -89,7 +89,7 @@ subroutine amg_z_base_onelev_memory_use(lv,il,nl,ilmin,info,iout,verbosity,prefi
  if (present(global)) then
    global_ = global
  else
-    global_ = .false.
+    global_ = .true.
  end if
  if (present(prefix)) then