(* This line is a comment *) Plot[{NIntegrate[Exp[-lambda*(Sinh[x])^2], {x, -3, 2}], Sqrt[Pi/lambda]}, {lambda, 5, 25}]