CVS log for pol_hms_single/qfs_new13_sub.f

(logo)

Help

(back) Up to [HallC] / pol_hms_single

Request diff between arbitrary revisions / Display revisions graphically


Default branch: MAIN
Bookmark a link to: HEAD / (download)
Current tag: MAIN

Revision 1.11 / (view) - annotate - [select for diffs] , Mon Jan 17 20:53:38 2011 UTC (13 years, 8 months ago) by jones
Branch: MAIN
CVS Tags: HEAD
Changes since 1.10: +20 -16 lines
Diff to previous 1.10
Fix bug. THe elastic cross section was being calculated as zero.

Revision 1.10 / (view) - annotate - [select for diffs] , Mon May 18 18:58:24 2009 UTC (15 years, 4 months ago) by jones
Branch: MAIN
Changes since 1.9: +31 -9 lines
Diff to previous 1.9
Updated to use Peter and Vahe's new inelastic and QE code for A >2
ALso use new Peter and Eric fits for A=1 and 2

Revision 1.9 / (view) - annotate - [select for diffs] , Mon Apr 20 20:52:02 2009 UTC (15 years, 5 months ago) by jones
Branch: MAIN
Changes since 1.8: +68 -18 lines
Diff to previous 1.8
Use Eric and Peter fits for proton,deuteron and nuclei inclusive xn

Revision 1.8 / (view) - annotate - [select for diffs] , Mon Jan 30 14:27:29 2006 UTC (18 years, 7 months ago) by jones
Branch: MAIN
Changes since 1.7: +2 -2 lines
Diff to previous 1.7
In subroutine sigx , multiply sig0 by 0.92 to have agreement with
Run  43204 carbon data.

Revision 1.7 / (view) - annotate - [select for diffs] , Wed Jun 29 20:18:09 2005 UTC (19 years, 2 months ago) by jones
Branch: MAIN
Changes since 1.6: +3 -3 lines
Diff to previous 1.6
Use E. Christy fit 050614
For proton inelastic change upper W2 cut from 3.9 to 4.5

Revision 1.6 / (view) - annotate - [select for diffs] , Tue Jun 14 13:01:59 2005 UTC (19 years, 3 months ago) by jones
Branch: MAIN
Changes since 1.5: +3 -3 lines
Diff to previous 1.5
Made proton_inel_fit = 'EC_050530' the default.

Revision 1.5 / (view) - annotate - [select for diffs] , Tue Jun 14 12:56:23 2005 UTC (19 years, 3 months ago) by jones
Branch: MAIN
Changes since 1.4: +11 -9 lines
Diff to previous 1.4
Add call to qfs_deut to get deuteron quasi-elastic cross section. Overwrite the variable sigqfza that is filled by call to sigqfs with xsecqe from
call to qfs_deut . To go back to old version comment out the line
 sigqfza = xsecqe*scale

Revision 1.4 / (view) - annotate - [select for diffs] , Mon May 30 18:15:06 2005 UTC (19 years, 3 months ago) by jones
Branch: MAIN
Changes since 1.3: +6 -3 lines
Diff to previous 1.3
Add files for  Eric Christy's 050529 fit.

Revision 1.3 / (view) - annotate - [select for diffs] , Thu May 12 21:20:07 2005 UTC (19 years, 4 months ago) by jones
Branch: MAIN
Changes since 1.2: +10 -0 lines
Diff to previous 1.2
Add switch "proton_inel_fit" which selects between a parametrization of R and F2 by "liang" ( the hcf2r.f code) and "EC_nov_2004" which is a recent fit
by Eric Christy in Nov. 2004.

Revision 1.2 / (view) - annotate - [select for diffs] , Fri Apr 1 17:02:13 2005 UTC (19 years, 5 months ago) by jones
Branch: MAIN
Changes since 1.1: +1 -1 lines
Diff to previous 1.1
Modified IF statement
if((a.eq.1.d0 .and.z.eq.1.d0).and.(wsq/1.d6.le.3.9d0))

to

if((a.eq.1.d0 .and.z.eq.1.d0).and.(wsq/1.d6.le.3.9d0).and.elflag.eq.0.d0)

Revision 1.1 / (view) - annotate - [select for diffs] , Fri Apr 1 16:48:10 2005 UTC (19 years, 5 months ago) by jones
Branch: MAIN
1) Updated qfs_new12_sub.f to use implicit none.

2) fixed bug in code in IF statement

if((a.eq.1.and.z.eq.1).and.(wsq.le.3.9d0))

replaced by

if((a.eq.1.and.z.eq.1).and.(wsq/1d6.le.3.9d0).and.elflag .eq. 0.d0)

This form allows you to request diffs between any two revisions of a file. You may select a symbolic revision name using the selection box or you may type in a numeric name using the type-in text box.

Diffs between and
Type of Diff should be a

View only Branch:
Sort log by:

Analyzer/Replay: Mark Jones, Documents: Stephen Wood
Powered by
ViewCVS 0.9.2-cvsgraph-1.4.0