Add type strings for message 31 format

diff --git a/wsr88d_m31.c b/wsr88d_m31.c
index 3e764d9ddc2cd83ae99a22756195abcf798e3de8..8b4b243be387a4331e5bcc5818f0e3ea4f2fadb7 100644 (file)
--- a/wsr88d_m31.c
+++ b/wsr88d_m31.c
@@ -398,6 +398,7 @@ void wsr88d_load_ray(Wsr88d_ray_m31 wsr88d_ray, int data_ptr,
     float (*f)(Range x);
     Ray *ray;
     int vol_index, waveform;
+    char *type_str;
 
     enum waveforms {surveillance=1, doppler_w_amb_res, doppler_no_amb_res,
        batch};
@@ -415,12 +416,12 @@ void wsr88d_load_ray(Wsr88d_ray_m31 wsr88d_ray, int data_ptr,
        return;
     }
     switch (vol_index) {
-       case DZ_INDEX: f = DZ_F; invf = DZ_INVF; break;
-       case VR_INDEX: f = VR_F; invf = VR_INVF; break;
-       case SW_INDEX: f = SW_F; invf = SW_INVF; break;
-       case DR_INDEX: f = DR_F; invf = DR_INVF; break;
-       case PH_INDEX: f = PH_F; invf = PH_INVF; break;
-       case RH_INDEX: f = RH_F; invf = RH_INVF; break;
+       case DZ_INDEX: f = DZ_F; invf = DZ_INVF; type_str = "Reflectivity";       break;
+       case VR_INDEX: f = VR_F; invf = VR_INVF; type_str = "Velocity";           break;
+       case SW_INDEX: f = SW_F; invf = SW_INVF; type_str = "Spectrum width";     break;
+       case DR_INDEX: f = DR_F; invf = DR_INVF; type_str = "Diff. Reflectivity"; break;
+       case PH_INDEX: f = PH_F; invf = PH_INVF; type_str = "Diff. Phase";        break;
+       case RH_INDEX: f = RH_F; invf = RH_INVF; type_str = "Correlation Coef";   break;
     }
 
     waveform = vcp_data.waveform[isweep];
@@ -438,6 +439,7 @@ void wsr88d_load_ray(Wsr88d_ray_m31 wsr88d_ray, int data_ptr,
            radar->v[vol_index] = RSL_new_volume(MAXSWEEPS);
            radar->v[vol_index]->h.f = f;
            radar->v[vol_index]->h.invf = invf;
+           radar->v[vol_index]->h.type_str = type_str;
        }
        if (radar->v[vol_index]->sweep[isweep] == NULL) {
            radar->v[vol_index]->sweep[isweep] = RSL_new_sweep(MAXRAYS_M31);