save_spinvec_atom Subroutine

private subroutine save_spinvec_atom(filemode, nkpts, ndegen, natyp, spinvec_atom, nsym, isym)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	filemode
integer,	intent(in)			::	nkpts
integer,	intent(in)			::	ndegen
integer,	intent(in)			::	natyp
double precision,	intent(in)			::	spinvec_atom(3,natyp,ndegen,nkpts)
integer,	intent(in)			::	nsym
integer,	intent(in)			::	isym(nsym)