rotate Interface

interface
public subroutine rotate(r, qt, i, a, b)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=SP),	intent(inout),		DIMENSION(:,:), TARGET	::	r
real(kind=SP),	intent(inout),		DIMENSION(:,:), TARGET	::	qt
integer(kind=I4B),	intent(in)			::	i
real(kind=SP),	intent(in)			::	a
real(kind=SP),	intent(in)			::	b