Skip to content
Snippets Groups Projects
Commit 900fa1e8 authored by Atlas-Software Librarian's avatar Atlas-Software Librarian Committed by Graeme Stewart
Browse files

'CMakeLists.txt' (ProtosLHEF_i-00-00-04)

        * protos.dat->protoslhef.dat, protos.events->protoslhef.events to fix AGENE-880
        * tagged as ProtosLHEF_i-00-00-04

2015-03-27 Patricia Fernandez <Patricia.Fernandez.Martinez@cern.ch>
        * fixed compiler warning
        * tagged as ProtosLHEF_i-00-00-03

2015-03-20 Patricia Fernandez <Patricia.Fernandez.Martinez@cern.ch>
        * patched version for r19 (mc15 production)
        * fix directories for generator common files
        * tagged as ProtosLHEF_i-00-00-02
parent 6c79e8d2
No related branches found
No related tags found
No related merge requests found
################################################################################
# Package: ProtosLHEF_i
################################################################################
# Declare the package name:
atlas_subdir( ProtosLHEF_i )
# Declare the package's dependencies:
atlas_depends_on_subdirs( PUBLIC
Control/AthenaBaseComps
PRIVATE
GaudiKernel
Generators/GeneratorFortranCommon )
# Component(s) in the package:
atlas_add_component( ProtosLHEF_i
src/*.cxx
src/*.F
src/components/*.cxx
LINK_LIBRARIES AthenaBaseComps GaudiKernel GeneratorFortranCommonLib )
# Install files from the package:
atlas_install_headers( ProtosLHEF_i )
atlas_install_joboptions( share/*.py )
atlas_install_runtime( share/*.events share/*.dat )
......@@ -24,4 +24,4 @@ job.ProtosLHEF_i.OutputLevel = INFO
# Number of events to be processed (default is 10)
theApp.EvtMax = 1
theApp.EvtMax = 10
......@@ -11,9 +11,9 @@ C...Initialize Information Using Protos
C -----------------------------------------------------------------------------
! Read and store protos.dat information
! Read and store protoslhef.dat information
OPEN (lun,file='protos.dat')
OPEN (lun,file='protoslhef.dat')
! initialize
ii=0
......@@ -27,10 +27,10 @@ C -----------------------------------------------------------------------------
in=i-1
READ (lun,"(A)",IOSTAT=ii) string(i)
IF (ii .GT. 0) THEN
PRINT *, " ERROR :: ProtosLHEF_i :: FILE *** protos.dat *** READ FAILED "
PRINT *, " ERROR :: ProtosLHEF_i :: FILE *** protoslhef.dat *** READ FAILED "
EXIT
ELSE IF (ii .LT. 0) THEN
! protos.dat read OK
! protoslhef.dat read OK
EXIT
END IF
END DO
......@@ -38,9 +38,9 @@ C -----------------------------------------------------------------------------
CLOSE(lun)
C -----------------------------------------------------------------------------
! Read the ASCII file with process information (named protos.dat)
! Read the ASCII file with process information (named protoslhef.dat)
OPEN (lun,file='protos.dat')
OPEN (lun,file='protoslhef.dat')
READ (lun,*) IHRD
READ (lun,*) ET
......@@ -111,9 +111,9 @@ C -----------------------------------------------------------------------------
C -----------------------------------------------------------------------------
! Open the ASCII event files (named protos.events)
! Open the ASCII event files (named protoslhef.events)
OPEN (lun,file='protos.events')
OPEN (lun,file='protoslhef.events')
10001 FORMAT ('Unknown process IHRD = ',I2)
......
......@@ -37,7 +37,7 @@
WRITE (24,999) " :: Beam energy = ",ET/2d0," GeV ::"
WRITE (24,1000) " ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::"
WRITE (24,1000) " ______________________________________________________________ "
WRITE (24,1000) "| protos.dat | "
WRITE (24,1000) "| protoslhef.dat | "
WRITE (24,1000) " -------------------------------------------------------------- "
DO i=1,in
WRITE (24,998) string(i)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment