c9e959db-4585-4988-a21b-637dadf6c943 6 15 12 decimal

&[DATE] &[TIME] - &[FILENAME]

t Φ t Heaviside : W x f 22 ln sqrt * W π * / 42 ln * x W / (2^* - exp * : A B y g A x Φ * B x * - exp * : 31 line

RealRange( a, b )

multiple assume 5 x < y −10 < # assume

Does not cut the mustard !

x Int W x y - f A B y g * y ∞ - ∞ int A ∞ - ∞ RealRange ≡ B 0 ∞ RealRange ≡ W 0 ∞ RealRange ≡ assume maple 11 line :

x Int 22 ln sqrt * W π * / 42 ln * x y - W / (2^* - exp * A 1 x 0 - sign + 2 / * B x * - exp * * y ∞ - ∞ int A ∞ - ∞ RealRange ≡ B 0 ∞ RealRange ≡ W 0 ∞ RealRange ≡ assume maple

height = A
decay = B
width = W h 1 : d 1 : w 1 : 31 sys

t Φ t Heaviside :

h d w xo x GaussExp 12 / h * 114 / 8 x xo - (* 2 ln * d w 2^* - (w 2 ln sqrt * / * erf + (* 1 - 16 / d * 16 x xo - (* 2 ln * d w 2^* - (2 ln / * exp * :

h d xo x g h x xo - (Φ * d x xo - (* - exp * :

x c 11 - x ≤ (x 5 ≤ (& cases :

play 'w' 0, 0.125, 0.25 w 0.125 : xo 0 : 12 mat

h d w xo 0 GaussExp 0.48

h d w xo x GaussExp x c * h d xo x g 0 0.48 + 50 blue 1 5 mat 3 1 sys

The blue function is the convolution integration. Model fit to "Laser". Further fitted wrt Laser experimental data ... not given here.