subroutine usesgt	(	real (kind=kind_io8), dimension(len)	sig1t,
		real (kind=kind_io8), dimension(len)	slianl,
		real (kind=kind_io8), dimension(len)	tg3anl,
		integer	len,
		integer	lsoil,
		real (kind=kind_io8), dimension(len)	tsfanl,
		real (kind=kind_io8), dimension(len,lsoil)	stcanl,
		real (kind=kind_io8)	tsfimx
	)

References getstc().

Referenced by sfccycle().

Here is the call graph for this function: