commit b788933: ksint.f contains two subroutines. In the first one (KSINT) cputim is called (line 51) on tt1 with an IMPLICIT REAL*8 from common6.h. Later on in subroutine GW_DECISIONcputim is called again (line 728) on a variable called ttgr, but this time without any IMPLICIT behavior.
On some machines this leads to an argument mismatch, as their default behavior is REAL*4 instead of REAL*8 from the first subroutine.
commit bf2bc808: Remove IMINR from custom_output call (line 1245). In src/Main/custom_output.F IMINR is not an argument, but introduced in common6.h.
To me it looks like IMINR once was given to custom_output as argument, but at some point it moved to common6.h. There is another call to custom_output in line 140 without the IMINR argument. Probably the other call in line 1245 was just forgotten.
commit b788933: ksint.f contains two subroutines. In the first one (
KSINT)cputimis called (line 51) ontt1with anIMPLICIT REAL*8fromcommon6.h. Later on in subroutineGW_DECISIONcputimis called again (line 728) on a variable calledttgr, but this time without any IMPLICIT behavior. On some machines this leads to an argument mismatch, as their default behavior is REAL*4 instead of REAL*8 from the first subroutine.commit bf2bc808: Remove
IMINRfromcustom_outputcall (line 1245). Insrc/Main/custom_output.FIMINR is not an argument, but introduced in common6.h. To me it looks like IMINR once was given to custom_output as argument, but at some point it moved tocommon6.h. There is another call tocustom_outputin line 140 without the IMINR argument. Probably the other call in line 1245 was just forgotten.