message:l,m:{
<small>
  [ <a href="/">地球流体電脳倶楽部</a> /
    <a href="/library/dcpam">DCPAM</a> /
    <a href="/library/dcpam/sample">計算結果</a> /
    <!-- <a href="/library/dcpam/sample/jupiter.htm">木星大気を想定した仮想惑星実験</a> / --> 
    <a href="SIGEN.htm">SIGEN.htm</a> ] 
</small>
}
message:l,m,rd:{
= 木星大気を想定した仮想惑星実験のための予備的実験

#* 森川 靖大
#  * 2008/03/03 (森川 靖大) 作成

== 概要

※ 書きかけ ((:<br>:))((:<br>:))

木星大気の 2 次元計算をおこなった Sugiyama et al. (2008) を参考に,
木星大気を想定した仮想惑星実験のための予備的実験を行った.
}

message:l,m,rd:{

環境, およびパラメータは以下の通り. 
結果は下記に記す.

== 実験環境
}
message:l,m:{
<table border="1" cellspacing="1" cellpadding="5" align="center">
  <tr>
    <td width="20%">システム (uname -a)</td>
    <td>
      SUPER-UX unix 17.1  SX-8R
    </td>
  </tr>
  
  <tr>
    <td width="20%">コンパイラ</td>
    <td>
      FORTRAN90/SX
    </td>
  </tr>

  <tr>
    <td width="20%">依存するライブラリとバージョン</td>
    <td>
      <ul>
	<li> netCDF ver 3.6.?
	<li> gt4f90io ver 20080219
	<li> ISPACK ver 0.71
	<li> spml ver 0.4.2
      </ul>
    </td>
  </tr>

</table>
}
message:l,m,rd:{
== 実験設定
}
message:l,m:{
<table border="1" cellspacing="1" cellpadding="5" align="center">
<!--
  <tr>
    <td width="20%">プログラムのソースコード</td>
    <td>
      <a href="agcm5.3-20020620-hs94-euler">agcm5.3-20020620 の物理過程の効果を外し, 2Δt の前方差分として
      Held and Suarez (1994) の効果を加えた</a>
      [<a href="agcm5.3-20020620-hs94-euler.tar.gz">TAR.GZ</a>] <br>
      <a href="agcm5.3-20020620-hs94-euler/src/Mkinclude">ビルド時の設定ファイル</a>
    </td>
  </tr>

  <tr>
    <td width="20%">NAMELIST ファイル</td>
    <td>
      <a href="info00/agcm5.t42l20.hs94.nml">info00/agcm5.t42l20.hs94.nml</a>
    </td>
  </tr>

  <tr>
    <td width="20%">初期値</td>
    <td>
      渦度, 発散, 比湿はゼロ.
      地表面気圧は一定 (1000 hPa).
      温度は基本場が 250 K で微笑擾乱が与えられている.
      擾乱の分布については
      <a href="#label-6">初期値および実験結果</a> の項目を参照のこと. 
    </td>
  </tr>
-->

  <tr><td colspan="2">&nbsp;</td></tr>

  <tr>
    <td>計算領域</td>
    <td>
      水平(λ,φ)      : 全球 (λ=[0, 360], φ=[-90, 90])<br>
      鉛直(σ=p/p<sub>0</sub>) : 大気下端〜上端 (σ = [0, 1]), 大気下端は 3.0e+6 Pa
    </td>
  </tr>
  <tr>
    <td>時間間隔</td>
    <td>10 分</td>
  </tr>
  <tr>
    <td>積分時間</td>
    <td>300 日</td>
  </tr>
  <tr>
    <td>境界条件</td>
    <td>
      水平(λ,φ) : 周期境界条件<br>
      鉛直(σ)    : dσ/dt = 0 (σ = 0, 1)
    </td>
  </tr>
  <tr>
    <td>数値解法</td>
    <td>
      <ul>
        <li>水平(λ,φ) : スペクトル法 (球面調和関数展開・三角形切断)<br>
        <li>鉛直(σ)    : 差分法
                          (<a href="#References">Arakawa and Suarez, 1983</a>)<br>
        <li>時間(t)     : リープフロッグスキーム.
	  <ul>
		     <li> ただし重力波の項にはセミインプリシット法を用いる. 
                          時間フィルター (<a href="#References">Asselin, 1972</a>).
		          を用いる. フィルター係数は 0.05
	  </ul>
      </ul>
    </td>
  </tr>
  <tr><td colspan="2">&nbsp;</td></tr>

  <tr>
    <td>空間解像度</td>
    <td>
      東西格子点数 : 64<br>
      南北格子点数 : 32<br>
      鉛直格子点数 : 24
    </td>
  </tr>
  <tr>
    <td>最大波数</td>
    <td>21</td>
  </tr>
  <tr><td colspan="2">&nbsp;</td></tr>
  
  <tr>
    <td>惑星半径</td>
    <td>6.371e+6 [m] (地球の値)</td>
  </tr>
  <tr>
    <td>回転角速度</td>
    <td>7.292e-5 [s-1] (地球の値)</td>
  </tr>
  <tr>
    <td>重力加速度</td>
    <td> 23.1 [m s-2] (Sugiyama et al (2008) より)</td>
  </tr>
  <tr>
    <td>大気定圧比熱</td>
    <td> 11900.9264 [J K-1 kg-1] (Sugiyama et al (2008) より) </td>
  </tr>
  <tr>
    <td>大気気体定数</td>
    <td> 3611.44466 [J K^-1 kg^-1] (Sugiyama et al (2008) より) </td>
  </tr>
  <tr>
    <td>最大波数に対する e-folding time</td>
    <td> 10800.0  [s] </td>
  </tr>
  <tr>
    <td>超粘性の次数</td>
    <td>8</td>
  </tr>
</table>
}
message:l,m,rd:{
== 実行結果に関する付加情報
}
#message:l,m:{
#<table border="1" cellspacing="1" cellpadding="5" align="center">
#  <tr>
#    <td width="20%">標準出力</td>
#    <td>
#      <a href="info00/agcm5.t42l20.hs94_stdout.txt">info00/agcm5.t42l20.hs94_stdout.txt</a>
#    </td>
#  </tr>
#
#  <tr>
#    <td width="20%">標準エラー出力</td>
#    <td>
#      <a href="info00/agcm5.t42l20.hs94_stderr.txt">info00/agcm5.t42l20.hs94_stderr.txt</a>
#    </td>
#  </tr>
#  
#  <tr>
#    <td width="20%">プロファイラによる速度計測</td>
#    <td>
#      <a href="info00/ftrace.txt">info00/ftrace.txt</a>
#    </td>
#  </tr>
#</table>
#}
message::<a name="References"></a>
#message:l,m,rd:{
#=begin
#== 参考文献
#* Arakawa, A., Suarez, M. J., 1983:
#  Vertical differencing of the primitive equations in sigma coordinates.
#  ((|Mon. Wea. Rev.|)), ((*111*)), 34--35.
#* Asselin, R. A., 1972:
#  Frequency filter for time integrations.
#  ((|Mon. Wea. Rev.|)), ((*100*)), 487--490.
#* Held, I. M., and Suarez, M. J., 1994:
#  A proposal for the intercomparison of the dynamical cores of
#  atmospheric general circuation models.
#  ((|Bull. Am. Meteor. Soc.|)), ((* 75 *)), 1825--1830.
#=end
#}
message:m,rd:{
#== 初期値および実験結果
== 実験結果
}
#
# Following parts are Thumbnail comments
#
::
label::東西風速 [m s-1]
label::南北風速 [m s-1]
label::温度 [K]        
label::比湿 [kg kg-1]  
label::鉛直速度 [s-1]    

label:m:{
<pre>σ=1〜0 での
東西平均,
200〜300 日
時間平均値</pre>
}
U_LonMean_200-300DayMean_1-0Sig.png::
V_LonMean_200-300DayMean_1-0Sig.png::
Temp_LonMean_200-300DayMean_1-0Sig.png::
QVap_LonMean_200-300DayMean_1-0Sig.png::
SigmaDot_LonMean_200-300DayMean_1-0Sig.png::

label:m:{
<pre>σ=1〜0.003 での
東西平均,
200〜300 日
時間平均値</pre>
}
U_LonMean_200-300DayMean_1-0.003Sig.png::
V_LonMean_200-300DayMean_1-0.003Sig.png::
Temp_LonMean_200-300DayMean_1-0.003Sig.png::
QVap_LonMean_200-300DayMean_1-0.003Sig.png::
SigmaDot_LonMean_200-300DayMean_1-0.003Sig.png::

label:m:{
<pre>σ=0.003 での
200〜300 日
時間平均値</pre>
}
U_0.003Sig_200-300DayMean.png::
V_0.003Sig_200-300DayMean.png::
Temp_0.003Sig_200-300DayMean.png::
QVap_0.003Sig_200-300DayMean.png::
SigmaDot_0.003Sig_200-300DayMean.png::

label:m:{
<pre>σ=0.003 での
東西平均, 
200〜300 日
時間平均値</pre>
}
U_0.003Sig_LonMean_200-300DayMean.png::
V_0.003Sig_LonMean_200-300DayMean.png::
Temp_0.003Sig_LonMean_200-300DayMean.png::
QVap_0.003Sig_LonMean_200-300DayMean.png::
SigmaDot_0.003Sig_LonMean_200-300DayMean.png::

label:m:{
<pre>σ=0.1 での
東西平均, 
200〜300 日
時間平均値</pre>
}
U_0.1Sig_200-300DayMean.png::
V_0.1Sig_200-300DayMean.png::
Temp_0.1Sig_200-300DayMean.png::
SigmaDot_0.1Sig_200-300DayMean.png::
QVap_0.1Sig_200-300DayMean.png::

label:m:{
<pre>σ=0.2 での
東西平均, 
200〜300 日
時間平均値</pre>
}
U_0.2Sig_200-300DayMean.png::
V_0.2Sig_200-300DayMean.png::
Temp_0.2Sig_200-300DayMean.png::
SigmaDot_0.2Sig_200-300DayMean.png::
QVap_0.2Sig_200-300DayMean.png::

label:: <hr />
label:: <hr />
label:: <hr />
label:: <hr />
label:: <hr />
label:: <hr />

label::
Rain_GlobalMean_0-300Day.png:m:{
降水量の全球平均値の時間変化.
}