/* 2002-03-18 N.OTUKA 10 POINTS CHECK */ \\BIB,1[10; D#=D714; TITLE=/TEST OF NUCLEON-NUCLEON INTERACTION BY P-D POLARIZATION TRANSFE IN THE THREE-NUCLEON SYSTEM/; ATH=(F.SPERISEN'1',W.GRUEBLER'1',V.KONIG'1',P.A.SCHMELZBACH'1', K.ELSENER'1',B.JENNY'1',C.SCHWEIZER'1',J.ULBRICHT'1', P.DOLESCHALL'2'); INST-ATH=(2SWTETH'1',3HUNKFI'2'); REF=PL/B; VLP=110(1982)103; RCTS=(D,(P,D)P); PHQS=(ANGL-DSTRN,POL-TRNSF); \\EXP,1[10; RCT=D(P,D)P; PHYS-FORM=GAS; THK-TGT=18ATM; ACC=(VDGT); INST-ACC=2SWTETH; INC-ENGY-LAB=10MEV; CHRG-INC-ION=1; POL-PRJ=X%; DET-PARTCL=(D); DET-SYS=(MAG); ANL=(X'12'); /*@12@*/ PHQ=(ANGL-DSTRN,POL-TRNSF); \\DATA,1; INC-ENGY-LAB=10MEV; /*FIG.1-A*/ /* D714 FIG.1-(A) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'20' DELTA-DATA'20' (DEG) (NODIM) (NODIM) 119.735 3.733E-02 +1.993E-02-2.822E-02 133.901 1.871E-01 +1.162E-02-1.660E-02 149.244 4.780E-01 +1.495E-02-1.494E-02 163.128 5.813E-01 +9.958E-03-1.327E-02 179.102 6.050E-01 +9.968E-03-1.494E-02 \END; /*@20@*/ \\DATA,2; INC-ENGY-LAB=10MEV; /*FIG.1-B*/ /* D714 FIG.1-(B) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'21' DELTA-DATA'21' (DEG) (NODIM) (NODIM) 120.126 1.400E-02 +2.994E-02-3.160E-02 133.745 3.039E-01 +1.002E-02-1.494E-02 148.104 5.456E-01 +1.000E-02-1.494E-02 164.081 6.011E-01 +XXXXXXXXX-XXXXXXXXX 180.107 6.233E-01 +1.164E-02-1.165E-02 \END; /*@21@*/ \\DATA,3; INC-ENGY-LAB=10MEV; /*FIG.1-C*/ /* D714 FIG.1-(C) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'22' DELTA-DATA'22' (DEG) (NODIM) (NODIM) 119.816 2.040E-02 +2.147E-02-1.983E-02 134.704 -5.453E-02 +3.318E-03-1.158E-02 150.261 -1.278E-01 +1.158E-02-8.264E-03 163.991 -8.536E-02 +1.156E-02-9.929E-03 179.793 4.971E-03 +1.983E-02-2.314E-02 \END; /*@22@*/ \\DATA,4; INC-ENGY-LAB=10MEV; /*FIG.2-A*/ /* D714 FIG.2-(A) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'23' DELTA-DATA'23' (DEG) (NODIM) (NODIM) 91.237 9.356E-02 +2.181E-02-3.090E-02 103.606 1.088E-01 +2.363E-02-3.090E-02 119.793 7.823E-02 +1.087E-02-1.094E-02 134.916 -4.678E-02 +9.088E-03-1.091E-02 148.595 -6.984E-02 +1.094E-02-1.272E-02 164.617 -4.584E-02 +1.097E-02-9.088E-03 179.824 -4.722E-02 +1.091E-02-1.818E-02 \END; /*@23@*/ \\DATA,5; INC-ENGY-LAB=10MEV; /*FIG.2-B*/ /* D714 FIG.2-(B) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'24' DELTA-DATA'24' (DEG) (NODIM) (NODIM) 91.964 5.278E-03 +1.636E-02-1.455E-02 103.980 2.488E-03 +1.449E-02-1.273E-02 120.290 -2.429E-02 +1.636E-02-2.000E-02 134.215 4.417E-05 +1.273E-02-1.455E-02 148.368 -1.747E-02 +1.276E-02-1.091E-02 164.103 3.084E-03 +1.273E-02-1.091E-02 179.397 2.953E-05 +2.906E-02-1.642E-02 \END; /*@24@*/ \\DATA,6; INC-ENGY-LAB=10MEV; /*FIG2-C*/ /* D714 FIG.2-(C) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'25' DELTA-DATA'25' (DEG) (NODIM) (NODIM) 90.881 7.715E-04 +1.239E-02-2.123E-02 103.158 1.219E-02 +2.474E-02-2.303E-02 119.029 2.157E-02 +1.059E-02-1.064E-02 133.534 5.405E-02 +1.062E-02-1.059E-02 146.955 8.485E-02 +7.049E-03-8.847E-03 163.133 7.827E-02 +8.791E-03-8.904E-03 178.912 5.933E-02 +1.239E-02-1.416E-02 \END; /*@25@*/ \\DATA,7; INC-ENGY-LAB=10MEV; /*FIG.2-D*/ /* D714 FIG.2-(D) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'26' DELTA-DATA'26' (DEG) (NODIM) (NODIM) 91.800 -9.216E-03 +3.817E-02-3.461E-02 104.194 -7.956E-02 +3.999E-02-2.541E-02 120.359 6.790E-02 +2.007E-02-2.545E-02 133.972 1.211E-01 +1.636E-02-1.636E-02 148.250 6.872E-02 +1.094E-02-1.999E-02 164.648 3.427E-03 +9.051E-03-1.454E-02 180.613 1.091E-02 +1.454E-02-1.818E-02 \END; /*@26@*/ \\DATA,8; INC-ENGY-LAB=10MEV; /*FIG2-E*/ /* D714 FIG.2-(E) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'27' DELTA-DATA'27' (DEG) (NODIM) (NODIM) 91.790 -6.559E-03 +1.451E-02-2.366E-02 103.723 -1.186E-01 +1.818E-02-2.184E-02 120.318 -1.455E-01 +1.091E-02-1.272E-02 133.965 -8.494E-02 +XXXXXXXXX-XXXXXXXXX 148.357 -1.897E-02 +XXXXXXXXX-XXXXXXXXX 163.977 -1.494E-02 +XXXXXXXXX-XXXXXXXXX 181.061 -7.402E-03 +XXXXXXXXX-XXXXXXXXX \END; /*@27@*/ \\DATA,9; INC-ENGY-LAB=10MEV; /*FIG.2-F*/ /* D714 FIG.2-(F) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'28' DELTA-DATA'28' (DEG) (NODIM) (NODIM) 90.475 2.316E-02 +2.495E-02-2.863E-02 103.102 2.763E-03 +1.964E-02-2.145E-02 118.782 4.647E-02 +7.098E-03-1.433E-02 132.896 4.206E-02 +1.067E-02-1.076E-02 148.048 1.794E-02 +1.076E-02-8.927E-03 163.933 -2.644E-03 +1.248E-02-1.071E-02 180.198 -1.611E-02 +XXXXXXXXX-XXXXXXXXX \END; /*@28@*/ \\DATA,10; INC-ENGY-LAB=10MEV; /*FIG2-G*/ /* D714 FIG.2-(G) */ /* FOLLOWING DATA ARE TAKEN FROM GRAPH */ \DATA; THTC DATA'29' DELTA-DATA'29' (DEG) (NODIM) (NODIM) 91.400 -9.916E-02 +1.441E-02-1.802E-02 103.779 -4.057E-02 +2.162E-02-1.261E-02 119.346 1.589E-03 +1.797E-02-1.621E-02 133.764 1.860E-02 +1.078E-02-9.033E-03 147.733 3.204E-03 +1.081E-02-9.033E-03 163.164 -3.283E-03 +7.131E-03-7.206E-03 179.329 -4.416E-03 +XXXXXXXXX-XXXXXXXXX \END; /*@29@*/ \\END; @@12; '12' FADDEEV CALCULATION @@20; '20' VECTOR-TO-VECTOR POLARIZATION TRANSFER COEFFICIENT KXX @@21; '21' VECTOR-TO-VECTOR POLARIZATION TRANSFER COEFFICIENT KYY @@22; '22' VECTOR-TO-VECTOR POLARIZATION TRANSFER COEFFICIENT KZX @@23; '23' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KXYZ @@24; '24' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KXXY @@25; '25' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KYXZ @@26; '26' REMAINDER KYXX-KYYY @@27; '27' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KYZZ @@28; '28' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KZYZ @@29; '29' VECTOR-TO-TENSOR POLARIZATION TRANSFER COEFFICIENT KZXY @@;