k_set_seed_random_rp

    組み込みサブルーチンrandom_numberの実行結果に再現性をもたせるように，random_seedを設定するサブルーチン
     
     
  • サブルーチン名： k_set_seed_random_rp

    •  
  • 呼び出し方：call k_set_seed_random_rp

    •  
  • 注　意：
    1. よく知られているように，fortranの組み込みサブルーチンrandom_numberを用いたプログラムは再現性がない．この問題を解決するためには，random_numberを呼び出す前にサブルーチンk_set_seed_random_rpを1回だけ呼び出しておけば良い．

  • 使用例
    • ………
    real::harvest
    ………
    call k_set_seed_random_rp　　
    ………
    call random_number(harvest)　　
    ……