version 1.12, 2015/12/30 00:18:25
|
version 1.13, 2016/08/08 06:24:21
|
Line 267 After upgrade have to use this: */ |
|
Line 267 After upgrade have to use this: */ |
|
woodb1 = cmdparams_save_float (&cmdparams, "WOODB1", &newstat); | woodb1 = cmdparams_save_float (&cmdparams, "WOODB1", &newstat); |
woodb2 = cmdparams_save_float (&cmdparams, "WOODB2", &newstat); | woodb2 = cmdparams_save_float (&cmdparams, "WOODB2", &newstat); |
ctx = cmdparams_save_int (&cmdparams, "CTX", &newstat); | ctx = cmdparams_save_int (&cmdparams, "CTX", &newstat); |
|
//printf("ndl = %d\n",ndl); |
char *inrecquery = (char *)cmdparams_save_str(&cmdparams, "in", &newstat); | char *inrecquery = (char *)cmdparams_save_str(&cmdparams, "in", &newstat); |
char *outseries = (char *)cmdparams_save_str(&cmdparams, "out", &newstat); | char *outseries = (char *)cmdparams_save_str(&cmdparams, "out", &newstat); |
char *segnamein = (char *)cmdparams_save_str(&cmdparams, "segin", &newstat); | char *segnamein = (char *)cmdparams_save_str(&cmdparams, "segin", &newstat); |
Line 799 Now use data3 instead of reusing data in |
|
Line 799 Now use data3 instead of reusing data in |
|
crosslen = strlen(crosspath); | crosslen = strlen(crosspath); |
crossnlen = strlen(crossnfile); | crossnlen = strlen(crossnfile); |
printf("crosspath=%s, crosslen=%d\n",crosspath,crosslen); | printf("crosspath=%s, crosslen=%d\n",crosspath,crosslen); |
|
printf("ndl = %d\n",ndl); |
/* Call Fortran program */ | /* Call Fortran program */ |
sub24_(logfile,fftfile, gaps3, &ipar, | sub24_(logfile,fftfile, gaps3, &ipar, |
paramfile, par1file, resfile, | paramfile, par1file, resfile, |