SedimentHydraulics https://blog.hatena.ne.jp/SedimentHydraulics/ 趣味で計算流砂水理 Computational Sediment Hydraulics for Fun Learning https://computational-sediment-hyd.hatenablog.jp/ R やっとできました． 計算条件 境界条件：周期境界条件 平均河床勾配：1/500 水深1.4m 粒径：7粒径区分，うち2粒径が動かない粒径（コード参照） dx：200m，dt：1sec 初期条件：一部区間に最大粒径の2倍程度のマウンドを設ける 計算結果と考察 計算があってると仮定します． マウンド部分が粗粒化が進んで，動かなくなります．単一粒径では起こらない現象です． マウンド以外は分級が生じないです．ほとんど初期材料と構成が変わりません．分級は流れを制限する要因（河床勾配の変化等）がないと生じないと言えます． 粒径によって伝搬速度が異なる． コード こんなにスッキリ書けるとは思いませんでした．… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fcomputational-sediment-hyd.hatenablog.jp%2Fentry%2F2018%2F07%2F19%2F190458" title="一次元河床変動計算，掃流砂のみ混合粒径：コードは世界最短？ - 趣味で計算流砂水理 Computational Sediment Hydraulics for Fun Learning " class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn-ak.f.st-hatena.com/images/fotolife/S/SedimentHydraulics/20180719/20180719190217.gif Hatena Blog https://hatena.blog 2018-07-19 19:04:58 rich https://computational-sediment-hyd.hatenablog.jp/entry/2018/07/19/190458 1.0 100%