Commit 20d87c01 authored by Frank Freimuth's avatar Frank Freimuth

Update wann_uHu.F

parent b3899adc
......@@ -233,6 +233,8 @@ c ..local scalars..
TYPE(t_mat) :: zMat, zzMat, zMat_b, zMat_b2
TYPE(t_lapw) :: lapw, lapw_b, lapw_b2
eig_id = eig_idList(1)
c ..initializations..
call cpu_time(t00)
......
Markdown is supported
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