[no subject]

• To: netcdfgroup@xxxxxxxxxxxxxxxx, suresh@xxxxxxxxxxxxxxxxxx
• From: lkumar@xxxxxxxxxxxxxxxxxx (Lakshmi Kumar)
• Date: Wed, 25 Sep 1991 16:23:28 EDT

Script started on Wed Sep 25 14:57:51 1991
spso% ncgen -n -o avhrr.cdf -c avhrr.cdl
#include "netcdf.h"

int
main() {                        /* create sharpavhrr.cdf */

   int  cdfid;                  /* netCDF id */

   /* dimension ids */
   int  scan_dim, samples_dim, channels_dim, locations_dim, latlon_dim, 
scanwithgcps_dim;

   /* variable ids */
   int  video_data_id, first_line_with_tiepoints_id, 
pixels_with_latlong_grids_id;

   /* variable shapes */
   int dims[3];

   /* containers for scalar attributes */
   long  long_val;

   /* enter define mode */
   cdfid = nccreate("csharpavhrr.cdf", NC_CLOBBER);

   /* define dimensions */
   scan_dim = ncdimdef(cdfid, "scan", NC_UNLIMITED);
   samples_dim = ncdimdef(cdfid, "samples", 55);
   channels_dim = ncdimdef(cdfid, "channels", 5);
   locations_dim = ncdimdef(cdfid, "locations", 65);
   latlon_dim = ncdimdef(cdfid, "latlon", 2);
   scanwithgcps_dim = ncdimdef(cdfid, "scanwithgcps", 89);

   /* define variables */

   dims[0] = scan_dim;
   dims[1] = samples_dim;
   dims[2] = channels_dim;
   video_data_id = ncvardef (cdfid, "video_data", NC_SHORT, 3, dims);

   first_line_with_tiepoints_id = ncvardef (cdfid, "first_line_with_tiepoints", 
NC_SHORT, 0, 0);

   dims[0] = scan_dim;
   dims[1] = samples_dim;
   dims[2] = channels_dim;
   pixels_with_latlong_grids_id = ncvardef (cdfid, "pixels_with_latlong_grids", 
NC_BYTE, 3, dims);

   /* assign attributes */
   long_val = 5;
   ncattput (cdfid, video_data_id, "number_of_scan_lines", NC_LONG, 1,(void *) 
&long_val);
   ncattput (cdfid, NC_GLOBAL, "spacecraft_type", NC_CHAR, 8, (void *)"NOAA-11 
");
   ncattput (cdfid, NC_GLOBAL, "sensor_type", NC_CHAR, 6, (void *)"AVHRR ");
   ncattput (cdfid, NC_GLOBAL, "data_type_recorded", NC_CHAR, 5, (void *)"HRPT 
");
   ncattput (cdfid, NC_GLOBAL, "interleaving_indicator", NC_CHAR, 5, (void 
*)"LINN ");
   ncattput (cdfid, NC_GLOBAL, "product_level", NC_CHAR, 9, (void *)"level 1B 
");
   ncattput (cdfid, NC_GLOBAL, "product_type", NC_CHAR, 9, (void *)"HRPT RAW ");
   ncattput (cdfid, NC_GLOBAL, "orbit_number", NC_CHAR, 5, (void *)"8957 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_latitude", NC_CHAR, 12, (void 
*)"53.27019162 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_longitude", NC_CHAR, 12, (void 
*)"18.72126233 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_line_number", NC_CHAR, 6, (void 
*)"720.5 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_pixel_number", NC_CHAR, 7, (void 
*)"1024.5 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_year", NC_CHAR, 3, (void *)"90 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_julian_day", NC_CHAR, 4, (void 
*)"172 ");
   ncattput (cdfid, NC_GLOBAL, "scene_center_time", NC_CHAR, 13, (void 
*)"12:02:01:088 ");
   ncattput (cdfid, NC_GLOBAL, "ascending_descending_flag", NC_CHAR, 15, (void 
*)"ascending 1990 ");
   ncattput (cdfid, NC_GLOBAL, "ascending_descending_node", NC_CHAR, 12, (void 
*)"34.71596536 ");
   ncattput (cdfid, NC_GLOBAL, "time_of_asc_dec_node", NC_CHAR, 13, (void 
*)"11:46:41:714 ");
   ncattput (cdfid, NC_GLOBAL, "date_of_asc_dec_node", NC_CHAR, 4, (void *)"172 
");
   ncattput (cdfid, NC_GLOBAL, "wavelength_for_b1", NC_CHAR, 11, (void *)"680   
 580 ");
   ncattput (cdfid, NC_GLOBAL, "wavelength_for_b2", NC_CHAR, 11, (void *)"1100  
 725 ");
   ncattput (cdfid, NC_GLOBAL, "wavelength_for_b3", NC_CHAR, 12, (void *)"3930  
 3550 ");
   ncattput (cdfid, NC_GLOBAL, "wavelength_for_b4", NC_CHAR, 13, (void *)"11300 
 10300 ");
   ncattput (cdfid, NC_GLOBAL, "wavelength_for_b5", NC_CHAR, 13, (void *)"12500 
 11500 ");
   ncattput (cdfid, NC_GLOBAL, "rad_calibration_applied", NC_CHAR, 5, (void 
*)"none ");
   ncattput (cdfid, NC_GLOBAL, "rad_resolution_designator", NC_CHAR, 3, (void 
*)"10 ");
   ncattput (cdfid, NC_GLOBAL, "scene_rad_res_designator", NC_CHAR, 5, (void 
*)"none ");
   ncattput (cdfid, NC_GLOBAL, "inter_pixel_distance", NC_CHAR, 7, (void 
*)"1100.0 ");
   ncattput (cdfid, NC_GLOBAL, "inter_line_distance", NC_CHAR, 7, (void 
*)"1100.0 ");
   ncattput (cdfid, NC_GLOBAL, "nominal_altitue", NC_CHAR, 9, (void *)"850000.0 
");
   ncattput (cdfid, NC_GLOBAL, "nominal_ground_speed", NC_CHAR, 7, (void 
*)"6600.0 ");
   ncattput (cdfid, NC_GLOBAL, "satellite_heading", NC_CHAR, 11, (void 
*)"15.13781677");
   ncattput (cdfid, NC_GLOBAL, "angle_of_drift_at_center", NC_CHAR, 10, (void 
*)"2.31983821");

   /* leave define mode */
   ncendef (cdfid);

   {                    /* store video_data */
    static int video_data_start[] = {0, 0, 0};
    static int video_data_edges[] = {1, 55, 5};
    static short video_data[] = {469, 465, 900, 719, 685, 480, 479, 895, 741, 
708, 486, 489, 888, 754, 724, 485, 491, 902, 752, 722, 476, 487, 901, 747, 718, 
478, 493, 897, 751, 723, 502, 515, 899, 762, 732, 521, 528, 911, 762, 735, 526, 
531, 928, 734, 707, 502, 504, 928, 688, 658, 453, 459, 903, 650, 614, 429, 446, 
872, 643, 607, 443, 459, 869, 645, 610, 486, 487, 808, 656, 619, 494, 491, 821, 
681, 646, 496, 498, 846, 708, 675, 487, 495, 877, 721, 687, 489, 498, 894, 730, 
697, 494, 500, 920, 719, 686, 484, 489, 906, 704, 669, 462, 472, 851, 714, 681, 
428, 449, 834, 734, 706, 400, 432, 876, 716, 691, 364, 407, 796, 692, 664, 362, 
410, 824, 704, 676, 362, 411, 891, 716, 687, 344, 393, 885, 714, 683, 313, 365, 
879, 695, 665, 274, 332, 879, 665, 630, 247, 307, 858, 649, 619, 204, 272, 780, 
622, 597, 185, 262, 733, 603, 580, 181, 270, 643, 593, 581, 183, 294, 668, 584, 
563, 180, 313, 709, 576, 549, 204, 320, 852, 604, 568, 215, 325, 823, 621, 594, 
176, 314, 809, 582, 559, 173, 3!
14, 784, 581, 552, 216, 322, 816,
    ncvarput(cdfid, video_data_id, video_data_start, video_data_edges, (void 
*)video_data);
   }
Segmentation fault (core dumped)
spso% exit
spso% 
script done on Wed Sep 25 14:58:33 1991