/*===================================================================*/
 /* NRDF D0658 Data No.29                                             */
 /*===================================================================*/
 /* Bibliography                                                      */
 /*===================================================================*/
 \\BIB,29;
 D#=D658;
 TITLE=/NEUTRON-PROTON DECOMPOSITION OF TRANSITION MATRIX ELEMENTS
        FORM A COMPARISON OF 800 MEV PROTON SCATTERING WITH
        ELECTROMAGNETIC METHODS/;
 ATH=(M.M.GAZZALY'1',N.H.HINTZ'1',G.S.KYLE'1',R.K.OWEN'1',
      G.W.HOFFMANN'2,3',M.BARLETT'2',G.BLANPIED'4');
 INST-ATH=(1USAMIN'1',1USATEX'2',1USALAS'3',1USANMS'4');
 /*@4@*/
 REF=PR/C;
 VLP=25(1982)408;
 RCTS=(90ZR(P,P)90ZR,120SN(P,P)120SN,144SM(P,P)144SM,208PB(P,P)208PB);
 PHQS=(ANGL-DSTRN,OPT-POTL-PARA);
 /*===================================================================*/
 /* Experimental Conditions                                           */
 /*===================================================================*/
 \\EXP,29;
 RCT=120SN(P,P)120SN;
 RTY=(ELA-SCATT,INEL-SCATT);
 ENR=>97%;
 CHM=ELM;
 PHYS-FORM=SLD;
 THK-TGT=13[25MG/CM**2;
 ACC=(LINAC);
 INST-ACC=1USALAS
 /* LOS ALAMOS CLINTON P.ANDERSON MESON PHYS. FACILITY(LAMPF) */
 1USALAS;
 INC-ENGY-LAB=(800MEV);
 DELTA-INC-ENGY-LAB=1000KEV;
 CHRG-INC-ION=1;
 DET-PARTCL=(P);
 COINC=NO;
 ANT-COINC=NO;
 DET-SYS=(MAG);
 ERS-DET=100KEV;
 ANL=(OPT-MODEL,DWBA,COLL-MODEL);
 PHQ=(ANGL-DSTRN,DSIGMA/DOMEGA,OPT-POTL-PARA);
 /*===================================================================*/
 /* Descriptive Parameters                                            */
 /*===================================================================*/
 \\DATA,29;
 PRJ=P;
 TGT=120SN;
 INC-ENGY-LAB=800MEV;
 POTL-FORM=/-(V*F(XR)+I*(WV*F(XIV)-4*WS*DIF(1!XIS)+WG*G(XIG))+
 (HBAR/MPI*C))**2*1/R*(VSO*DIF(1!R)F(XRSO)+I*WSO*DIF(1!R)
 F(XISO))*SIGMA*L+UC(R):
 F(XI)=1/(1+EXP(XI)): G(XG)=EXP(-XG**2):
 XI=(R-RI*A**(1/3))AI:
 UNIFORM CHARGE OF RAIDUS RC*A**(1/3):/;
 /*===================================================================*/
 /* Data Table                                                        */
 /*===================================================================*/
 \DATA;
 INC-ENGY-LAB  V     RR     AR     WV     RIV     AIV     RC
 (MEV)       (MEV)  (FM)  (FM)   (MEV)   (FM)     (FM)    (FM)
   800        6.03  1.046  0.621  83.1   1.046    0.621    4.932
 \END;
 /*===================================================================*/