mumps_real32.f90 Source File


Files dependent on this one

sourcefile~~mumps_real32.f90~~AfferentGraph sourcefile~mumps_real32.f90 mumps_real32.f90 sourcefile~pdeelliptic.f90 PDEelliptic.f90 sourcefile~pdeelliptic.f90->sourcefile~mumps_real32.f90 sourcefile~mumps_real64.f90 mumps_real64.f90 sourcefile~mumps_real64.f90->sourcefile~mumps_real32.f90 sourcefile~elliptic3d.f90 elliptic3d.f90 sourcefile~elliptic3d.f90->sourcefile~pdeelliptic.f90 sourcefile~elliptic2d.f90 elliptic2d.f90 sourcefile~elliptic2d.f90->sourcefile~pdeelliptic.f90 sourcefile~potential_mumps.f90 potential_mumps.f90 sourcefile~potential_mumps.f90->sourcefile~pdeelliptic.f90 sourcefile~test_potential2d.f90 test_potential2D.f90 sourcefile~test_potential2d.f90->sourcefile~pdeelliptic.f90 sourcefile~potential2d.f90 potential2d.f90 sourcefile~potential2d.f90->sourcefile~pdeelliptic.f90 sourcefile~potential2d.f90->sourcefile~potential_mumps.f90 sourcefile~potential_comm_mumps.f90 potential_comm_mumps.f90 sourcefile~potential_comm_mumps.f90->sourcefile~pdeelliptic.f90 sourcefile~potential_comm_mumps.f90->sourcefile~potential_mumps.f90 sourcefile~gemini.f90 gemini.f90 sourcefile~gemini.f90->sourcefile~potential_comm_mumps.f90 sourcefile~potential_root.f90 potential_root.f90 sourcefile~potential_root.f90->sourcefile~potential_comm_mumps.f90 sourcefile~potential_worker.f90 potential_worker.f90 sourcefile~potential_worker.f90->sourcefile~potential_comm_mumps.f90

Contents

Source Code


Source Code

module mumps_rl
implicit none
private
public :: smumps, smumps_struc

external :: smumps

include 'smumps_struc.h'

end module mumps_rl

module mumps_interface
use mumps_rl, only : mumps_struc=>smumps_struc, mumps_exec=>smumps
implicit none
private
public :: mumps_exec, mumps_struc
end module mumps_interface