Go to the source code of this file.
|
subroutine | outer_product (KENS, KX, KY, PX, PY, PA, PC, OPB_CORRELATIONS, HVAR, HOBS) |
|
subroutine outer_product |
( |
integer, intent(in) |
KENS, |
|
|
integer, intent(in) |
KX, |
|
|
integer, intent(in) |
KY, |
|
|
real, dimension(kx,kens), intent(in) |
PX, |
|
|
real, dimension(ky,kens), intent(in) |
PY, |
|
|
real, dimension(kx,ky), intent(out) |
PA, |
|
|
real, dimension(ky,ky), intent(out) |
PC, |
|
|
logical, intent(in) |
OPB_CORRELATIONS, |
|
|
character(len=3), dimension(kx), intent(in) |
HVAR, |
|
|
character(len=3), dimension(ky), intent(in) |
HOBS |
|
) |
| |