solving an integral

*To*: mathgroup at smc.vnet.net*Subject*: [mg113441] solving an integral*From*: maria giovanna dainotti <mariagiovannadainotti at yahoo.it>*Date*: Thu, 28 Oct 2010 04:29:39 -0400 (EDT)

Dear Sjoerd, I have a problem in solving the following integral h==0.71 ckms==299792.5 SQRT[Abs[1-Om-Ol]]>0 1-Om-Ol<0A==3.0856*10^18*10^6*ckms/(100*h)Om==Table[i,{i,0.0,1.0,0.01}] Olz==Table[i,{i,0.2,8.26,0.08}] HubE[z_,Om_,Ol_,Ok_]:==SQRT(Om*(1+z)^3+Ol+(1-Om-Ol)(1+z)^2)==Table[i,{i,0.0,1.0,0.01}] dL[z_,Om_,Ol_,h_]:==3.0856*10^18*10^6*ckms/(100*h)*(1+z)*1/(SQRT[Abs[Ok]])NIntegrate[1/HubE[z,Om,Ol,Ok],{z,0,z},MaxRecursion ->100] The integral diverge even though I have putted the right condition not to make it diverging. I am very grateful for your help. Cheers Maria