subroutine get_xyd_wind | ( | real, dimension(nx, ny) | V, |
real, dimension(nx, ny) | Vx, | ||
real, dimension(nx, ny) | Vy, | ||
real, dimension(nx, ny) | Vyd, | ||
integer | nx, | ||
integer | ny, | ||
real, dimension(ny) | dlam1, | ||
real | dlat, | ||
real, dimension(ny) | divJp, | ||
real, dimension(ny) | divJm | ||
) |
Referenced by trig3d_fjets(), and trig3d_okubo().