Skip to content
GitLab
Commit 6e6ebb30 authored by Daniel Wortmann's avatar Daniel Wortmann
Browse files

Added initialization

parent 765db73a
Hide whitespace changes
Inline Side-by-side
cdn/qal_21.f90
View file @ 6e6ebb30
......@@ -41,7 +41,7 @@ CONTAINS
! .. Intrinsic Functions ..
INTRINSIC conjg
qal21=0.0
!---> l-decomposed density for each occupied state
states : DO i = 1, noccbd
nt1 = 1
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment