zeta_to_z_lin Subroutine

public subroutine zeta_to_z_lin(itime, xt, yt, zteta, ztout)


Converting z from eta coordinates to meters using linear interpolation * *


                                                                        *

Variables: * itime [s] current temporal position * xt,yt,zteta spatial position of trajectory * ztout vertical postion in meter (output) * * *


Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: itime
real(kind=dp), intent(in) :: xt
real(kind=dp), intent(in) :: yt
real(kind=dp), intent(in) :: zteta
real(kind=dp), intent(inout) :: ztout