2008-04-10から1日間の記事一覧
;;m3.6 ;;線形合同法で乱数をつくる。 (define (rand A B M) ;M > A > 0 ;M > B > 0 ;B, M が互いに素 ;A - 1 がmの持つすべての素因数で割り切れる ;M%4=0 => (A-1)%4=0 ;M > Xn ;;面倒なのでA,B,Mの値を以下からパクります>< ;;http://wiki.fdiary.net/v…
;;m3.6 ;;線形合同法で乱数をつくる。 (define (rand A B M) ;M > A > 0 ;M > B > 0 ;B, M が互いに素 ;A - 1 がmの持つすべての素因数で割り切れる ;M%4=0 => (A-1)%4=0 ;M > Xn ;;面倒なのでA,B,Mの値を以下からパクります>< ;;http://wiki.fdiary.net/v…