$QSUD D=0.0002,RMIN=5.8,NC=5,NX=12,NTHETA=0,NE=52, IWRITE=0,NECALC(1)=52,52,52 &END