0001 function rho1=rhocalcmj3(E,delta,ne,zeff,a,R0,B0,NBOB); 0002 0003 Ej=1.602e-16*E; 0004 0005 deltaBmax=bmaxcalcmj3(E,delta,a,R0,B0,NBOB); 0006 sigma=sigmacalcmj3(E,delta,ne,zeff,a,R0,B0,NBOB); 0007 rho1=5*deltaBmax/(2*sigma*sqrt(2*delta)); 0008 % facteur 5 devant rho <==> meme resultats que precedents