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

binary io

Browse Source
This commit is contained in:
Ian Jauslin
2023-04-14 15:01:52 -04:00
parent c00c311528
commit d5d5c15b7e
4 changed files with 64 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/navier-stokes.c
View File

@@ -71,7 +71,7 @@ int uk(
}
// save final entry to savefile
write_u(u, K1, K2, savefile);
write_u_bin(u, K1, K2, savefile);
ns_free_tmps(u, tmp1, tmp2, tmp3, fft1, fft2, ifft);
return(0);
@@ -242,6 +242,7 @@ int eea(
if (savefile==NULL){
savefile=stderr;
}
fprintf(savefile,"# Interrupted computation. Resume with\n");
// command to resume
fprintf(savefile,"#! ");
@@ -265,7 +266,11 @@ int eea(
}
// save final entry to savefile
write_u(u, K1, K2, savefile);
if(savefile==stderr || savefile==stdout){
write_u(u, K1, K2, savefile);
} else {
write_u_bin(u, K1, K2, savefile);
}
if(running_avg_window!=0){
free(save_print_e);