-
Notifications
You must be signed in to change notification settings - Fork 0
/
Lin_Alg_Mod.f90
23 lines (19 loc) · 950 Bytes
/
Lin_Alg_Mod.f90
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#include "Assert.h90"
!==============================================================================!
module Lin_Alg_Mod
!------------------------------------------------------------------------------!
!----------------------------------[Modules]-----------------------------------!
use Dense_Mod ! square (full) matrix
use Sparse_Mod ! sparse matrix
!------------------------------------------------------------------------------!
implicit none
!------------------------------------------------------------------------------!
! A suite of linear algebra routines !
!==============================================================================!
contains
# include "Lin_Alg_Mod/Sparse_X_Vector.f90"
# include "Lin_Alg_Mod/Dense_T.f90"
# include "Lin_Alg_Mod/Dense_X_Dense.f90"
# include "Lin_Alg_Mod/Dense_X_Vector.f90"
# include "Lin_Alg_Mod/Vector_Dot_Vector.f90"
end module