From 03eac47f0b38800717516395d2e64814160e35cd Mon Sep 17 00:00:00 2001
From: h677 <h677>
Date: Mon, 26 Jun 2006 14:57:15 +0000
Subject: [PATCH] =?utf8?q?=E6=9C=AA=E4=BD=BF=E7=94=A8=E5=A4=89=E6=95=B0?=
 =?utf8?q?=E3=81=AE=E5=89=8A=E9=99=A4?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

---
 GikoBayesian.pas          | 10 +++++-----
 InputAssistDataModule.pas |  2 +-
 RoundData.pas             |  2 +-
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/GikoBayesian.pas b/GikoBayesian.pas
index 7e28dbe..a8f7c07 100644
--- a/GikoBayesian.pas
+++ b/GikoBayesian.pas
@@ -5,7 +5,7 @@ unit GikoBayesian;
 \brief	ƒxƒCƒWƒAƒ“ƒtƒBƒ‹ƒ^
 
 
-$Id: GikoBayesian.pas,v 1.20 2005/08/18 14:17:47 h677 Exp $
+$Id: GikoBayesian.pas,v 1.21 2006/06/26 14:57:15 h677 Exp $
 }
 
 //! •½‰¼–¼‚ðŽ«‘‚ÉŠÜ‚ß‚È‚¢
@@ -417,7 +417,7 @@ var
 	wKanjiDelimiter		: TStringList;
 	words							: TStringList;
 	aWord							: string;
-	countInfo					: TWordCountInfo;
+//	countInfo					: TWordCountInfo;
 
 	function cutBoth( _aWord : string; _delim : TStringList ) : string;
 	var
@@ -795,7 +795,7 @@ var
 	mean				: Extended;
 	countInfo		: TWordCountInfo;
 	i						: Integer;
-	P1, Q1, R1	: Extended;
+	P1, Q1{, R1}	: Extended;
 	cnt					: Extended;
 begin
 
@@ -891,8 +891,8 @@ var
 	mean				: Extended;
 	countInfo		: TWordCountInfo;
 	i						: Integer;
-	normal			: Extended;
-	important		: Extended;
+//	normal			: Extended;
+//	important		: Extended;
 	P1, Q1			: Extended;
 	cnt					: Extended;
 begin
diff --git a/InputAssistDataModule.pas b/InputAssistDataModule.pas
index eb89a0b..6b0531c 100644
--- a/InputAssistDataModule.pas
+++ b/InputAssistDataModule.pas
@@ -415,7 +415,7 @@ end;
 function TInputAssistDM.IsDupulicate(Key: String; Category: String): Boolean;
 var
 	i : Integer;
-	resWord : TResistWord;
+//	resWord : TResistWord;
 begin
 	// ‚±‚̃ƒ\ƒbƒh‚ł́Aƒ\[ƒgÏ‚Ý‚Æ‚ÍŒÀ‚ç‚È‚¢‚̂ŁA‘S‚ẴL[‚ð’Tõ‚µ‚Ä‚¢‚é
 	Result := False;
diff --git a/RoundData.pas b/RoundData.pas
index 48d3216..3380a8b 100644
--- a/RoundData.pas
+++ b/RoundData.pas
@@ -52,7 +52,7 @@ type
 	private
 //
 		FItem		: TObject;
-		FBBSType: TGikoBBSType;
+//		FBBSType: TGikoBBSType;
 		FRoundName: string;
 		FRoundType: TGikoRoundType;
 	//Item			: TObject;
-- 
2.11.0