THIndex Subroutine

public subroutine THIndex(Tc_8, wb_t, thic, thip)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=r8),	intent(in)			::	Tc_8
real(kind=r8),	intent(in)			::	wb_t
real(kind=r8),	intent(out)			::	thic
real(kind=r8),	intent(out)			::	thip