static COMMAND_FUNC( prquic ) { FILE *fp; int i; int in_db; Trial_Class *tcp; fp=try_nice( nameof("quic file"), "w"); tcp = pick_trial_class(""); in_db = ASKIF("transform x values to decibels"); if( fp == NULL || tcp == NULL ) return; if( no_data(SINGLE_QSP_ARG,"prquic") ) return; fprintf(fp,"%c\n",004); /* EOT */ pntquic(fp,tcp,in_db); fclose(fp); }
static COMMAND_FUNC( prquic ) { FILE *fp; int i; int in_db; Trial_Class *tcp; fp=TRYNICE( NAMEOF("quic file"), "w"); tcp = PICK_TRIAL_CLASS(""); in_db = ASKIF("transform x values to decibels"); if( fp == NULL || tcp == NULL ) return; if( no_data(SINGLE_QSP_ARG,"prquic") ) return; fprintf(fp,"%c\n",004); /* EOT */ pntquic(fp,tcp,in_db); fclose(fp); }