Svinks, для начала надо бы разгильдяйство убрать и понять, наконец, какая переменная интегрирования и кто там параметр. Моя гипотеза такая:
![$$\Phi(x) = \exp \left[ -\sqrt{\frac{2}{\pi}} \frac{V_g}{u} \int\limits_{0}^{x} \frac{1}{\sigma_z(x')} \exp \left( -\frac{(h_s+H(x'))^2}{2\sigma_z^2(x')} \right) dx' \right]$$ $$\Phi(x) = \exp \left[ -\sqrt{\frac{2}{\pi}} \frac{V_g}{u} \int\limits_{0}^{x} \frac{1}{\sigma_z(x')} \exp \left( -\frac{(h_s+H(x'))^2}{2\sigma_z^2(x')} \right) dx' \right]$$](https://dxdy-02.korotkov.co.uk/f/5/c/e/5ce3f29288d122f474e0fc6d9d8dde0b82.png)
(Забавно, что это самое разгильдяйство кочует из источника в источник и никто не задумывается; видимо, всём всё понятно.)
Скорее всего, здесь необходимы квадратурные формулы, а, значит, и таблица значений
![$H(x')$ $H(x')$](https://dxdy-04.korotkov.co.uk/f/3/0/6/30614765234f73949b9072d212c9249682.png)
,
![$\sigma_z(x')$ $\sigma_z(x')$](https://dxdy-03.korotkov.co.uk/f/e/3/e/e3e8500011d43115b0bdb8233e3f355b82.png)
на промежутке
![$[0, x]$ $[0, x]$](https://dxdy-02.korotkov.co.uk/f/1/7/4/1742daf28c774c60aedadff26191037182.png)
. Ваш интеграл тогда будет превращён в серию интегралов вида
![$I(x) = \int \limits_0^x = \int \limits_{x_0 = 0}^{x_1} + \int \limits_{x_1}^{x_2} + \ldots + \int \limits_{x_{n-1}}^{x_n = x} = I_1 + I_2 + \ldots + I_n$ $I(x) = \int \limits_0^x = \int \limits_{x_0 = 0}^{x_1} + \int \limits_{x_1}^{x_2} + \ldots + \int \limits_{x_{n-1}}^{x_n = x} = I_1 + I_2 + \ldots + I_n$](https://dxdy-03.korotkov.co.uk/f/6/a/7/6a7f36e768171e5b9189f8a8c07a6e0882.png)
. Каждый интервал
![$[x_{k-1}, x_k]$ $[x_{k-1}, x_k]$](https://dxdy-01.korotkov.co.uk/f/c/5/2/c5222144254e9099cf295838ffae3a0d82.png)
длины
![$h_k = x_k - x_{k-1}$ $h_k = x_k - x_{k-1}$](https://dxdy-04.korotkov.co.uk/f/3/8/0/380e759ad4a37fcf5c4119f7b5a1179082.png)
заменой переменных
![$t_k = 2\cdot \frac{x - x_{k-1}}{h_k} - 1$ $t_k = 2\cdot \frac{x - x_{k-1}}{h_k} - 1$](https://dxdy-01.korotkov.co.uk/f/4/0/f/40fb2a48802109ab542714a34e85500c82.png)
можно обратить в интервал
![$[-1, 1]$ $[-1, 1]$](https://dxdy-01.korotkov.co.uk/f/4/3/c/43ca5ad9e1f094a31392f860ef481e5c82.png)
. В этом случае на соответствующем интервале
![$$
f(x) = f\left(\frac{(t_k + 1) h_k}{2} + x_{k-1}\right) \equiv F_k(t_k)
$$ $$
f(x) = f\left(\frac{(t_k + 1) h_k}{2} + x_{k-1}\right) \equiv F_k(t_k)
$$](https://dxdy-01.korotkov.co.uk/f/4/0/b/40b511fcf93fb0887861002181ebb5b082.png)
и интеграл превращается в
![$$
I_k = \int \limits_{x_{k-1}}^{x_k} f(x) \ \mathrm dx = \frac{h_k}{2} \int \limits_{-1}^1 F_k (t_k) \ \mathrm dt_k.
$$ $$
I_k = \int \limits_{x_{k-1}}^{x_k} f(x) \ \mathrm dx = \frac{h_k}{2} \int \limits_{-1}^1 F_k (t_k) \ \mathrm dt_k.
$$](https://dxdy-01.korotkov.co.uk/f/0/8/5/085302f5e881e9cdc1cf0551c3a86bc282.png)
На интервале
![$[-1, 1]$ $[-1, 1]$](https://dxdy-01.korotkov.co.uk/f/4/3/c/43ca5ad9e1f094a31392f860ef481e5c82.png)
можно выбрать узлы
![$g_1, g_2, \ldots, g_p$ $g_1, g_2, \ldots, g_p$](https://dxdy-04.korotkov.co.uk/f/f/9/d/f9d7bc1bb132f083dea463a2198f3a4482.png)
и применить
квадратурную формулу вида
![$$
\int \limits_{-1}^{1} F_k \left(t_k\right) \ \mathrm dt_k \approx \sum \limits_{s=1}^p w_s F_k(g_s),
$$ $$
\int \limits_{-1}^{1} F_k \left(t_k\right) \ \mathrm dt_k \approx \sum \limits_{s=1}^p w_s F_k(g_s),
$$](https://dxdy-04.korotkov.co.uk/f/3/7/1/371c2de0bf30a55e1062e75433a40f1582.png)
где
![$w_s$ $w_s$](https://dxdy-04.korotkov.co.uk/f/3/d/8/3d83e09256ee57f17530c5fca35206dd82.png)
---
веса узлов. Каковы именно эти узлы и веса --- зависит от квадратурной формулы. Например, для формулы типа Гаусса первого порядка нужно задать
![$g_1 = 0$ $g_1 = 0$](https://dxdy-04.korotkov.co.uk/f/b/d/5/bd5c4b31e10c6000855f4b9acf078d9882.png)
,
![$w_1 = 2$ $w_1 = 2$](https://dxdy-04.korotkov.co.uk/f/f/c/0/fc067eb9c56fb851c0fdbc1f53452fb682.png)
; для второго порядка -
![$g_1 = -1/\sqrt 3$ $g_1 = -1/\sqrt 3$](https://dxdy-03.korotkov.co.uk/f/a/b/7/ab7ae5079b8b1ecbd01cf937facfeba082.png)
,
![$g_2 = 1/\sqrt 3$ $g_2 = 1/\sqrt 3$](https://dxdy-03.korotkov.co.uk/f/6/a/7/6a77d9299d1c740b0a29b3c60bfd6aa582.png)
,
![$w_1 = w_2 = 1$ $w_1 = w_2 = 1$](https://dxdy-01.korotkov.co.uk/f/0/c/4/0c49422e22be29c9e15cb31905571b2a82.png)
и т. д.
Это процедура, которую можно выполнить и самостоятельно. Построение, конечно, зависит от того, как хорошо затабулирована подынтегральная функция. Вы можете таким способом получить значения интеграла
![$I(x)$ $I(x)$](https://dxdy-04.korotkov.co.uk/f/b/d/8/bd84221165cd4b6441add4fe4ef28e0c82.png)
. Они будут задаваться в форме таблицы. При этом наиболее выгодно построить вычисления так: если вам нужен
![$I(x)$ $I(x)$](https://dxdy-04.korotkov.co.uk/f/b/d/8/bd84221165cd4b6441add4fe4ef28e0c82.png)
в точках
![$x_1, x_2, \ldots, x_n$ $x_1, x_2, \ldots, x_n$](https://dxdy-04.korotkov.co.uk/f/b/1/4/b1483a58ac30bc1759f4aba485b3b83282.png)
, то тогда точки деления отрезка в процедуре удобно выбрать именно этими; вы можете тогда построить следующую точку
![$I(x_{n+1})$ $I(x_{n+1})$](https://dxdy-01.korotkov.co.uk/f/0/f/a/0fa1a616399235fa602cafe7b51473b382.png)
, просто прибавляя к
![$I(x_n)$ $I(x_n)$](https://dxdy-03.korotkov.co.uk/f/6/9/f/69f60153b117427cdcca751a84d2a76082.png)
результат интегрирования по малому промежутку
![$[x_{n+1}, x_n]$ $[x_{n+1}, x_n]$](https://dxdy-03.korotkov.co.uk/f/6/9/3/693765712d6f59ba6c24dbe6070f849082.png)
, который легко берётся (с помощью замены и квадратурной формулы). Такая процедура нахождения значений в таблице масштабируема и регулярна. Значения
![$\Phi(x_n)$ $\Phi(x_n)$](https://dxdy-02.korotkov.co.uk/f/9/6/d/96d8e8539cab3f72fe308e25144e5c2782.png)
тогда тупо получаются взятием нужной экспоненты от
![$I(x_n)$ $I(x_n)$](https://dxdy-03.korotkov.co.uk/f/6/9/f/69f60153b117427cdcca751a84d2a76082.png)
.