<HTML> <BODY BGCOLOR=#ccccdd LINK=#0000aa VLINK=#0000ff ALINK=#ff0000 ><BASE TARGET="bottom_target"><PRE>
<A NAME='DA_CHECK_MISSING'><A href='../../html_code/obs/da_check_missing.inc.html#DA_CHECK_MISSING' TARGET='top_target'><IMG SRC="../../gif/bar_red.gif" border=0></A>
subroutine da_check_missing(qc_flag, y_in, y_out) 73
!-----------------------------------------------------------------------
! Purpose: TBD
!-----------------------------------------------------------------------
implicit none
integer, intent(in) :: qc_flag
real, intent(in) :: y_in
real, intent(out) :: y_out
if (qc_flag < obs_qc_pointer) then
y_out = missing_r
else
y_out = y_in
end if
end subroutine da_check_missing