           

(1)     [ d_tt - d_xx ] u( t,x ) = f( u( t,x ) ),     0 <= t <  +

   	u( 0, x ) = u0( x );    d_t u( 0, x ) = v0( x );

 f( u ) = - d_u P( u )  P( u ) = 0.25 * ( u^2 - 1 )^2.     :    

	E( t ) =   -  +  r( t,x ) * dx,    E( t ) < +

   r( t,x )  

	r( t, x ) = 0.5 * [ d_t ( u( t, x ) ) ]^2 + 0.5 * [ d_x ( u( t, x ) ) ]^2 + P( u( t, x ) )

   u( t, x ) = U( x - v * t ).   (1)    

	( 1 - v^2 ) * U'' = P'( U )

  

	( 1 - v^2 ) * U' / 2 - P( U ) = const

      U = -1  U = +1. 

,   ,   U' > 0   U' < 0.

 ,      U( x - v * t + c ).

         .

 

   2-    .       .

  

  2-  " ",       3kinks_1.we1     "Get Data".      : u( 0, x )  d_t u( 0, x ).

  3-  ""      " ". -     u( t, x )  r( t, x ),        (  ,    , ..    ).       -    (    ).    (  )   .

  3-  "".     "",  .      .        (  ) -   ,      .

         .

   

     . 

  "version of potencial"   WE_ini.txt (  =1).

 WaveEq.exe -          .

    ,     ,   1-  "-"    " ".

     ,     ,    1-      "  "   (  =10).    " ".

   

I.  

             u0  v0  ""   U( x - v * t - c )  U( 0 ) = 0.

  1-  "-"   ">" -       v = 0.0   c = 0.0.     .     ,       "<"  .

   ,   " ",     "v"   "c"    ">".

       ,     " ".

II.  

  2-  " ".      ,      (    )     ,   . 

   "",              .

    (4 ).

      ,    "MyNewFile"     "Put Data".

 

  3-  ""      " ". -     u( t, x )  r( t, x ) ( ),        (  ,    , ..    ). 

      -    (    ).    (  )   .

  3-  "".     "",  .

       (  ) -   ,       .

    ,  1       "?"    "",    . -  . 

     ,       ,      (..     ,    !).

 

          "+1"      u( t, x ),    ,     .      ,   .

    "" -      ( )    : 

	u -  u( t, x )   , 

	w -    (       10  ,   ), 

	e -        ( w = 0)    .

    -    "+1", "-1", "-All".

     ,   ,    .      ,    .

 ,   "iteration number"   WE_ini.txt (  =20)   0,           PrintFile. 

   t, x,  u, w, e  E -   .      , ,  Excel.

  

 3-  ""     " ". -       .

    : 

	"" -  ""  u( t, x ), 

	". " -  ""  r( t, x ). 

      -     "N".

    : 

	"", 

	"-1", 

	"-2".

 "-1".           "".     u( t, x )  r( t, x )      .

 "-2".           "".         .

 "".        ,    .

 

 3-  ""       (   256, 512, 1024 -  , ..    ) -    ""     " ".     ,     .

    1-  "-"      .

 

    "".

          .

 
.., ..-..

 
.., ..-.., e-mail: arkadi_vinn@mtu-net.ru, http://www.apv.narod.ru/