fdurastante
/
amg4psblas
mirror of https://github.com/sfilippone/amg4psblas.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix %SET

Browse Source
implement-ainv
Salvatore Filippone 4 years ago
parent a9d444caf6
commit f9cfc551c3
4 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File

2
amgprec/amg_c_prec_type.f90
Unescape Escape View File

@ -127,7 +127,7 @@ module amg_c_prec_type
procedure, pass(prec) :: cseti => amg_ccprecseti
procedure, pass(prec) :: csetc => amg_ccprecsetc
procedure, pass(prec) :: csetr => amg_ccprecsetr
generic, public :: set => cseti, csetc, csetr, setsm, setsv, setag
generic, public :: set => setsm, setsv, setag
procedure, pass(prec) :: get_smoother => amg_c_get_smootherp
procedure, pass(prec) :: get_solver => amg_c_get_solverp
procedure, pass(prec) :: move_alloc => c_prec_move_alloc

2
amgprec/amg_d_prec_type.f90
Unescape Escape View File

@ -127,7 +127,7 @@ module amg_d_prec_type
procedure, pass(prec) :: cseti => amg_dcprecseti
procedure, pass(prec) :: csetc => amg_dcprecsetc
procedure, pass(prec) :: csetr => amg_dcprecsetr
generic, public :: set => cseti, csetc, csetr, setsm, setsv, setag
generic, public :: set => setsm, setsv, setag
procedure, pass(prec) :: get_smoother => amg_d_get_smootherp
procedure, pass(prec) :: get_solver => amg_d_get_solverp
procedure, pass(prec) :: move_alloc => d_prec_move_alloc

2
amgprec/amg_s_prec_type.f90
Unescape Escape View File

@ -127,7 +127,7 @@ module amg_s_prec_type
procedure, pass(prec) :: cseti => amg_scprecseti
procedure, pass(prec) :: csetc => amg_scprecsetc
procedure, pass(prec) :: csetr => amg_scprecsetr
generic, public :: set => cseti, csetc, csetr, setsm, setsv, setag
generic, public :: set => setsm, setsv, setag
procedure, pass(prec) :: get_smoother => amg_s_get_smootherp
procedure, pass(prec) :: get_solver => amg_s_get_solverp
procedure, pass(prec) :: move_alloc => s_prec_move_alloc

2
amgprec/amg_z_prec_type.f90
Unescape Escape View File

@ -127,7 +127,7 @@ module amg_z_prec_type
procedure, pass(prec) :: cseti => amg_zcprecseti
procedure, pass(prec) :: csetc => amg_zcprecsetc
procedure, pass(prec) :: csetr => amg_zcprecsetr
generic, public :: set => cseti, csetc, csetr, setsm, setsv, setag
generic, public :: set => setsm, setsv, setag
procedure, pass(prec) :: get_smoother => amg_z_get_smootherp
procedure, pass(prec) :: get_solver => amg_z_get_solverp
procedure, pass(prec) :: move_alloc => z_prec_move_alloc

Write Preview
Loading…
Cancel
Save