Merge branch 'IASI_debug_fix' of https://github.com/wx20jjung/GSI int…

…o IASI_debug_fix
NOAA-EMC · Sep 17, 2024 · 577c0d7 · 577c0d7
2 parents c142f29 + d805b37
commit 577c0d7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/gsi/read_iasi.f90 b/src/gsi/read_iasi.f90
@@ -762,7 +762,7 @@ subroutine read_iasi(mype,val_iasi,ithin,isfcalc,rmesh,jsatid,gstime,&
               sc_chan = sc_index(i)
               if ( bufr_index(i) == 0 ) cycle channel_loop
               bufr_chan = bufr_index(i)
-!           check that channel number is within reason
+!             check that channel number is within reason
               if (( allchan(2,bufr_chan) > zero .and. allchan(2,bufr_chan) < 99999._r_kind)) then  ! radiance bounds
                 radiance = allchan(2,bufr_chan)*scalef(bufr_chan)
                 call crtm_planck_temperature(sensorindex_iasi,sc_chan,radiance,temperature(bufr_chan))