real(kind=kind_phys) function cu_gf_deep::deriv3	(	real(kind=kind_phys)	xx,
		real(kind=kind_phys), dimension(ni)	xi,
		real(kind=kind_phys), dimension(ni)	yi,
		integer	ni,
		integer	m
	)