rhomaguk.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	rhomaguk (ik0, lock, evecu)
pure subroutine	rmk1 (n, wo, wf1, wf2, rho, mag1, mag2, mag3)
pure subroutine	rmk2 (n, wo, wf1, wf2, rho, mag)
pure subroutine	rmk3 (n, wo, wf, rho)

Function/Subroutine Documentation

rhomaguk()

subroutine rhomaguk	(	integer, intent(in)	ik0,
		integer(omp_lock_kind), dimension(nqpt), intent(inout)	lock,
		complex(8), dimension(nstulr,nstulr), intent(in)	evecu
	)

Definition at line 6 of file rhomaguk.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

rmk1()

pure subroutine rhomaguk::rmk1	(	integer, intent(in)	n,
		real(4), intent(in)	wo,
		complex(4), dimension(n), intent(in)	wf1,
		complex(4), dimension(n), intent(in)	wf2,
		real(8), dimension(n), intent(inout)	rho,
		real(8), dimension(n), intent(inout)	mag1,
		real(8), dimension(n), intent(inout)	mag2,
		real(8), dimension(n), intent(inout)	mag3
	)

Definition at line 140 of file rhomaguk.f90.

rmk2()

pure subroutine rhomaguk::rmk2 ( integer, intent(in)  n, real(4), intent(in)  wo, complex(4), dimension(n), intent(in)  wf1, complex(4), dimension(n), intent(in)  wf2, real(8), dimension(n), intent(inout)  rho, real(8), dimension(n), intent(inout)  mag  )

private

Definition at line 164 of file rhomaguk.f90.

rmk3()

pure subroutine rhomaguk::rmk3 ( integer, intent(in)  n, real(4), intent(in)  wo, complex(4), dimension(n), intent(in)  wf, real(8), dimension(n), intent(inout)  rho  )

private

Definition at line 183 of file rhomaguk.f90.