RNGU0(ISEED)   一様乱数.システムルーチンを使用する.  
                                                         
  RNGU1(ISEED)   一様乱数.混合合同法.                  
                                                         
  RNGU2(ISEED)   一様乱数.混合合同法+シャッフル.       
                                                         
  RNGU3(ISEED)   一様乱数.Numerical Recipes の RAN3.    
                                                         
[0,1]の一様乱数を発生させる.
RNGU0(ISEED)
RNGU1(ISEED)
RNGU2(ISEED)
RNGU3(ISEED)
    
                                                                        
  ISEED   (I)   乱数の種.最初の呼び出しのとき, 0でない値を与える.    
                ISEED の戻り値は0である.                               
                2回目以降は,この値を変更せずに呼び出す.               
                ルーチンを初期化しなおすときにには                      
                再び0でない値を与えればよい.                           
                                                                        
  
  
NUMAGUTI Atusi <a1n@gfdl.gov> Last Modified: Thu Aug 31 13:04:08 EDT 1995