Fix USE statement

This commit is contained in:
sfilippone
2025-09-23 16:16:08 +02:00
parent 5ee819592f
commit daaa06e486
4 changed files with 4 additions and 4 deletions
+1 -1
View File
@@ -81,7 +81,7 @@
subroutine amg_c_smoothers_bld(a,desc_a,prec,info,amold,vmold,imold)
use psb_base_mod
use amg_c_prec_type
use amg_c_prec_type, amg_protect_name => amg_c_smoothers_bld
Implicit None
+1 -1
View File
@@ -81,7 +81,7 @@
subroutine amg_d_smoothers_bld(a,desc_a,prec,info,amold,vmold,imold)
use psb_base_mod
use amg_d_prec_type
use amg_d_prec_type, amg_protect_name => amg_d_smoothers_bld
Implicit None
+1 -1
View File
@@ -81,7 +81,7 @@
subroutine amg_s_smoothers_bld(a,desc_a,prec,info,amold,vmold,imold)
use psb_base_mod
use amg_s_prec_type
use amg_s_prec_type, amg_protect_name => amg_s_smoothers_bld
Implicit None
+1 -1
View File
@@ -81,7 +81,7 @@
subroutine amg_z_smoothers_bld(a,desc_a,prec,info,amold,vmold,imold)
use psb_base_mod
use amg_z_prec_type
use amg_z_prec_type, amg_protect_name => amg_z_smoothers_bld
Implicit None