#include <math.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <cdf.h>

main ( argc, argv)

int argc;
char *argv[];

{

  CDFid id;
  CDFstatus status;
  long lfill = ~((long)0);

  printf(" Input CDF: %s\n",argv[1]);
    
  status = CDFlib (OPEN_, CDF_, argv[1], &id, 
                   NULL_);
  
  printf(" Open Status: %d\n",status);                
  status = CDFlib (SELECT_, CDF_, id,
                            CDF_READONLY_MODE_, READONLYoff,
                            gENTRY_, 0,
                            ATTR_NAME_, "Discipline",
                   PUT_,    gENTRY_DATA_, CDF_CHAR, 36, "Space Physics>Magnetospheric Science",
                   SELECT_, zVAR_NAME_, "NUM_PTS",
                            zENTRY_NAME_, "NUM_PTS",
                            ATTR_NAME_, "FILLVAL",
                   PUT_,    zENTRY_DATA_, CDF_INT4,1, &lfill,
                   SELECT_, zVAR_NAME_, "NUM3_PTS",
                            zENTRY_NAME_, "NUM3_PTS",
                            ATTR_NAME_, "FILLVAL",
                   PUT_,    zENTRY_DATA_, CDF_INT4,1, &lfill,
                   SELECT_, zVAR_NAME_, "NUM1_PTS",
                            zENTRY_NAME_, "NUM1_PTS",
                            ATTR_NAME_, "FILLVAL",
                   PUT_,    zENTRY_DATA_, CDF_INT4,1, &lfill,
                   SELECT_, zVAR_NAME_, "SPC_MODE",
                            zENTRY_NAME_, "SPC_MODE",
                            ATTR_NAME_, "FILLVAL",
                   PUT_,    zENTRY_DATA_, CDF_INT4,1, &lfill,
                   SELECT_, zVAR_NAME_, "MAG_MODE",
                            zENTRY_NAME_, "MAG_MODE",
                            ATTR_NAME_, "FILLVAL",
                   PUT_, zENTRY_DATA_, CDF_INT4,1, &lfill,
                   NULL_);
  printf(" Put Status: %d\n",status);                
   
  status = CDFlib (CLOSE_, CDF_,
                   NULL_);
  printf(" Close Status: %d\n",status);                
  
}