Go to the source code of this file.
Functions/Subroutines | |
pure subroutine | gencrm (n, wf11, wf12, wf21, wf22, crho, ld, cmag) |
pure subroutine gencrm | ( | integer, intent(in) | n, |
complex(4), dimension(n), intent(in) | wf11, | ||
complex(4), dimension(n), intent(in) | wf12, | ||
complex(4), dimension(n), intent(in) | wf21, | ||
complex(4), dimension(n), intent(in) | wf22, | ||
complex(4), dimension(n), intent(out) | crho, | ||
integer, intent(in) | ld, | ||
complex(4), dimension(ld,ndmag), intent(out) | cmag | ||
) |