subroutine p(a)	
	Dimension b(1,10)
!error: in stmt_function_stmt: variable b cannot be array
	tt(a,b)=a*b+2
end


