subroutine, public lsm_noah::lsm_noah_init	(	integer, intent(in)	me,
		integer, intent(in)	isot,
		integer, intent(in)	ivegsrc,
		integer, intent(in)	nlunit
	)