Merge pull request #18 from NCAR/fix/set_obserr_logic

NCAR · Nov 15, 2024 · 7480929 · 7480929
2 parents 34a9c14 + 02e9841
commit 7480929
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/obs2ioda-v2/src/ncio_mod.f90 b/obs2ioda-v2/src/ncio_mod.f90
@@ -89,7 +89,7 @@ subroutine write_obs (filedate, write_opt, outdir, itim)
          allocate (ichan(xdata(ityp,itim)%nvars))
          ichan(:) = xdata(ityp,itim)%xseninfo_int(:,iv)
          allocate (obserr(xdata(ityp,itim)%nvars))
-         if  ( geoinst_list(ityp) == 'ahi_himawari8' ) then
+         if  ( write_opt == write_nc_radiance_geo ) then
              call set_ahi_obserr(geoinst_list(ityp), xdata(ityp,itim)%nvars, obserr)
          else
              call set_brit_obserr(inst_list(ityp), xdata(ityp,itim)%nvars, obserr)