基本形は transient01a.pde と変わりません。 
                TITLE 
                  'Transient Conduction in Cu/Fe'    {
              transient01c.pde } 
               
                SELECT 
                  Errlim = 1e-4 
               
                VARIABLES 
                  temp                 
              { Temperature } 
               
                DEFINITIONS 
                  Lx = 1.0  Ly = 0.1 
                  heat = 0                 
              { Heat source } 
                  k  rcp                   
              { Iron parameters } 
                  fluxd_x = -k*dx(temp)  fluxd_y = -k*dy(temp) 
                  fluxd = vector(fluxd_x, fluxd_y)  fluxd_m =
              magnitude(fluxd) 
                  tempi = 300  temp0 = 500 
               
                INITIAL VALUES 
                  temp = tempi 
               
                EQUATIONS 
                  div(fluxd) + rcp*dt(temp) = heat 
               
              以下のBOUNDARIESセクションにおいて、Region
              1ではドメイン全体としての形状とデフォルトの材質特性を設定、Region
              'copper'では銅の部分の範囲と固有パラメータの設定を行います。 
                BOUNDARIES 
                  Region 1  k = 82  rcp = 7.87e3*449           
              { Fe, default } 
                    Start(0,0) 
                      Natural(temp) = 0  Line to (Lx,
              0) to (Lx, Ly) to (0, Ly) 
                      Value(temp) = temp0  Line to
              Close 
                  Region 'copper'  k = 400  rcp = 8.96e3*385   
              { Cu } 
                    Start(0,0) 
                      Line to (0.2*Lx, 0) to (0.2*Lx, Ly)
              to (0, Ly) to Close 
               
                TIME 
                  from 0 to 10000 
               
              プロットを出力するタイミングは対数スケールを意識して設定します。
              金属棒軸上における温度分布、及び熱流束密度ベクトルのx成分の値を各時点ごとにプロットします。 
               
              PLOTS 
                  for t = 10, 30, 100, 300, 1000, 3000, 10000 
                  Elevation(temp) from (0, Ly/2) to (Lx, Ly/2) 
                  Elevation(fluxd_x) from (0, Ly/2) to (Lx, Ly/2) 
               
              次の指定は金属棒軸上の5点において温度が時間的にどう変化して行くかをHistoryプロットの形で出力させるものです。 
                HISTORIES 
                  History(temp) at (0.1*Lx, Ly/2) at (0.2*Lx, Ly/2)  
                               
              at (0.3*Lx, Ly/2) at (0.4*Lx, Ly/2)  
                               
              at (0.5*Lx, Ly/2) 
               
               
              END  |