3.1.0.2 Example 1: Optical Model calculation

4He + 58Ni elastic scattering Ecm=10 MeV
NAMELIST
 &FRESCO hcm=0.1 rmatch=25.0 rintp=0.5 jtmax=30 
	 absend=-0 dry=F 
	 kqmax=1 
         thmin=1.00 thmax=180.00 thinc=2.00 it0=1 iblock=1 pralpha=F 
	 rmatr=0.0 beta=0.0 nnu=18 smats=2  xstabl=1 pel=1 
	 exl=1 lab=1 lin=1 lex=1 elab=10.7 
	 fatal=F nosol=F psiren=F  /

 &PARTITION namep='ALPHA' massp=4 zp=2 namet='58Ni' 
	 masst=58 zt=28 qval=0.0000 pwf=F nex=1  /
 &STATES jp=0.0 bandp=1 ep=0.0 cpot=1 jt=0.0 
	 bandt=1 et=0.0 fexch=F  /

 &partition /
 
 &POT kp=1 type=0 itt=F at=58 rc=1.4  /
 &POT kp=1 type=1 itt=F p1=191.5 p2=1.37 p3=0.56 
	 p4=23.5 p5=1.37 p6=0.56  /
 &pot / 
 
 &overlap / 
 
 &coupling / 
 
Output code for fresco input written by xfresco v.0.1
 at Sun Jan 13 01:17:29 2002