external/io_grib1/MEL_grib1/init_enc_struct.c

   1 /* FILENAME:     init_enc_struct.c
   2    DATE:         15 FEB 1996
   3    PROGRAMMER:   STEVE LOWE, SAIC
   4    REVISED BY:   ALICE NAKAJIMA, SAIC
   5  */
   6 #include <stdio.h>
   7 #include <stdlib.h>
   8 #include <string.h>
   9 #include "dprints.h"            /* for dprints */
  10 #include "gribfuncs.h"          /* prototypes */
  11 /*
  12 *
  13 ************************************************************************
  14 * A. FUNCTION:  init_enc_struct
  15 *       initializes structures DATA_INPUT and GEOM_IN
  16 *
  17 *    INTERFACE:
  18 *       void init_enc_struct (data_input, geom_in, user_input)
  19 *
  20 *    ARGUMENTS (I=input, O=output, I&O=input and output):
  21 *      (O) DATA_INPUT *data_input;    encoder struct to be initialized
  22 *      (O) GEOM_IN  *geom_in;         encoder struct to be initialized
  23 *      (O) USER_INPUT *user_input;    encoder struct to be initialized
  24 *
  25 *      RETURN CODE:   none
  26 ************************************************************************
  27 */
  28 #if PROTOTYPE_NEEDED
  29 void init_enc_struct ( DATA_INPUT *data_input, GEOM_IN  *geom_in,
  30                         USER_INPUT *user_input)
  31 #else
  32 void init_enc_struct ( data_input, geom_in, user_input)
  33                         DATA_INPUT *data_input;
  34                         GEOM_IN  *geom_in;
  35                         USER_INPUT *user_input;
  36 #endif
  37 {
  38   DPRINT0 ("Entering init_enc_struct()\n");
  39 /*
  40 *
  41 * A.1       CLEAR elements of DATA_INPUT Structure
  42 *
  43 * A.2       CLEAR elements of GEOM_IN Structure
  44 *
  45 * A.3       CLEAR elements of USER_INPUT Structure
  46 */
  47   memset ((void *)data_input, '\0', sizeof (DATA_INPUT));
  48   memset ((void *)geom_in, '\0', sizeof (GEOM_IN));
  49   memset ((void *)user_input, '\0', sizeof (USER_INPUT));
  50
  51   DPRINT0 ("Exiting init_enc_struct()\n");
  52 /*
  53 *
  54 * A.4        RETURN
  55 */
  56   return;
  57
  58 /*
  59 * END OF FUNCTION
  60 *
  61 */
  62 }