w_to_weta Subroutine

public subroutine w_to_weta(itime, dt, xt, yt, z_old, zeta_old, w_in, weta_out)


Converting z from meter coordinates to eta using logarithmic vertical * interpolation *


                                                                        *

Variables: * itime [s] current temporal position * xt,yt,zold,zold spatial positions of trajectory (meters) * zteta vertical position in eta coordinates (output) * * etauvheight defined in windfields: half model heights for ETA coordinates * Constants: * *


Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itime
real, intent(in) :: dt
real(kind=dp), intent(in) :: xt
real(kind=dp), intent(in) :: yt
real(kind=dp), intent(in) :: z_old
real(kind=dp), intent(in) :: zeta_old
real, intent(in) :: w_in
real, intent(inout) :: weta_out