/home/dasprezs/EXPORT_v7_3/src/LIB/XRD38/FA/compact.F90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	COMPACT (PVALCO_COMPACT, KNELEM, KBITEXPONENT, KBITRADICAL, KPACK)

---

Function/Subroutine Documentation

subroutine COMPACT	(	REAL(KIND=8), dimension(1:knelem)	PVALCO_COMPACT,
		INTEGER(KIND=4)	KNELEM,
		INTEGER(KIND=4)	KBITEXPONENT,
		INTEGER(KIND=4)	KBITRADICAL,
		INTEGER(KIND=8), dimension(1:knelem)	KPACK
	)

Definition at line 1 of file compact.F90.