SCALEVEC2000 Subroutine

subroutine SCALEVEC2000(LCARTESIAN, RBASIS, ABASIS, BBASIS, CBASIS, NLBASIS, NRBASIS, NLEFT, NRIGHT, ZPERLEFT, ZPERIGHT, TLEFT, TRIGHT, LINTERFACE, NAEZ, NEMB, BRAVAIS, KAOEZ)

@# KKRtags: VORONOI geometry

Arguments

Type	Intent	Optional	Attributes		Name
logical				::	LCARTESIAN
real(kind=8)				::	RBASIS(3,*)
real(kind=8)				::	ABASIS
real(kind=8)				::	BBASIS
real(kind=8)				::	CBASIS
integer				::	NLBASIS
integer				::	NRBASIS
integer				::	NLEFT
integer				::	NRIGHT
real(kind=8)				::	ZPERLEFT(3)
real(kind=8)				::	ZPERIGHT(3)
real(kind=8)				::	TLEFT(3,*)
real(kind=8)				::	TRIGHT(3,*)
logical				::	LINTERFACE
integer				::	NAEZ
integer				::	NEMB
real(kind=8)				::	BRAVAIS(3,3)
integer				::	KAOEZ(NAEZD+NEMBD)