Дифракция электромагнитного поля миллиметрового диапазона на плоских объектах. Струков И.Ф. - 49 стр.

                0.8




                0.6
         u2i

         u1i
                0.4




                0.2




                 0
                      30           20           10             0            10          20        30
                                                               xi


  № 5. Д Н круглого и злуч ат
                            еля. Расч етч ерезполи номы .
   a0 := 0.79788456 a1 := 0.00000156 a2 := 0.01659667 a3 := 0.00017105
                                                                                                        imax:= 100
   a4 := 0.00249511 a5 := 0.00113653 a6 := 0.00020033
                                                                                                       i := 0.. 2⋅imax
   b0 := −2.35619449 b1 := 0.12499612 b2 := 0.00005650 b3 := 0.00637879
   b4 := 0.000743448 b5 := 0.00079824 b6 := 0.00029166
                                                                                                              i − imax
         1                                                                                             x :=          ⋅30
   c0 :=             c1 := 0.56249985 c2 := 0.21093573 c3 := 0.03954289                                 i       imax
         2
   c4 := 0.00443319 c5 := 0.00031761 c6 := 0.00001109
                                                                                                                             π
                                                                                                       λ := 0.4    k := 2⋅
                              2         3
f1(y) := a0 + a1⋅y + a2⋅y + a3⋅y + a4⋅y + a5⋅y + a6⋅y
                                                     4         5        6                                                    λ

                               2            3         4            5        6
θ1(y) := b0 + b1⋅y + b2⋅y − b3⋅y + b4⋅y + b5⋅y − b6⋅y
                              2         3        4             5        6
J1(y) := c0 − c1⋅y + c2⋅y − c3⋅y + c4⋅y − c5⋅y + c6⋅y
                                                                                                                     m:= 1.61
          −3                               
          2                                                                                                 2
U0(x) :=  x ⋅f1  ⋅cos x + θ1    if x > 3
                    3                 3                                                            ρ ⋅m if ρ > 0
                                                                                   U( ρ , ρ0) := U0    
                  x              x                                                         ρ0 
            x 2                                                                                            2
         J1   otherwise                                                                        ρ 
                                                                                                U0 − ⋅m otherwise
            3                                                                                  ρ0 
                             (2⋅ρ01)2                                           (2⋅ρ02) 2
   ρ01:= 5⋅λ          z1:=                           ρ02:= 10λ
                                                             ⋅         z2:=
                                  λ                                                λ

     i         (i )
   u1 := U x , ρ01                                                 (i )
                                                         u2 := U x , ρ02
                                                           i

   u1max:= maxu1
             ( )                                         u2max:= maxu1
                                                                   ( )
         u1                                                    u2