nn_var_clr.c

快速傅立叶变换程序代码,学信号的同学,可要注意了

    else if ( strcmp (argv[i], "-nnr") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->report));
    }
    else if ( strcmp (argv[i], "-nnv") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->verbose));
    }
    else if ( strcmp (argv[i], "-nndv") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->decverbose));
    }
    else if ( strcmp (argv[i], "-nndwrite") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->decwrite));
    }
    else if ( strcmp (argv[i], "-nndecfile") == 0 ) {
       if ( i + 1 == argc ) { ERROR1; }
       else {
         strcpy(nc->decfile, argv[++i]);
         nc->decwrite=2;
       }
    }
    else if ( strcmp (argv[i], "-nnread") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->read));
    }
    else if ( strcmp (argv[i], "-nnin") == 0 ) {
       if ( i + 1 == argc ) { ERROR1; }
       else {
         strcpy(nc->infile, argv[++i]);
         nc->read=2;
       }
    }
    else if ( strcmp (argv[i], "-nnout") == 0 ) {
       if ( i + 1 == argc ) { ERROR1; }
       else {
         strcpy(nc->outfile, argv[++i]);
         nc->write=2;
       }
    }
    else if ( strcmp (argv[i], "-nninit") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->init_rule));
    }
    else if ( strcmp (argv[i], "-nndef_w") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->def_w));
    }
    else if ( strcmp (argv[i], "-nndef_b") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->def_b));
    }
    else if ( strcmp (argv[i], "-nnsigmaw0") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->sigma_w0));
    }
    else if ( strcmp (argv[i], "-nnwseed") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%ld", &(nc->wseed));
    }
    else if ( strcmp (argv[i], "-nntrain") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->train));
    }
    else if ( strcmp (argv[i], "-nnn") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->train_n));
    }
    else if ( strcmp (argv[i], "-nntn") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->test_n));
    }
    else if ( strcmp (argv[i], "-nntrseed") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%ld", &(nc->trseed));
    }
    else if ( strcmp (argv[i], "-nnteseed") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%ld", &(nc->teseed));
    }
    else if ( strcmp (argv[i], "-nnregularize") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->regularize));
    }
    else if ( strcmp (argv[i], "-nna1") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->alpha[1]));
    }
    else if ( strcmp (argv[i], "-nna2") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->alpha[2]));
    }
    else if ( strcmp (argv[i], "-nna3") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->alpha[3]));
    }
    else if ( strcmp (argv[i], "-nnopt") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->opt));
    }
    else if ( strcmp (argv[i], "-nnloops") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->LOOP));
    }
    else if ( strcmp (argv[i], "-nnitmax") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->itmax));
    }
    else if ( strcmp (argv[i], "-nntolmin") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->tolmin));
    }
    else if ( strcmp (argv[i], "-nntol0") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->tol0));
    }
    else if ( strcmp (argv[i], "-nnrich") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->rich));
    }
    else if ( strcmp (argv[i], "-nneos") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->end_on_step));
    }
    else if ( strcmp (argv[i], "-cg") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->CG));
    }
    else if ( strcmp (argv[i], "-nneps") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->epsilon));
    }
    else if ( strcmp (argv[i], "-nnevalH") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->evalH));
    }
    else if ( strcmp (argv[i], "-nnhp") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->hitlist_policy));
    }
    else if ( strcmp (argv[i], "-nnhpt") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->hitlist_thresh));
    }
    else if ( strcmp (argv[i], "-nnhpn") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->hitlist_n));
    }
    else if ( strcmp (argv[i], "-nnhpl") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(nc->hitlist_low));
    }
    else if ( strcmp (argv[i], "-nndecodits") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->decodits));
    }
    else if ( strcmp (argv[i], "-nndecodn") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%d", &(nc->decodn));
    }
    else if ( strcmp (argv[i], "-nndecodseed") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%ld", &(nc->decodseed));
    }
    else if ( strcmp (argv[i], "-nnthresh") == 0 ) {
      if ( i + 1 == argc ) { ERROR1; }
      else cs *= sscanf(argv[++i], "%lf", &(net->thresh));
    }