主题:请问fortran中recursive是做什么用的?
请问fortran中recursive是做什么用的?我再程序中看到有这个词,比如说
recursive function fac(n) result(result)
integer,intent(in)::n
integer::result
if(n==0)then
fac_result=1
else
result=n*fac(n-1)
endif
end function fac
这样的程序中的recursive是干什么用的?谢谢
recursive function fac(n) result(result)
integer,intent(in)::n
integer::result
if(n==0)then
fac_result=1
else
result=n*fac(n-1)
endif
end function fac
这样的程序中的recursive是干什么用的?谢谢