Update src/gsi/read_iasi.f90

Co-authored-by: David Huber <[email protected]>
wx20jjung · Sep 17, 2024 · d805b37 · d805b37
1 parent a41a78a
commit d805b37
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))