/*===================================================================*/
 /* NRDF D0441 Data No.12                                             */
 /*===================================================================*/
 /* Bibliography                                                      */
 /*===================================================================*/
 \\BIB,12;
 D#=D441;
 TITLE=/ELASTIC AND INELASTIC SCATTERING OF 800 MEV PROTONS BY 58NI/;
 ATH=(G.S.KYLE'1,2',N.M,HINTZ'1',M.S.OOTHOUDT'1,3',M.KALETKA'4',
      P.M.LANG'3,4',H.NANN'4',KAMAL K. SETH'4',D.K.MCDANIELS'5',
      P.M.VARGHESE'5,6',T.KOZLOWSKI'7',D.G.MADLAND'7',C.L.MORRIS'7',
      J.C.PRATT'7',J.E.SPENCER'7,8',N.TANAKA'7',H.A.THIESSEN'7',
      G.S.BLANPIED'9,10',G.W.HOFFMANN'9',R.P.LILJESTRAND'9,11',
      J.C.FONG'12,13',G.IGO'12',R.J.RIDGE'12,14',C.A.WHITTEN JR'12');
 /*@2@*/
 INST-ATH=(1USAMIN'1',1USANWU'4',1USAORU'5',1USALAS'7',1USATEX'9',
           1USACLA'12');
 REF=PL/B;
 VLP=91(1980)353;
 RCTS=(58NI(P,P)58NI);
 /*===================================================================*/
 /* Experimental Conditions                                           */
 /*===================================================================*/
 \\EXP,12;
 RCT=58NI(P,P)58NI;
 POL-TGT=NO;
 ALGN-TGT=NO;
 ACC=(LINAC);
 INST-ACC=1USALAS;
 INC-ENGY-LAB-RANGE=(796MEV);
 DELTA-INC-ENGY-LAB=XKEV;
 ERS-PRJ=XKEV;
 BEAM-INTNSTY=XUA;
 POL-PRJ=NO;
 DET-PARTCL=(P);
 DET-SYS=(MAG);
 /*@3@*/
 SOLID-ANGL=XMSR;
 ERS-DET=80KEV;
 ANL=(OPT-MODEL,DWBA,COLL-MODEL);
 PHQ=(XSECTN,ANGL-DSTRN,ENGY-SPEC,DSIGMA/DOMEGA,OPT-POTL-PARA,DEFORM-PAR
 A);
 /*===================================================================*/
 /* Descriptive Parameters                                            */
 /*===================================================================*/
 \\DATA,12;
 PRJ=P;
 TGT=58NI;
 INC-ENGY=796MEV;
 POTL-FORM=/-(V*F(XR)+I*(WV*F(XIV)-4*WS*DIF(1!XIS)F(XIS)+WG*G(XIG)))+(HB
 AR/(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;
 FLAG INC-ENGY-LAB V RR AR WV RIV AIV VSO RRSO ARSO WSO RISO AISO RC
 (NODIM) (MEV) (MEV) (FM) (FM) (MEV) (FM) (FM) (MEV) (FM)
 (FM) (MEV) (FM) (FM) (FM)
 'A' 796 -6.33 0.977 0.689 64.19 1.047 0.580 1.16 0.955 0.767 2.17'15'
 0.955 0.767 1.17
 'B' 796 -18.54 1.027 0.459 47.37 1.089 0.535 0.98 1.113 0.742 0.175'15'
  1.113 0.742 1.17
 \END;
 /*===================================================================*/