/home/dasprezs/EXPORT_v7_3/src/LIB/XRD38/FA/mt/facies_mt.F File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	FACIES_MT (FA, CDNOMC, KTYPTR, PSLAPO, PCLOPO, PSLOPO, PCODIL, KTRONC, KNLATI, KNXLON, KNLOPA, KNOZPA, PSINLA, KNIVER, PREFER, PAHYBR, PBHYBR, LDGARD)

---

Function/Subroutine Documentation

subroutine FACIES_MT	(	TYPE(FA_COM)	FA,
		CHARACTER, dimension(*)	CDNOMC,
		INTEGER	KTYPTR,
		REAL (KIND=JPDBLR)	PSLAPO,
		REAL (KIND=JPDBLR)	PCLOPO,
		REAL (KIND=JPDBLR)	PSLOPO,
		REAL (KIND=JPDBLR)	PCODIL,
		INTEGER	KTRONC,
		INTEGER	KNLATI,
		INTEGER	KNXLON,
		INTEGER, dimension (fa%jpxpah)	KNLOPA,
		INTEGER, dimension (fa%jpxind)	KNOZPA,
		REAL (KIND=JPDBLR), dimension (fa%jpxgeo)	PSINLA,
		INTEGER	KNIVER,
		REAL (KIND=JPDBLR)	PREFER,
		REAL (KIND=JPDBLR), dimension (0:fa%jpxniv)	PAHYBR,
		REAL (KIND=JPDBLR), dimension (0:fa%jpxniv)	PBHYBR,
		LOGICAL	LDGARD
	)

Definition at line 2 of file facies_mt.F.

Here is the call graph for this function:

Here is the caller graph for this function: