From 4a75b78d2601620a4b06f920b081605341bd4556 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Edgardo=20D=C3=B6rner?= Date: Wed, 30 Jan 2019 14:52:50 -0300 Subject: [PATCH] cosmetic changes beamnrc.mortran egsnrc.macros --- HEN_HOUSE/omega/beamnrc/beamnrc.mortran | 2 +- HEN_HOUSE/src/egsnrc.macros | 5 ++--- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/HEN_HOUSE/omega/beamnrc/beamnrc.mortran b/HEN_HOUSE/omega/beamnrc/beamnrc.mortran index 0850548f0..a68f21eb5 100644 --- a/HEN_HOUSE/omega/beamnrc/beamnrc.mortran +++ b/HEN_HOUSE/omega/beamnrc/beamnrc.mortran @@ -5544,7 +5544,7 @@ $IF(#,_NOPJOB); AMASS(ID)=0.; "zero these since they get summed again in ISUMRY" ] CALL ISUMRY; - "call egs_combine_runs(combine_results,'.egsdat');" + call egs_combine_runs(combine_results,'.egsdat'); NCASET=NCASEO; IHSTRY=NCASET; NCASE=0; CALL SRCOTO(WEIGHT); goto :TIME-PLUS-ANAL:; diff --git a/HEN_HOUSE/src/egsnrc.macros b/HEN_HOUSE/src/egsnrc.macros index 9fca29cd3..fb31d53d4 100644 --- a/HEN_HOUSE/src/egsnrc.macros +++ b/HEN_HOUSE/src/egsnrc.macros @@ -59,8 +59,7 @@ %L "Turn on listing "******************************************************************************* -" #HYBRID_EGS - MACROS and definitions needed for MPI/OpenMP parallel -" implementation. +" #PARALLEL_EGS - MACROS and definitions needed for MPI parallel implementation. "******************************************************************************* " MACRO TO USE MPI CALLS. THE USER MUST DEFINE _MPI MACRO DURING COMPILATION" @@ -88,7 +87,7 @@ REPLACE {$ENDIF(#);} WITH {{EMIT;{P1}endif;};} ; "******************************************************************************* -" #OMP_EGS - End of MACROS and definitions for MPI/OpenMP implementation. +" #PARALLEL_EGS - End of MACROS and definitions for MPI implementation. "******************************************************************************* "=================================================================="