From d0c3f59f345d69c63c578de0fd7a0453c6c65c83 Mon Sep 17 00:00:00 2001 From: Elad Salomons Date: Wed, 5 Aug 2015 14:15:27 +0300 Subject: [PATCH] Added missing parameters in the REPORT section The MESSAGES and FILE options were not saved --- src/inpfile.c | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/src/inpfile.c b/src/inpfile.c index e21fa98..3e7dcd6 100755 --- a/src/inpfile.c +++ b/src/inpfile.c @@ -558,6 +558,9 @@ int saveinpfile(char *fname) fprintf(f, "\n STATUS %s", RptFlagTxt[Statflag]); fprintf(f, "\n SUMMARY %s", RptFlagTxt[Summaryflag]); fprintf(f, "\n ENERGY %s", RptFlagTxt[Energyflag]); + fprintf(f, "\n MESSAGES %s", RptFlagTxt[Messageflag]); + if (strlen(Rpt2Fname) > 0) + fprintf(f, "\n FILE %s", Rpt2Fname); switch (Nodeflag) { case 0: @@ -610,7 +613,7 @@ int saveinpfile(char *fname) } else fprintf(f, "\n %-20sNO", Field[i].Name); } - fprintf(f, "\n"); + fprintf(f, "\n\n"); /* Save auxilary data to new input file */