Commit 14fc9bb7 authored by Matthias Redies's avatar Matthias Redies

include judft

parent 33350fcd
......@@ -21,6 +21,7 @@ CONTAINS
! modified to use calculated points and weights
! to make it dynamic. (m.w. jan. 1982)
!*********************************************************************
USE m_judft
IMPLICIT NONE
INTEGER,INTENT(IN):: l,lp,ls,m,mp,ms,lmaxd
INTEGER :: i,il,ilp,ils,n
......
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