diff --git a/var/convertor/convert_nmm.F b/var/convertor/convert_nmm.F index 2116bf0a94..6d4c0be935 100644 --- a/var/convertor/convert_nmm.F +++ b/var/convertor/convert_nmm.F @@ -1,5 +1,5 @@ -! This is a program that converts NMM data into WRF input data. -! No boundary data yet. +! This is a program that converts NMM data into WRF input data. +! No boundary data yet. ! PROGRAM convert_nmm @@ -72,9 +72,9 @@ END SUBROUTINE Setup_Timekeeping ! these are needed on some compilers, eg compaq/alpha, to ! permit pass by reference through the registry generated -! interface to med_read_nmm, below +! interface to med_read_nmm, below #ifdef DEREF_KLUDGE -! see http://www.mmm.ucar.edu/wrf/WG2/topics/deref_kludge.htm +! see http://www.mmm.ucar.edu/wrf/WG2/topics/deref_kludge.htm INTEGER :: sm31 , em31 , sm32 , em32 , sm33 , em33 INTEGER :: sm31x, em31x, sm32x, em32x, sm33x, em33x INTEGER :: sm31y, em31y, sm32y, em32y, sm33y, em33y @@ -195,7 +195,7 @@ END SUBROUTINE Setup_Timekeeping END IF END DO loop_count - ! Here we define the initial time to process, for later use by the code. + ! Here we define the initial time to process, for later use by the code. current_date_char = start_date_char start_date = start_date_char // '.0000' @@ -205,9 +205,9 @@ END SUBROUTINE Setup_Timekeeping CALL model_to_grid_config_rec ( grid%id , model_config_rec , config_flags ) -! these are needed on some compilers, eg compaq/alpha, to +! these are needed on some compilers, eg compaq/alpha, to ! permit pass by reference through the registry generated -! interface to med_read_nmm, below +! interface to med_read_nmm, below #include "deref_kludge.h" ntsd = 0 diff --git a/var/run/radiance_info/atms_beamwidth.txt b/var/run/radiance_info/atms_beamwidth.txt index 941506f4a4..e6586587e9 100644 --- a/var/run/radiance_info/atms_beamwidth.txt +++ b/var/run/radiance_info/atms_beamwidth.txt @@ -1,4 +1,4 @@ -# LOC = data/preproc/atms_beamwidth.dat +# LOC = data/preproc/atms_beamwidth.dat # WMO Satellite ID 224 # Version identifier