2 * Ingest NEXRAD (wsr88d) data and output 3 gif images representing
3 * Reflectivity, Velocity and Spectrum width.
5 * This example is the most minimum of coding that you need to do
6 * to achieve good results from using the RSL code.
8 * This is short and sweet to demonstrate the simplicity of use for
13 * wsr88d_to_gif < file
14 * wsr88d_to_gif file [tape_header_file]
19 void main(int argc, char **argv)
24 * Pass bitwise or of DZ_MASK, VR_MASK, SW_MASK
26 RSL_radar_verbose_on(); /* Not needed; on a slow network it bides the time. */
27 radar = RSL_wsr88d_to_radar(argv[1], argv[2]);
28 if (radar == NULL) exit(-1);
30 /* RSL_sort_radar(radar); */
32 /***********************************************************************/
34 /* You now have a pointer to Radar. */
35 /* Now use *radar all you like. */
37 /***********************************************************************/
39 /* Use radar->v[DZ_INDEX] for REFELECTIVITY
40 * radar->v[VR_INDEX] for VELOCITY
41 * radar->v[SW_INDEX] for SPECTRUM_WIDTH
44 RSL_load_refl_color_table();
45 RSL_volume_to_gif(radar->v[DZ_INDEX], "dz_sweep", 400, 400, 200.0);
47 RSL_load_vel_color_table();
48 RSL_rebin_velocity_volume(radar->v[VR_INDEX]); /* Modifies v[i]. */
49 RSL_volume_to_gif(radar->v[VR_INDEX], "vr_sweep", 400, 400, 200.0);
51 RSL_load_sw_color_table();
52 RSL_volume_to_gif(radar->v[SW_INDEX], "sw_sweep", 400, 400, 200.0);