-
-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathdummy_process.f
More file actions
18 lines (18 loc) · 1 KB
/
dummy_process.f
File metadata and controls
18 lines (18 loc) · 1 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function dummy_process()
implicit none
double precision dummy_process
!--------------------------------------------------------------------------
! CepGen overhead
!--------------------------------------------------------------------------
include 'CepGen/Process/Fortran/KTBlocks.inc' ! mandatory, include the kinematics common blocks
call CepGen_print ! optional, display some run parameters information
!--------------------------------------------------------------------------
! end of overhead, beginning of process definition
!--------------------------------------------------------------------------
dummy_process = 1.D0 ! placeholder, your actual definition is to be
! implemented here
!--------------------------------------------------------------------------
! end of process definition
!--------------------------------------------------------------------------
return
end