Entries from 2015-01-01 to 1 month
素数pを法とした剰余環の乗法群(位数p-1)は巡回群になります。その巡回群の生成元のことを「素数pを法とした原始根」といいます。原始根の存在を予想したのはオイラーですが、存在の証明をしたのはガウスです。この証明は難しくて(じっくり考えれば追えるレ…
3通り書いてみた。 (define (append2 lis1 lis2) (if (pair? lis1) (cons (car lis1) (append2 (cdr lis1) lis2)) lis2)) (define (append22 lis1 lis2) (define (append22-sub lisa lisb) (if (null? lisa) lisb (append22-sub (cdr lisa) (cons (car lisa)…
証明 x!=eと仮定すると G={e, x, ... , x^(q-1)}は位数q(1
(define (tree-walk walker proc lis) (walker (lambda (elm) (if (list? elm) (tree-walk walker proc elm) (proc elm))) lis)) walkerにfor-eachとかmapを入れて、procにprintとかを入れちゃう。lisには入れ子になったリストを入れちゃおう。
★資本とは、増殖を求める価値の運動体である →持ち手を変えるという意味ではなく、姿を変えるという意味での運動■商人資本 G-W-G'(G'>G) →偶然の機会にめぐまれなければ、利潤を得ることができない■金貸資本 G・・・G'(G'>G) →貨幣の借り手は商人資本だが、…