Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

new implementation of scale variations #14

Open
wants to merge 5 commits into
base: master
Choose a base branch
from
Open

new implementation of scale variations #14

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
5 commits
Select commit Hold shift + click to select a range
883515d
new implementation of scale variations
lucarottoli Feb 14, 2019
ef678cf
new implementation of scale variations
lucarottoli Feb 14, 2019
d50b2e5
new implementation of scale variations
lucarottoli Feb 14, 2019
6d1e5a2
new implementation of scale variations
lucarottoli Feb 14, 2019
496b8fc
new implementation of scale variations
lucarottoli Feb 14, 2019
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
4 changes: 3 additions & 1 deletion src/DIS/SetScaleVariationProcedure.f
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -3,9 +3,11 @@
* SetScaleVariationProcedure.f:
*
* This subroutine sets the the procedure to be used to vary
* factorisation and remormalisation scale:
* factorisation and renormalisation scale:
* - 0: consistent scale variation in DIS and evolution
* - 1: variation only in the DIS structure functions
* - 2: renormalisation scale variation in structure functions,
* factorisation scale variation in the evolution
*
************************************************************************
subroutine SetScaleVariationProcedure(svproc)
Expand Down
9 changes: 6 additions & 3 deletions src/DIS/initParametersDIS.f
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -191,14 +191,16 @@ subroutine initParametersDIS
call exit(-10)
endif
*
if(ScVarProc.lt.0.or.ScVarProc.gt.1)then
if(ScVarProc.lt.0.or.ScVarProc.gt.2)then
write(6,*) achar(27)//"[31mERROR:"
write(6,*) "Scale variation procedure unknown:"
write(6,*) "ScVarProc = ",ScVarProc
write(6,*) " "
write(6,*) "The options are:"
write(6,*) "- 0"
write(6,*) "- 1"
write(6,*) "-0 consistent scale variation in DIS and evolution"
write(6,*) "-1 variation only in the DIS structure functions"
write(6,*) "-2 ren. scale variation in structure functions"
write(6,*) " fact. scale variation in the evolution"
write(6,*) achar(27)//"[0m"
call exit(-10)
endif
Expand All @@ -208,6 +210,7 @@ subroutine initParametersDIS
if(krenQ.ne.1d0.or.kfacQ.ne.1d0)then
call SetRenFacRatio(dsqrt(krenQ/kfacQ))
if(ScVarProc.eq.1) call SetRenFacRatio(1d0)
if(ScVarProc.eq.2) kfacQ = 1d0
endif
*
* Ensure that for the time-like evolution only proper settings are used
Expand Down