重点サンプリング法の質問はここで良いでしょうか？
プログラムを組もうと思っているのですが、重点サンプリング報じたいがよく判らないので、
『解を得るまでのフロー』があっているチェックしてください。

『問題』
P[R<S]を求めるのが最終目的です。（RとSは互いに独立）
fr,fsはS,Rの確率密度関数（それぞれWeibull,Frechet）
I(R<S)はR≦Sなら1を、R>Sなら0を返す関数
重点サンプリング関数は互いに独立な2次元正規分布で平均、標準偏差は共に（18,4.5）

『解を得るまでのフロー』
１. 正規分布(18,4.5)に従う乱数を2つ生成し、(r,s)とする。
２. I(r<s)を計算する。
３．fr(r)*fs(s)を計算する。
４．φ((r-18)/4.5)*φ((s-18)/4.5)を計算する。（φ(●)は標準正規密度関数）
５．（2の結果）*（3の結果）/（4の結果）を計算する。
６．１−５を繰り返し、平均値を取る。

よろしくお願いします。