|
|
assumed shape 4
61 ( 6/7/2012 4:08:44 PM) Hi
is there a less verbose way of doing the following:
function f(a_in) result(r)
real, dimension(:,:,:,:,:), intent(in) :: a_in
real, dimension(size(a_in,1),size(a_in,2),size(a_in,3),size(a_in,4)... no.spam.address (65)
|
|
(0.269 seconds)
|
|
|
|
|
|