Skip to content

Commit c3f211d

Browse files
committed
Update LUN name in ConfigInit arg list and remove call to open HEMCO log
Signed-off-by: Lizzie Lundgren <[email protected]>
1 parent 7de50cc commit c3f211d

File tree

1 file changed

+1
-7
lines changed

1 file changed

+1
-7
lines changed

hemco_interface.F90

+1-7
Original file line numberDiff line numberDiff line change
@@ -516,7 +516,7 @@ subroutine HCOI_Chunk_Init()
516516
! We are using pcnst here, which is # of constituents.
517517
nHcoSpc = pcnst ! # of hco species?
518518

519-
call ConfigInit(HcoConfig, HMRC, nModelSpecies=nHcoSpc, outLUN=iulog)
519+
call ConfigInit(HcoConfig, HMRC, nModelSpecies=nHcoSpc, stdLogLUN=iulog)
520520
ASSERT_(HMRC==HCO_SUCCESS)
521521

522522
HcoConfig%amIRoot = masterproc
@@ -601,12 +601,6 @@ subroutine HCOI_Chunk_Init()
601601
endif
602602
ASSERT_(HMRC==HCO_SUCCESS)
603603

604-
! Open the HEMCO log file (if using)
605-
if(masterproc) then
606-
call HCO_LOGFILE_OPEN(HcoConfig%Err, RC=HMRC)
607-
ASSERT_(HMRC==HCO_SUCCESS)
608-
endif
609-
610604
call Config_ReadFile(HcoConfig%amIRoot, HcoConfig, HcoConfigFile, 2, HMRC, IsDryRun=.false.)
611605
if(masterproc .and. HMRC /= HCO_SUCCESS) then
612606
write(iulog,*) "******************************************"

0 commit comments

Comments
 (0)