#!/usr/bin/env ruby
#
#= dcmodel thumnail generate ruby script
#
#  Editor :: kitamo
#  Version:: 2005/08/02 14:13:23
#
#== Overview
#
#This file is generate by following ruby script automatically.
#
#      /GFD_Dennou_Club/ftp/arch/deepconv/arare/sample/2005-08-02_kitamo/thum/dcmodel-thum.rb
#
#Please edit this file according to your purpose.
#
#== Usage
#
#
##################################################

require "/GFD_Dennou_Club/ftp/arch/deepconv/arare/sample/2005-08-02_kitamo/thum/dcmodel-thum.rb"

######################################################
if $0 == __FILE__ then
  thumb = DCModelThumbnail.new

#  thumb.copyright = "GFD Dennou Club"
  thumb.index     = "../odaka1998"
#  thumb.index_ext = ".htm"
  thumb.infofile  = "odaka1998.txt"
#  thumb.ext_list.push("bmp")
#  thumb.headlimit = "headlimit_"
  thumb.figdir    = "../fig"
#  thumb.css       = "/GFD_Dennou_Club/ftp/arch/dcmodel/htmltools/dcmodel.css"
#  thumb.rd2_path  = "/usr/bin/rd2"
#  thumb.rd2htmlextlib = "/GFD_Dennou_Club/ftp/arch/dcmodel/lib"
  thumb.img_width  = 280
  thumb.img_height = 210
#  thumb.figtable_num = 3
#  thumb.html_author  = "deepconv"
  thumb.title     = "タイトル"
  thumb.message   = Array.new
  thumb.message   << <<-MSG
=begin
[((<地球流体電脳倶楽部|URL:http://www.gfd-dennou.org>))]
[((<deepconv|URL:http://www.gfd-dennou.org/arch/deepconv>)) |
((<計算結果|URL:http://www.gfd-dennou.org/arch/deepconv/arare/sample>))]

= Odaka et al. (1998) 再計算

=end


  MSG

  thumb.message   << <<-MSG
   
    <p>Odaka et al. (1998) の計算を行った. ただし格子点間隔は Odaka et al. (1998) の倍, 水平領域幅は半分にした. </p>

    <table BORDER=\"0\" cellspacing=\"10\" align=\"margin-left:10%\">
    <tr>
    <td>ソースプログラム</td>
    <td><a href=\"./src/\">arare3m-20050716</a></td>
    </tr>
    <tr>
    <td>基本場の温度</td>
    <td>高度 5 km 以下は温位 245 K, 高度 5 km 以上では温度 220 K</td>
    </tr>
    <tr>
    <td>基本場の圧力</td>
    <td>静水圧平衡 (地表面で 700 Pa)</td>
    </tr>
    <tr>
    <td>温度の初期擾乱</td>
    <td>最下層に最大振幅 2 K のランダムな擾乱を与える</td>
    </tr>
    <tr>
    <td>圧力の初期擾乱</td>
    <td>なし</td>
    </tr>
    <tr>
    <td>風速の初期値</td>
    <td>u = 0 m/s , w = 0 m/s</td>
    </tr>
    <tr>
    <td>放射加熱</td>
    <td>高度 5 km 以下で -50 K /day の一様冷却</td>
    </tr>
    <tr>
    <td>地表面フラックス</td>
    <td>バルク法(バルク係数は熱, 運動量ともに 0.01 で一定, 地表面温度 270 K で固定)</td>
    </tr>
    <tr>
    <td>重力加速度</td>
    <td>3.72 m/s<sup>2</sup></td>
    </tr>
    <tr>
    <td>定圧比熱</td>
    <td>32.3 J/K mol (734 J/K Kg)</td>
    </tr>
    <tr>
    <td>平均分子量</td>
    <td>44 x 10<sup>-3</sup> kg/mol</td>
    </tr>
    <tr>
    <td>粘性</td>
    <td>Klemp and Wilhelmson (1978), 係数 0.2</td>
    </tr>
    <tr>
    <td>音波の減衰</td>
    <td>あり (係数は 5.0 x 10<sup>-7</sup>)</td>
    </tr>
    <tr>
    <td>粘性</td>
    <td>あり</td>
    </tr>
    <tr>
    <td>時間フィルタ</td>
    <td>あり (係数は 0.1)</td>
    </tr>
    <tr>
    <td>数値粘性</td>
    <td>あり (5.0 x 10<sup>-4</sup>)</td>
    </tr>
    <tr>
    <td>計算領域</td>
    <td>水平 25.6 km x 鉛直 10 km</td>
    </tr>
    <tr>
    <td>格子点間隔</td>
    <td>水平 200 m x 鉛直 200 m</td>
    </tr>
    <tr>
    <td>積分時間</td>
    <td>12 時間</td>
    </tr>
    <tr>
    <td>時間ステップ</td>
    <td>長い: 3 秒, 短い: 0.15 秒</td>
    </tr>
    <tr>
    <td>境界条件</td>
    <td>水平: 周期, 鉛直: rigid-rid(下), free-slip(上)</td>
    </tr>
    <tr>
    <td>数値解法</td>
    <td>水平: 陽解法, 鉛直: 陰解法</td>
    </tr>
    </table>

  MSG

  thumb.message   << <<-MSG

    <h2>実行環境と計算時間</h2>

    <table BORDER=\"0\" cellspacing=\"10\" align=\"margin-left:10%\">
    <tr>
    <td>実行環境</td>
    <td>不明</td>
    </tr>
    <tr>
    <td>CPU 時間</td>
    <td>不明</td>
    </tr>
    </table>

  MSG
  thumb.create
end