repo.or.cz
/
WRF.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Merge remote-tracking branch 'origin/release-v4.6.1'
[WRF.git]
/
var
/
external
/
lapack
/
da_lapack.f90
blob
69e797eff4ca59966399d67c44cd37f7584ab871
1
module
da_lapack
2
!
3
! Tailored for WRFDA from Linear Algebra PACKage
4
! http://www.netlib.org/lapack/
5
!
6
7
use
da_blas
,
only
:
dcopy
,
lsame
,
xerbla
,
dswap
,
dsyr2
,
dsyr2k
,
dscal
,
ddot
, &
8
dtrmm
,
dtrmv
,
dsymv
,
daxpy
,
dnrm2
,
dger
,
dgemm
,
dgemv
9
10
contains
11
12
#
include
"dsyev.inc"
13
#
include
"dsteqr.inc"
14
#
include
"ilaenv.inc"
15
#
include
"ieeeck.inc"
16
#
include
"iparmq.inc"
17
#
include
"dlaset.inc"
18
#
include
"dlanst.inc"
19
#
include
"dlascl.inc"
20
#
include
"dlaev2.inc"
21
#
include
"dlasr.inc"
22
#
include
"dlae2.inc"
23
#
include
"dorgtr.inc"
24
#
include
"dsterf.inc"
25
#
include
"dsytrd.inc"
26
#
include
"dlansy.inc"
27
#
include
"dlasrt.inc"
28
#
include
"dlartg.inc"
29
#
include
"dlapy2.inc"
30
#
include
"dlassq.inc"
31
#
include
"dorgql.inc"
32
#
include
"dorgqr.inc"
33
#
include
"dlatrd.inc"
34
#
include
"dsytd2.inc"
35
#
include
"dorg2r.inc"
36
#
include
"dorg2l.inc"
37
#
include
"dlarfb.inc"
38
#
include
"dlarft.inc"
39
#
include
"dlarfg.inc"
40
#
include
"dlarf.inc"
41
#
include
"dlamch.inc"
42
43
end module
da_lapack