/*===================================================================*/
 /* NRDF D0442 Data No.16                                             */
 /*===================================================================*/
 /* Bibliography                                                      */
 /*===================================================================*/
 \\BIB,16;
                       -Opneing paren. added in INST-ACC in \EXP,1[41
                       -Colon after semicolon in INC-ENGY-LAB deleted in
                        DATA,11
                       -Semicolon added in J-PI in DATA,12
 D#=D442;
 TITLE=/800-MEV INELASTIC PROTON SCATTERING FROM 40CA, 48CA, AND 54FE/;
 ATH=(G.S.ADAMS'1,2',TH.S.BAUER'1,3',G.IGO'1',G.PAULETTA'1',
      C.A.WHITTEN,JR.'1',A.WRIEKAT'1',G.W.HOFFMANN'4',G.R.SMITH'5',
      M.GAZZALY'6,7');
 /*@2@*/
 INST-ATH=(1USACLA'1',1USATEX'4',1USACLU'5',1USAPEN'6');
 REF=PR/C;
 VLP=21(1980)2485;
 RCTS=(40CA(P,P)40CA,48CA(P,P)48CA,54FE(P,P)54FE);
 /*===================================================================*/
 /* Experimental Conditions                                           */
 /*===================================================================*/
 \\EXP,16;
 POL-TGT=NO;
 ALGN-TGT=NO;
 ACC=(LINAC);
 INST-ACC=(1USALAS);
 INC-ENGY-LAB-RANGE=(800MEV);
 ERS-PRJ=+-2MEV;
 BEAM-INTNSTY=XUA;
 POL-PRJ=YES;
 DET-PARTCL=(P);
 DET-SYS=(MAG);
 SOLID-ANGL=XMSR;
 ERS-DET=105KEV'10',130KEV'11',140KEV'12';
 /*@3@*/
 ANL=(DWIA,DWBA,COLL-MODEL);
 PHQ=(XSECTN,ANGL-DSTRN,ENGY-SPEC,DSIGMA/DOMEGA,ANALPW,OPT-POTL-PARA,
      DEFORM-PARA);
 RCT=40CA(P,P)40CA;
 ENR=>99.9%;
 CHM=ELM;
 THK-TGT=48MG/CM**2;
 POL-TGT=NO;
 ALGN-TGT=NO;
 /*===================================================================*/
 /* Descriptive Parameters                                            */
 /*===================================================================*/
 \\DATA,16;
 PRJ=P;
 TGT=40CA;
 INC-ENGY=800MEV;
 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;
 INC-ENGY-LAB V RR AR WV RIV AIV VSO RRSO ARSO WSO RISO AISO RC
 (MEV) (MVE) (FM) (MEV) (FM) (FM) (MEV) (MEV) (FM) (FM) (MEV)(FM) (FM)(F
 M)
 800 -4.40 0.89 0.69 66.6 0.89 0.69 0.64 0.98 0.65 2.34 0.98 0.65 1.05
 \END;
 /*===================================================================*/