OOPS
qg_wspeed_interface Module Reference

Functions/Subroutines

subroutine qg_wspeed_equiv_c (c_key_gom, c_key_hofx, c_bias)
 Get equivalent for wind speed. More...
 
subroutine qg_wspeed_equiv_tl_c (c_key_gom, c_key_hofx, c_key_traj, c_bias)
 Get equivalent for wind speed - tangent linear. More...
 
subroutine qg_wspeed_equiv_ad_c (c_key_gom, c_key_hofx, c_key_traj, c_bias)
 Get equivalent for wind speed - adjoint. More...
 
subroutine qg_wspeed_gettraj_c (c_nobs, c_vars, c_key_traj)
 Get wind speed trajectory. More...
 
subroutine qg_wspeed_settraj_c (c_key_gom, c_key_traj)
 Set wind speed trajectory. More...
 

Function/Subroutine Documentation

◆ qg_wspeed_equiv_ad_c()

subroutine qg_wspeed_interface::qg_wspeed_equiv_ad_c ( integer(c_int), intent(in)  c_key_gom,
integer(c_int), intent(in)  c_key_hofx,
integer(c_int), intent(in)  c_key_traj,
real(c_double), intent(inout)  c_bias 
)
private

Get equivalent for wind speed - adjoint.

Parameters
[in]c_key_gomGOM
[in]c_key_hofxObservation vector
[in]c_key_trajGOM trajectory
[in,out]c_biasBias

Definition at line 73 of file qg_wspeed_interface.F90.

Here is the call graph for this function:

◆ qg_wspeed_equiv_c()

subroutine qg_wspeed_interface::qg_wspeed_equiv_c ( integer(c_int), intent(in)  c_key_gom,
integer(c_int), intent(in)  c_key_hofx,
real(c_double), intent(in)  c_bias 
)
private

Get equivalent for wind speed.

Parameters
[in]c_key_gomGOM
[in]c_key_hofxObservation vector
[in]c_biasBias

Definition at line 25 of file qg_wspeed_interface.F90.

Here is the call graph for this function:

◆ qg_wspeed_equiv_tl_c()

subroutine qg_wspeed_interface::qg_wspeed_equiv_tl_c ( integer(c_int), intent(in)  c_key_gom,
integer(c_int), intent(in)  c_key_hofx,
integer(c_int), intent(in)  c_key_traj,
real(c_double), intent(in)  c_bias 
)
private

Get equivalent for wind speed - tangent linear.

Parameters
[in]c_key_gomGOM
[in]c_key_hofxObservation vector
[in]c_key_trajGOM trajectory
[in]c_biasBias

Definition at line 48 of file qg_wspeed_interface.F90.

Here is the call graph for this function:

◆ qg_wspeed_gettraj_c()

subroutine qg_wspeed_interface::qg_wspeed_gettraj_c ( integer(c_int), intent(in)  c_nobs,
type(c_ptr), intent(in), value  c_vars,
integer(c_int), intent(inout)  c_key_traj 
)
private

Get wind speed trajectory.

Parameters
[in]c_nobsNumber of observations
[in]c_varsVariables
[in,out]c_key_trajGOM trajectory

Definition at line 98 of file qg_wspeed_interface.F90.

Here is the call graph for this function:

◆ qg_wspeed_settraj_c()

subroutine qg_wspeed_interface::qg_wspeed_settraj_c ( integer(c_int), intent(in)  c_key_gom,
integer(c_int), intent(in)  c_key_traj 
)
private

Set wind speed trajectory.

Parameters
[in]c_key_gomGOM
[in]c_key_trajGOM trajectory

Definition at line 122 of file qg_wspeed_interface.F90.

Here is the call graph for this function: