Page MenuHomeHEPForge
Files F11221390

notes_on_comparing_predratio.txt
No OneTemporary
Actions

notes_on_comparing_predratio.txt
View Options

****** to compare predratio *****************
-----------------------------------------------------------------------------
First need to add some things to Oliver's code:
* in f77main.F, at the beginning of the main program HiggsBounds add:
!KW added...
open(35,file='debug_predratio.txt')
!..KW added
and at the end of the main program HiggsBounds add:
!KW added...
close(35)
!..KW added
* in LEP-bound.F(subroutine check_LEP_bound) just after the lines:
! find out which channel is best for comparing with experimental result
if(useSingH) then
number_LEP_channels = nLEP_NSneutCHN*NHIGGS+nLEP_NScharCHN*NHPLUS
else
number_LEP_channels = nLEP_NSneutCHN*NHIGGS+nLEP_NScharCHN*NHPLUS
& +nLEP_NDCHN*NHIGGS**2
endif
add:
c KW added...
write(35,*)'********************'
write(35,'(" * Mh:",1E16.7)')Mh(1)
write(35,*)'********************'
write(35,*)'* n predratio(n) '
do nhelp=1,number_LEP_channels,1
write(35,'(1I6,2E16.7)')nhelp,predratio(nhelp)
enddo
c ...KWadded
* in TEV-bound.F: just before the line
mlratio=my_maxloc(predratio,number_TEV_channels)
add:
c KW added...
! write(*,*)'******* tev *********'
do nhelp=1,number_TEV_channels,1
write(35,'(1I6,1E16.7)')nhelp+LEP_NSCHN*NHIGGS+LEP_NDCHN*NHIGGS**2,predratio(nhelp)
enddo
! write(*,*)'*******************'
c ...KWadded
-----------------------------------------------------------------------------
Now in my code:
* uncomment the line in HiggsBounds.F90:
#define DEBUGGING
-----------------------------------------------------------------------------
then use main_predratio.bat

File Metadata

Mime Type
text/x-fortran
Expires
Wed, May 14, 10:23 AM (1 d, 11 h)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
5069000
Default Alt Text
notes_on_comparing_predratio.txt (1 KB)

Event Timeline