conv_r2d_2d Subroutine

public subroutine conv_r2d_2d(ival, oval)

convert real to double

Arguments

Type IntentOptional Attributes Name
real, intent(in) :: ival(:,:)

input array

double precision, intent(out) :: oval(size(ival,1),size(ival,2))

output array