流体工学 境界層方程式 ホームページプログラミング
連立常微分方程式を解く。diffeq2.html
スクリプト部分の記述
(VBScript の微分方程式の部分) Sub SUB2000 '---------ビブン ホウテイシキ Select case NK Case 0 ' [ DYDX=Y(0)' ] DYDX = Y(1) Case 1 ' [ DYDX=Y(1)' ] DYDX = Y(2) Case 2 ' [ DYDX=Y(2)' ] DYDX = -0.5*Y(0)*Y(2) End Select End Sub