lib_cray.f90 File Reference

Functions/Subroutines
subroutine	lib_cray
subroutine	wheneq (i, x, j, t, ind, nn)

Function/Subroutine Documentation

subroutine lib_cray

(

)

subroutine wheneq	(	integer, intent(in)	i,
		real, dimension (1+(i-1)*j), intent(in)	x,
		integer, intent(in)	j,
		real, intent(in)	t,
		integer, dimension (1+(i-1)*j), intent(out)	ind,
		integer, intent(out)	nn
	)