software/Nstrophy
1
Fork 0
Code Issues Pull Requests Releases Activity

New option for init: file_txt for plain txt input

Browse Source
This commit is contained in:
Ian Jauslin
2023-04-24 12:06:35 -04:00
parent cbcb39ff19
commit 23e61c143a
3 changed files with 29 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
src/main.c
View File

@@ -64,6 +64,7 @@ void sig_handler (int signo);
#define INIT_RANDOM 1
#define INIT_GAUSSIAN 2
#define INIT_FILE 3
#define INIT_FILE_TXT 4
// global variable to handle interrupts
@@ -214,6 +215,9 @@ int print_params(
case INIT_FILE:
fprintf(file,", init=file:%s", initfile_str);
break;
case INIT_FILE_TXT:
fprintf(file,", init=file_txt:%s", initfile_str);
break;
default:
fprintf(file,", init=gaussian");
break;
@@ -566,6 +570,12 @@ int set_parameter(
*initfile_str=calloc(sizeof(char), strlen(rhs)-5+1);
strcpy(*initfile_str, rhs+5);
}
// matches any argument that starts with 'file_txt:'
else if (strncmp(rhs,"file_txt:",9)==0){
parameters->init=INIT_FILE_TXT;
*initfile_str=calloc(sizeof(char), strlen(rhs)-9+1);
strcpy(*initfile_str, rhs+9);
}
else{
fprintf(stderr, "error: unrecognized initial condition '%s'\n",rhs);
return(-1);
@@ -616,7 +626,11 @@ _Complex double* set_init(
break;
case INIT_FILE:
init_file(u0, parameters.K1, parameters.K2, parameters.initfile);
init_file_bin(u0, parameters.K1, parameters.K2, parameters.initfile);
break;
case INIT_FILE_TXT:
init_file_txt(u0, parameters.K1, parameters.K2, parameters.initfile);
break;
default: