論理的思考法/演繹的推論

提供: Internet Web School

(版間での差分)
78 行: 78 行:
特に,A.I.　や　ICTの進歩など数学を含む科学技術の進歩の激流の中にある,科学工学の技術者は[http://ja.wikipedia.org/wiki/Mizar Mizar]のようなシステムの操作にも慣れ親しむことが必要になってくる.
特に,A.I.　や　ICTの進歩など数学を含む科学技術の進歩の激流の中にある,科学工学の技術者は[http://ja.wikipedia.org/wiki/Mizar Mizar]のようなシステムの操作にも慣れ親しむことが必要になってくる.
 +
<pre>
 +
environ
 +
 +
vocabularies NUMBERS, REAL_1, FINSEQ_1, VALUED_0, XBOOLE_0, NEWTON, ARYTM_3,
 +
      RELAT_1, NAT_1, XXREAL_0, ARYTM_1, SUBSET_1, CARD_1, CARD_3, ORDINAL4,
 +
      TARSKI, INT_2, FUNCT_1, FINSEQ_2, PRE_POLY, PBOOLE, FINSET_1, XCMPLX_0,
 +
      UPROOTS, FUNCT_2, BINOP_2, SETWISEO, INT_1, FUNCOP_1, NAT_3, XREAL_0;
 +
notations TARSKI, XBOOLE_0, SUBSET_1, FINSET_1, ORDINAL1, CARD_1, NUMBERS,
 +
      XCMPLX_0, XXREAL_0, XREAL_0, REAL_1, NAT_D, INT_2, RELAT_1, FUNCT_1,
 +
      FUNCT_2, FINSEQ_1, FINSEQ_2, VALUED_0, PBOOLE, RVSUM_1, NEWTON, WSIERP_1,
 +
      TREES_4, BINOP_2, FUNCOP_1, XXREAL_2, SETWOP_2, PRE_POLY;
 +
constructors BINOP_1, SETWISEO, NAT_D, FINSEQOP, FINSOP_1, NEWTON, WSIERP_1,
 +
      BINOP_2, XXREAL_2, RELSET_1, PRE_POLY, REAL_1,CARD_1;
 +
registrations XBOOLE_0, RELAT_1, FUNCT_1, FINSET_1, NUMBERS, XCMPLX_0,
 +
      XXREAL_0, NAT_1, INT_1, BINOP_2, MEMBERED, NEWTON, VALUED_0, FINSEQ_1,
 +
      XXREAL_2, CARD_1, FUNCT_2, RELSET_1, ZFMISC_1, FINSEQ_2, PRE_POLY,
 +
      XREAL_0, RVSUM_1;
 +
requirements NUMERALS, SUBSET, ARITHM, REAL, BOOLE;
 +
definitions TARSKI, XBOOLE_0, INT_2, NAT_D, FINSEQ_1, VALUED_0,
 +
    PRE_POLY,FINSET_1,CARD_1;
 +
theorems ORDINAL1, NEWTON, NAT_1, XCMPLX_1, INT_1, CARD_4, XREAL_0, RVSUM_1,
 +
      INT_2, PEPIN, FUNCT_1, CARD_2, PREPOWER, FINSEQ_1, TARSKI, XBOOLE_1,
 +
      FUNCOP_1, WSIERP_1, XBOOLE_0, FINSEQ_2, FINSEQ_3, FINSEQ_4, RELAT_1,
 +
      FINSOP_1, FUNCT_2, XREAL_1, XXREAL_0, NAT_D, VALUED_0, XXREAL_2,
 +
      FINSET_1,PARTFUN1, PRE_POLY, CARD_1;
 +
schemes NAT_1, PRE_CIRC, FINSEQ_1, FINSEQ_2, PBOOLE, CLASSES1;
 +
 +
begin
 +
 +
 +
now
 +
let
 +
  Humankind be finite set,
 +
  Tokyoite be Subset of  Humankind,
 +
  Numberofhair be  Function of Tokyoite,NAT ;
 +
 +
 +
assume  LM1:
 +
  card (Tokyoite) = 12*10|^6;
 +
assume  LM2:
 +
  for x be object
 +
    st x in Tokyoite
 +
  holds Numberofhair.x <= 10|^6;
 +
 +
 +
LM0:
 +
  10|^6 + 1 < 12*10|^6
 +
proof
 +
0 < 10|^6 by PREPOWER:6;
 +
then
 +
P2: 1*10|^6 < 11* 10|^6 by XREAL_1:68;
 +
P3: 1 <  10 & 2 <= 6;
 +
then
 +
10 < 10 |^6 by PREPOWER:13;
 +
then
 +
1 < 10 |^6 by XXREAL_0:2,P3;
 +
then
 +
1 < 11*10|^6 by P2,XXREAL_0:2;
 +
then
 +
P4: 1*10|^6 + 1 < 1*10|^6 + 11*10|^6 by XREAL_1:8;
 +
1*10|^6 + 11*10|^6 = (1+11)*10|^6  ;
 +
hence thesis by P4;
 +
end;
 +
 +
 +
LM3:
 +
  card (rng Numberofhair) <= 10|^6+1
 +
proof
 +
now let y be  object ;
 +
  assume
 +
  y in  rng Numberofhair;
 +
  then
 +
  consider  x be object
 +
    such that
 +
    A1: x in Tokyoite & y=Numberofhair.x  by FUNCT_2:11;
 +
  Numberofhair.x <= 10|^6 by A1,LM2;
 +
  then
 +
  Numberofhair.x < 10|^6+1 by NAT_1:16,XXREAL_0:2;
 +
  then
 +
  Numberofhair.x  in Segm (10|^6+1) by NAT_1:44,A1;
 +
  hence
 +
  y in Segm (10|^6+1) by A1;
 +
end;
 +
then
 +
A2: rng Numberofhair
 +
  c= Segm (10|^6+1) by TARSKI:def 3;
 +
then
 +
card rng Numberofhair <= card Segm (10|^6+1) by NAT_1:43;
 +
then
 +
card rng Numberofhair <= card (10|^6+1) by ORDINAL1:def 17;
 +
hence
 +
card rng Numberofhair <= (10|^6+1)  ;
 +
end;
 +
 +
LM4:
 +
card (rng (Numberofhair))
 +
< card  (Tokyoite)
 +
proof
 +
reconsider N1= card (rng (Numberofhair))
 +
as Element of NAT ;
 +
reconsider N2= card (Tokyoite)
 +
as Element of NAT ;
 +
A1: N1<=(10|^6+1) & N2=12*10|^6 by LM1,LM3;
 +
then 
 +
N1 < N2 by A1,XXREAL_0:2,LM0;
 +
hence thesis ;
 +
end;
 +
 +
 +
EX:
 +
  ex x,y be object 
 +
    st x in Tokyoite
 +
      & y in Tokyoite
 +
      & x <> y 
 +
      & Numberofhair.x = Numberofhair.y
 +
 +
proof
 +
assume
 +
A1:
 +
  not
 +
    (  ex x,y be object
 +
    st x in Tokyoite
 +
      & y in Tokyoite
 +
      & x <> y 
 +
      & Numberofhair.x = Numberofhair.y ) ;
 +
 +
then
 +
A2:  for x,y be object
 +
    st x in Tokyoite
 +
      & y in Tokyoite
 +
      & x <> y 
 +
    holds 
 +
      Numberofhair.x <> Numberofhair.y  ;
 +
 +
A3: dom Numberofhair = Tokyoite by FUNCT_2:def 1;
 +
then
 +
for x,y be object st x in dom Numberofhair
 +
            & y in dom Numberofhair
 +
            & Numberofhair.x = Numberofhair.y
 +
      holds x = y by A2;
 +
then
 +
Numberofhair is one-to-one by FUNCT_1:def 4;
 +
then
 +
card  (dom Numberofhair) = card (rng Numberofhair)
 +
  by CARD_1:70;
 +
then
 +
card  (Tokyoite) = card (rng (Numberofhair))
 +
  by A3;
 +
hence contradiction by LM4;
 +
end;
 +
end;
 +
 +
 
 +
 +
</pre>
[[ファイル:MIZ1.jpg|800px]]
[[ファイル:MIZ1.jpg|800px]]

2020年11月30日 (月) 06:41時点における版

演繹的推論は論理的思考の根幹である.


簡単な例を挙げる。

  • (1)人間の髪の毛の本数は100万本以下である.
  • (2)東京都民の人口は1200万人である.

これらの命題が正しければ

  • (3)東京都民のうち少なくとも2人は髪の毛の本数は同じである.


この命題の正しさを示すには背理法による.

命題(3)の否定が成り立つものとする。


命題(3)は厳密に書くと

　「東京都民A,Bがいて,A,Bは同一人物でなくかつA,Bの髪の毛の本数は同じ」

である．

このこの命題の否定は

  • (4)任意の東京都民A,Bについて,A,Bが同一人物でなければ　A,Bの髪の毛の本数は等しくない．

である.

ここでは(4)が正しいと仮定している．


東京都民一人一人にその人自身の髪の毛の本数によって背番号を振ることを考える. 例え ば毛の本数が0本の人には背番号0を，1000本の人には背番号1000を振る。


都民全員に付与した背番号は(4)の仮定により誰一人として同じものはなく, 一人一人に唯一の背番号が振られる.

「(1)人間の髪の毛の本数は100万本以下である.」が正しいとしているから 振られる番号は0番から100万まででの100万+1通りである.

都民全員に付与した背番号はそれぞれに唯一であるから 都民全員の数は100万人+１人である.

しかしこれは「(2)東京都民の人口は1200万人である.」に矛盾する.

この矛盾は 命題「東京都民のうち少なくとも2人は髪の毛の本数は同じである.」

の否定が成り立つとしたことによっている.

従って「東京都民のうち少なくとも2人は髪の毛の本数は同じである.」が正しい.


上記の　命題(1),(2)が正しければ命題(3)が正しいことを論証した過程は 論理の連鎖に依っている.命題(3)を否定した命題が正しいとして論理の連鎖を つくり,矛盾を導くことによって命題(3)の正しさを証明した.


演繹推論はこのように,正しいもとして与えられた命題から厳密な論理を 繰り返し適用することによって新たな命題を結論として導き出す.

この過程(証明)は,その論証の過程に出てくる命題やそれに施す論理的な推論を計算機によって処理できる形式化された記述で書けば,計算機によってその正しさを検証できる.それを形式化を行うかどうかは別として計算機による検証で正しさが認められるものでなければ完全な演繹推論とは言えない.


実際,以下は定理証明支援系のMizarによって上記の推論を記述したものである. Mizarのような定理証明支援系あるいは形式化証明検証システムでは,命題は全て記号列であり,三段論法その他の推論規則はそれらの複数の記号列を操作して 別の新たな記号列を構成する規則に過ぎない.証明は,前提となる命題(記号列)から出発して,目的の命題(記号列)に至る,推論規則により 生成された記号列の列にに過ぎない.


特に,A.I.　や　ICTの進歩など数学を含む科学技術の進歩の激流の中にある,科学工学の技術者はMizarのようなシステムの操作にも慣れ親しむことが必要になってくる. 

environ

 vocabularies NUMBERS, REAL_1, FINSEQ_1, VALUED_0, XBOOLE_0, NEWTON, ARYTM_3,
      RELAT_1, NAT_1, XXREAL_0, ARYTM_1, SUBSET_1, CARD_1, CARD_3, ORDINAL4,
      TARSKI, INT_2, FUNCT_1, FINSEQ_2, PRE_POLY, PBOOLE, FINSET_1, XCMPLX_0,
      UPROOTS, FUNCT_2, BINOP_2, SETWISEO, INT_1, FUNCOP_1, NAT_3, XREAL_0;
 notations TARSKI, XBOOLE_0, SUBSET_1, FINSET_1, ORDINAL1, CARD_1, NUMBERS,
      XCMPLX_0, XXREAL_0, XREAL_0, REAL_1, NAT_D, INT_2, RELAT_1, FUNCT_1,
      FUNCT_2, FINSEQ_1, FINSEQ_2, VALUED_0, PBOOLE, RVSUM_1, NEWTON, WSIERP_1,
      TREES_4, BINOP_2, FUNCOP_1, XXREAL_2, SETWOP_2, PRE_POLY;
 constructors BINOP_1, SETWISEO, NAT_D, FINSEQOP, FINSOP_1, NEWTON, WSIERP_1,
      BINOP_2, XXREAL_2, RELSET_1, PRE_POLY, REAL_1,CARD_1;
 registrations XBOOLE_0, RELAT_1, FUNCT_1, FINSET_1, NUMBERS, XCMPLX_0,
      XXREAL_0, NAT_1, INT_1, BINOP_2, MEMBERED, NEWTON, VALUED_0, FINSEQ_1,
      XXREAL_2, CARD_1, FUNCT_2, RELSET_1, ZFMISC_1, FINSEQ_2, PRE_POLY,
      XREAL_0, RVSUM_1;
 requirements NUMERALS, SUBSET, ARITHM, REAL, BOOLE;
 definitions TARSKI, XBOOLE_0, INT_2, NAT_D, FINSEQ_1, VALUED_0, 
    PRE_POLY,FINSET_1,CARD_1;
 theorems ORDINAL1, NEWTON, NAT_1, XCMPLX_1, INT_1, CARD_4, XREAL_0, RVSUM_1,
      INT_2, PEPIN, FUNCT_1, CARD_2, PREPOWER, FINSEQ_1, TARSKI, XBOOLE_1,
      FUNCOP_1, WSIERP_1, XBOOLE_0, FINSEQ_2, FINSEQ_3, FINSEQ_4, RELAT_1,
      FINSOP_1, FUNCT_2, XREAL_1, XXREAL_0, NAT_D, VALUED_0, XXREAL_2,
      FINSET_1,PARTFUN1, PRE_POLY, CARD_1;
 schemes NAT_1, PRE_CIRC, FINSEQ_1, FINSEQ_2, PBOOLE, CLASSES1;

begin


now 
 let 
  Humankind be finite set, 
  Tokyoite be Subset of  Humankind,
  Numberofhair be  Function of Tokyoite,NAT ;


assume  LM1:
  card (Tokyoite) = 12*10|^6;
assume  LM2:
  for x be object 
     st x in Tokyoite 
  holds Numberofhair.x <= 10|^6;


LM0:
  10|^6 + 1 < 12*10|^6
proof
0 < 10|^6 by PREPOWER:6;
then
P2: 1*10|^6 < 11* 10|^6 by XREAL_1:68;
P3: 1 <  10 & 2 <= 6;
then
10 < 10 |^6 by PREPOWER:13;
then
1 < 10 |^6 by XXREAL_0:2,P3;
then
1 < 11*10|^6 by P2,XXREAL_0:2;
then
P4: 1*10|^6 + 1 < 1*10|^6 + 11*10|^6 by XREAL_1:8;
1*10|^6 + 11*10|^6 = (1+11)*10|^6  ;
hence thesis by P4;
end;


LM3:
  card (rng Numberofhair) <= 10|^6+1 
proof
 now let y be  object ;
   assume
   y in  rng Numberofhair;
   then
   consider  x be object 
     such that 
    A1: x in Tokyoite & y=Numberofhair.x   by FUNCT_2:11;
   Numberofhair.x <= 10|^6 by A1,LM2;
   then 
   Numberofhair.x < 10|^6+1 by NAT_1:16,XXREAL_0:2;
   then
   Numberofhair.x  in Segm (10|^6+1) by NAT_1:44,A1;
   hence 
   y in Segm (10|^6+1) by A1;
end;
then
A2: rng Numberofhair
   c= Segm (10|^6+1) by TARSKI:def 3;
 then
 card rng Numberofhair <= card Segm (10|^6+1) by NAT_1:43;
 then
 card rng Numberofhair <= card (10|^6+1) by ORDINAL1:def 17;
 hence 
 card rng Numberofhair <= (10|^6+1)  ;
end;

LM4:
card (rng (Numberofhair)) 
 < card  (Tokyoite) 
proof
reconsider N1= card (rng (Numberofhair)) 
 as Element of NAT ;
reconsider N2= card (Tokyoite) 
 as Element of NAT ;
A1: N1<=(10|^6+1) & N2=12*10|^6 by LM1,LM3;
then  
N1 < N2 by A1,XXREAL_0:2,LM0;
hence thesis ;
end;


EX:
  ex x,y be object  
    st x in Tokyoite 
       & y in Tokyoite 
       & x <> y   
       & Numberofhair.x = Numberofhair.y 

proof
assume 
A1: 
  not 
    (  ex x,y be object 
    st x in Tokyoite 
       & y in Tokyoite 
       & x <> y   
       & Numberofhair.x = Numberofhair.y ) ;

 then
A2:  for x,y be object 
    st x in Tokyoite 
       & y in Tokyoite 
       & x <> y   
     holds  
       Numberofhair.x <> Numberofhair.y  ;

A3: dom Numberofhair = Tokyoite by FUNCT_2:def 1;
then
for x,y be object st x in dom Numberofhair 
             & y in dom Numberofhair 
             & Numberofhair.x = Numberofhair.y 
      holds x = y by A2;
then
Numberofhair is one-to-one by FUNCT_1:def 4;
then
card  (dom Numberofhair) = card (rng Numberofhair) 
  by CARD_1:70;
then
card  (Tokyoite) = card (rng (Numberofhair)) 
  by A3;
hence contradiction by LM4;
end;
end;


「http://www.ja.iwschool.org/wiki/%E8%AB%96%E7%90%86%E7%9A%84%E6%80%9D%E8%80%83%E6%B3%95/%E6%BC%94%E7%B9%B9%E7%9A%84%E6%8E%A8%E8%AB%96」より作成
個人用ツール