x2c2r Subroutine

private subroutine x2c2r(a, a_ri)

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension(:, :) :: a
real, intent(out), dimension(:, :, :) :: a_ri