/* 2004-07-28 N.OTUKA : (old) Data 1,2,3 are splitted into 7 sect's. */ /* 2006-02-26 N.OTUKA : EXC-ENGY-RANGE -> EXC-ENGY in DATA,7 and 8*/ \\BIB,1[10; D#=D183; TITLE=/2H(P,GAMMA)3HE REACTION USING POLARIZED AND UNPOLARIZED PROTONS /; PURPOSE=/TO REDUCE EXISTING DIVERSE RESULTS ABOUT THE DIFFERENTIAL CROSS SECTION OF 3HE(GAMMA,D)P AND TO DEDUCE E1 AND E2 T-MATRIX AMPLITUDES AND PHASES/; ATH=(D.M.SKOPIK'1,4',H.R.WELLER'2,4',N.R.ROBERSON'3,4',S.A.WENDER'3,4' ); INST-ATH=(1CANSAS'1',1USAFLA'2',1USADKE'3',1USATNL'4'); REF=PR/C; VLP=19(1979)601; RCTS=(2H(P,GAMMA)3HE); \\EXP,1[10; ACC=(X); INST-ACC=1USATNL; INC-ENGY-LAB-RANGE=3.0MEV(XMEV)14.8MEV; DELTA-INC-ENGY=XKEV; BEAM-INTNSTY=XUA; POL-PRJ=YES; DET-PARTCL=(GAMMA); DET-SYS=(NAI); ERS-DET=10%; ANL=(X'1'); /*@5@*/ PHQ=(XSECTN,EXC-FUNCT,ANGL-DSTRN,ENGY-SPEC,DSIGMA/DE,DSIGMA/DOMEGA, DSIGMA/DOMEGA/DE,POL,ANALPW,EXC-ENGY,TRANSN-STRGTH); \\EXP,1[4,9; ENR=92%; CHM=X'1'; /*@3@*/ THK-TGT=1.10+-0.02MG/CM**2; POL-TGT=NO; ALGN-TGT=NO; PHQ=(ANGL-DSTRN,DSIGMA/DOMEGA,POL,ANALPW,EXC-ENGY,); \\EXP,5[8,10; THK-TGT=[0.2MG/CM**2'1'; /*@4@*/ BAC=SELF; POL-TGT=NO; ALGN-TGT=NO; PHQ=(XSECTN,EXC-FUNCT,ANGL-DSTRN,DSIGMA/DOMEGA/DE); \\DATA,1; CMPD=3HE; RSD=3HE; EXC-ENGY=8.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /*FIG.1-(A)*/ /* D183 FIG 1-(A) */ /* SER#= 1 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 1.000E+00 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 29.59 6.62E-01 6.82E-02 41.61 8.43E-01 4.09E-02 50.86 1.13E+00 4.09E-02 62.57 1.37E+00 3.75E-02 71.51 1.40E+00 3.75E-02 80.14 1.42E+00 4.77E-02 92.77 1.31E+00 2.73E-02 101.71 1.17E+00 2.73E-02 110.65 1.16E+00 2.73E-02 123.29 9.66E-01 2.38E-02 132.53 8.26E-01 2.38E-02 141.47 6.69E-01 2.38E-02 \END; /*@6@*/ /*@8@*/ \\DATA,2; CMPD=3HE; RSD=3HE; EXC-ENGY=8.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /*FIG.1-(B)*/ /* D183 FIG 1-(B) */ /* SER#= 2 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 2.000E-01 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 41.75 5.17E-02 4.99E-02 50.72 7.93E-02 4.31E-02 62.47 4.31E-02 3.44E-02 71.13 6.90E-02 4.31E-02 80.72 -2.07E-02 4.99E-02 92.16 2.93E-02 4.13E-02 101.44 9.83E-02 4.13E-02 110.41 -6.38E-02 4.48E-02 122.78 1.17E-01 4.13E-02 131.75 2.76E-02 3.44E-02 141.34 6.90E-02 3.10E-02 \END; /*@6@*/ /*@7@*/ \\DATA,3; CMPD=3HE; RSD=3HE; EXC-ENGY=9.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /*FIG.2-(A)*/ /* D183 FIG 2-(A) */ /* SER#= 3 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 1.000E+00 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 29.44 6.39E-01 3.06E-02 44.77 8.67E-01 4.42E-02 50.60 1.10E+00 3.74E-02 63.48 1.21E+00 4.42E-02 72.06 1.33E+00 3.74E-02 82.18 1.27E+00 4.42E-02 93.53 1.25E+00 4.08E-02 103.34 1.23E+00 4.42E-02 112.54 1.15E+00 4.76E-02 124.50 1.00E+00 3.74E-02 133.08 8.84E-01 4.42E-02 \END; /*@6@*/ /*@8@*/ \\DATA,4; CMPD=3HE; RSD=3HE; EXC-ENGY=9.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /*FIG.2-(B)*/ /* D183 FIG 2-(B) */ /* SER#= 4 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 2.000E-01 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 29.54 7.93E-02 4.31E-02 44.31 1.09E-01 4.31E-02 51.08 8.62E-03 5.17E-02 63.08 2.93E-02 5.17E-02 72.31 -8.62E-03 5.86E-02 81.23 1.31E-01 5.68E-02 93.23 8.79E-02 5.34E-02 102.15 -6.21E-02 6.72E-02 111.69 6.03E-02 4.99E-02 123.38 -3.45E-03 5.34E-02 132.92 6.90E-03 5.34E-02 \END; /*@6@*/ /*@7@*/ \\DATA,5; CMPD=3HE; RSD=3HE; EXC-ENGY=10.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /* D183 FIG 3-(A) */ /* SER#= 5 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 1.000E+00 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 30.05 7.61E-01 3.41E-02 42.01 1.08E+00 3.07E-02 51.52 1.24E+00 3.07E-02 63.48 1.34E+00 3.41E-02 72.37 1.33E+00 2.04E-02 81.57 1.38E+00 2.73E-02 90.77 1.34E+00 2.04E-02 102.73 1.17E+00 2.04E-02 111.92 9.83E-01 4.09E-02 123.88 8.84E-01 2.38E-02 133.08 7.99E-01 2.73E-02 140.75 5.39E-01 3.07E-02 \END; /*@6@*/ /*@8@*/ \\DATA,6; CMPD=3HE; RSD=3HE; EXC-ENGY=10.83MEV; INC-ENGY-LAB=(5.0MEV,6.5MEV,8.0MEV); /*FIG.3-(B)*/ /* D183 FIG 3-(B) */ /* SER#= 6 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 1.800E+02 YMAX= 2.000E-01 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA1'1' DELTA-DATA1 (DEG) (NODIM) (NODIM) 30.41 8.97E-02 2.58E-02 42.39 -5.17E-02 3.27E-02 51.60 2.76E-02 2.41E-02 63.28 1.90E-02 3.27E-02 72.80 -5.17E-02 3.10E-02 81.09 2.93E-02 3.10E-02 90.92 2.93E-02 3.96E-02 102.29 2.07E-02 3.10E-02 111.50 3.10E-02 3.79E-02 123.79 2.76E-02 2.41E-02 132.70 -2.07E-02 3.96E-02 140.99 -6.90E-02 2.93E-02 \END; /*@6@*/ /*@7@*/ \\DATA,7; CMPD=3HE; THTC=90DEG; EXC-ENGY=7.5[15.4MEV; /*FIG.8*/ /* D183 FIG 8 */ /* SER#= 7 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 2.000E+01 YMAX= 1.500E+02 */ /* XMIN= 0.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; EXC-ENGY DSIGMA/DOMEGA DELTA-DSIGMA/DOMEGA (MEV) (UB/SR) (UB/SR) 7.40 4.13E+01 7.83E+00 8.13 6.41E+01 8.90E+00 8.78 1.09E+02 6.05E+00 9.44 1.13E+02 7.48E+00 9.69 1.08E+02 4.98E+00 10.20 1.19E+02 3.20E+00 10.82 1.17E+02 2.49E+00 11.43 1.15E+02 3.20E+00 12.09 1.13E+02 3.20E+00 12.78 1.15E+02 4.63E+00 13.39 1.03E+02 3.91E+00 14.01 9.83E+01 4.27E+00 15.43 8.84E+01 7.12E+00 \END; /*@9@*/ \\DATA,8; CMPD=3HE; EXC-ENGY=7.5[15.4MEV; /*FIG.9*/ /* D183 FIG 9 */ /* SER#= 8 */ /* XSCALE=LINEAR YSCALE=LINEAR */ /* XMAX= 2.000E+01 YMAX= 1.500E+00 */ /* XMIN= 5.000E+00 YMIN= 0.000E+00 */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; EXC-ENGY SIGMA DELTA-SIMGA (MEV) (MB) (MB) 8.85 9.48E-01 2.87E-02 9.88 1.04E+00 2.55E-02 10.79 1.07E+00 1.59E-02 \END; /*@6@*/ /*@10@*/ \\DATA,9; EXC-ENGY=(8.83MEV,9.83MEV,10.83MEV); /*@13@*/ \DATA; EXC-ENGY A0'1' DELTA-A0 A1'1' DELTA-A1 A2'1' DELTA-A2 A3'1' DELTA-A3 A4 '1' DELT-A4 B1'2' DELTA-B1 B2'2' DELTA-B2 B3'2' DELTA-B3 B4'2' DELTA-B4 (MEV) (UB) (UB) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) (NODIM) 8.83 76.8 1.5 0.08 0.03 -0.79 0.07 -0.27 0.06 -0.16 0.08 0.05 0.02 0 0. 01 0.02 0.01 0 0.01 9.83 85.2 2.5 0.04 0.07 -0.63 0.12 -0.13 0.09 -0.11 0.09 0.04 0.02 0.02 0.02 0 0.02 0.01 0.01 10.83 86.7 1.4 0.25 0.03 -0.69 0.06 -0.18 0.05 -0.15 0.07 0.01 0.01 0.0 1 0.01 0 0.01 0.02 0.01 \END; /*@6@*/ /*@11@*/ /*@12@*/ \\EXP,10; PHQ=(TRANSN-STRGTH); \\DATA,10; \DATA; SIGMA(E2)'1' DELTA-SIGMA(E2) (UB) (UB) 120 50 \END; /*@14@*/ \\END; @@3; '1' CD2 TARGET ANGULAR DISTRIBUTIONS ARE OBTAINED BY USING THIS SOLID TARGET. @@4; '1' DEUTERIUM GAS CELL @@5; '1' PARAMETRIZING MULTIPLE T-MATRIXES AND THEIR PHASES @@6; ANGULAR DISTRIBUTION IS EXPRESSED AS SIGMA(THTC)=A0*(1+SUM(L=1[4):A(L)* Q(L)*P(L)(COS(THTC))),WHERE SUM(L=1[4) DENOTES THE SUMMATION OVER L FRO M 1 TO 4. @@8; '1' DATA1=SIGMA(THTC)/A0 @@7; '1' DATA1=A(THTC)*SIGMA(THTC)/A0,WHERE A(THTC) IS ANALYZING POWER. @@9; THE DETAILED BALANCE DIFFERENTIAL CROSS SECTION @@10; THE DETAILED BALANCE TOTAL CROSS SECTION. SIGMA=4*3.14159*A0 @@11; '1' A1=A(1),A2=A(2),A3=A(3),A4=A(4). @@12; A(THTC)*SIGMA(THTC)/A0=SUM(L):B(L)*Q(L)*P(L,1)(COS(THTC)),WHERE Q(L)'S ARISE FORM GEOMETRICAL EFFECTS DUE TO THE FINITE ANGULAR ACCEPTANCE OF THE CRYSTAL.'2' B1=B(1),B2=B(2),B3=B(3),B4=B(4). SIGMA-TOTAL=4*3.14159* A0. SUM(L):DENOTES THE SUMMATION OVER L. @@13; FROM THIS DATA HERE THE COMPLEX REDUCED T-MATRIX ELEMENTS ARE DERIVED A ND ARE LISTED IN TABLE 2 IN THE ARTICLE. @@14; '1' SIGMA(E2) IS THE TOTAL E2 CROSS SECTION NEAR THE PEAK OF THE TOTAL CROSS SECTION IN 3HE AND FOUND TO BE ABOUT 12+-5% OF THE TOTAL CROSS SE CTION. @@;