<?php
   //$mimeTeXurl = 'http://d.hatena.ne.jp/cgi-bin/mimetex.cgi?';
   //$mimeTeXurl = 'http://www.forkosh.dreamhost.com/mimetex.cgi?';
   $mimeTeXurl  = 'http://latex.codecogs.com/png.latex?';
   $mimeTeXinL  = 'http://latex.codecogs.com/gif.latex?';

   $HelpTeXurl   = "http://meta.wikimedia.org/wiki/%E3%83%98%E3%83%AB%E3%83%97:%E6%95%B0%E5%BC%8F%E3%81%AE%E6%9B%B8%E3%81%8D%E6%96%B9";
   $GuidURL      = 'guid.txt';
   $SampleHtmlURL= 'sample.html';
   $SampleTxtURL = 'sample.txt';

// Pre変換  (Html  escape)
   $GooTbl[mb_substr("¥",0,1,'SJIS')] = "\\";
   $GooTbl[mb_substr('?',0,1,'SJIS')] = '?';
   $GooTbl[mb_substr('&',0,1,'SJIS')] = '&';
   // call by <img		// imgタグ内には書けないもの
   $GooTbl[mb_substr('<',0,1,'SJIS')] = '<';
   $GooTbl[mb_substr('>',0,1,'SJIS')] = '>';
   $GooTbl[mb_substr("’",0,1,'SJIS')] = "'";
   $GooTbl[mb_substr('”',0,1,'SJIS')] = '"';
   // call by [[(img   	// wikiタグ内には書けないもの
   $GooTbl[mb_substr('、',0,1,'SJIS')] = ',';
   $GooTbl[mb_substr('(',0,1,'SJIS')] = "(";
   $GooTbl[mb_substr(')',0,1,'SJIS')] = ")";
// Pre変換  (全角の演算記号)
   $GooTbl[mb_substr('=',0,1,'SJIS')] = '=';
   $GooTbl[mb_substr('!',0,1,'SJIS')] = '!';
   $GooTbl[mb_substr("+",0,1,'SJIS')] = '+';
   $GooTbl[mb_substr("ー",0,1,'SJIS')] = '-';
   $GooTbl[mb_substr("-",0,1,'SJIS')] = '-';
   $GooTbl[mb_substr("*",0,1,'SJIS')] = '*';
// Pre変換  (Goo変換)
   $GooTbl[mb_substr("&alpha;",0,7,'SJIS')] = 'α';
   $GooTbl[mb_substr("&beta;",0,6,'SJIS')] = 'β';
   $GooTbl[mb_substr("&gamma;",0,7,'SJIS')] = 'γ';
   $GooTbl[mb_substr("&delta;",0,7,'SJIS')] = 'δ';
   $GooTbl[mb_substr("&epsilon;",0,9,'SJIS')] = 'ε';
   $GooTbl[mb_substr("&zeta;",0,6,'SJIS')] = 'ζ'; 
   $GooTbl[mb_substr("&eta;",0,5,'SJIS')] = 'η'; 
   $GooTbl[mb_substr("&theta;",0,7,'SJIS')] = 'θ';
   $GooTbl[mb_substr("&iota;",0,6,'SJIS')] = 'ι';
   $GooTbl[mb_substr("&kappa;",0,7,'SJIS')] = 'κ';
   $GooTbl[mb_substr("&lambda;",0,8,'SJIS')] = 'λ';
   $GooTbl[mb_substr("&mu;",0,4,'SJIS')] = 'μ';
   $GooTbl[mb_substr("&nu;",0,4,'SJIS')] = 'ν';
   $GooTbl[mb_substr("&xi;",0,4,'SJIS')] = 'ξ';
   $GooTbl[mb_substr("&pi;",0,4,'SJIS')] = 'π';
   $GooTbl[mb_substr("&rho;",0,5,'SJIS')] = 'ρ';
   $GooTbl[mb_substr('&omiklon;',0,9,'SJIS')] = 'o ';      // ?
   $GooTbl[mb_substr("&sigma;",0,7,'SJIS')] = 'σ';
   $GooTbl[mb_substr("&tau;",0,5,'SJIS')] = 'τ';
   $GooTbl[mb_substr("&upsilon;",0,9,'SJIS')] = 'υ';
   $GooTbl[mb_substr("&phi;",0,5,'SJIS')] = 'φ';
   $GooTbl[mb_substr("&chi;",0,5,'SJIS')] = 'χ';
   $GooTbl[mb_substr('&psi;',0,5,'SJIS')] = 'ψ';
   $GooTbl[mb_substr("&omega;",0,7,'SJIS')] = 'ω';
   $GooTbl[mb_substr("&Beta;",0,6,'SJIS')] = 'Β';
   $GooTbl[mb_substr("&Gamma;",0,7,'SJIS')] = 'Γ';
   $GooTbl[mb_substr("&Delta;",0,7,'SJIS')] = '⊿';
   $GooTbl[mb_substr("&Xi;",0,4,'SJIS')] = 'Ξ';
   $GooTbl[mb_substr("&Theta;",0,7,'SJIS')] = 'Θ';
   $GooTbl[mb_substr("&Lambda;",0,8,'SJIS')] = 'Λ';
   $GooTbl[mb_substr("&Psi;",0,5,'SJIS')] = 'Ψ';
   $GooTbl[mb_substr("&Phi;",0,5,'SJIS')] = 'Φ';
   $GooTbl[mb_substr("&Omega;",0,7,'SJIS')] = 'Ω';
   
   	$GooTbl[mb_substr('&Sigma;',0,7,'SJIS')] = 'Σ';
   	$GooTbl[mb_substr("&Pi;",0,4,'SJIS')]    = 'Π';
   	$GooTbl[mb_substr('&part;',0,6,'SJIS')]  = '∂';	
   	$GooTbl[mb_substr("&equiv;",0,7,'SJIS')] = '≡';
   	$GooTbl[mb_substr('&int;',0,5,'SJIS')]   = '∫';
   	$GooTbl[mb_substr('&infin;',0,7,'SJIS')] = '∞';
   	$GooTbl[mb_substr('&radic;',0,7,'SJIS')] = '√';
   	$GooTbl[mb_substr('&emsp;',0,6,'SJIS')]  = " ";
   	$GooTbl[mb_substr('&rsquo;',0,7,'SJIS')] = "'";
   	$GooTbl[mb_substr('&rdquo;',0,7,'SJIS')] = '"';
   	$GooTbl[mb_substr('&dagger;',0,8,'SJIS')]= '†';
   	$GooTbl[mb_substr('&isin;',0,6,'SJIS')]  = '∈';
   	$GooTbl[mb_substr('&nabla;',0,7,'SJIS')] = '∇';
	$GooTbl[mb_substr('&times;',0,7,'SJIS')] = '×';	//'\times '; 
	$GooTbl[mb_substr('&divide;',0,8,'SJIS')]= '÷';	//'\div ';
	$GooTbl[mb_substr("&plusmn;",0,8,'SJIS')]= '±';	//'\pm ';
	$GooTbl[mb_substr("&ne;",0,4,'SJIS')]   =  '≠';	//\neq ';
	$GooTbl[mb_substr("&there4;",0,8,'SJIS')]= '∴';	//\therefore ';
	$GooTbl[mb_substr('&forall;',0,8,'SJIS')]= '∀';	//\forall ';
	$GooTbl[mb_substr('&exist;',0,7,'SJIS')] = '∃';	//\exists ';
	$GooTbl[mb_substr('&cap;',0,5,'SJIS')]  = '∩';		//\cap ';
	$GooTbl[mb_substr('&cup;',0,5,'SJIS')]  = '∪';		//\cup ';
	$GooTbl[mb_substr('&sub;',0,5,'SJIS')]  = '⊂';		//\subset ';
	$GooTbl[mb_substr('&sup;',0,5,'SJIS')]  = '⊃';		//\supset ';
	$GooTbl[mb_substr("&uarr;",0,6,'SJIS')] = '↑';		//\uparrow ';
	$GooTbl[mb_substr("&darr;",0,6,'SJIS')] = '↓';		//\downarrow ';
	$GooTbl[mb_substr("&rarr;",0,6,'SJIS')] = '→';		//\rightarrow '; 
	$GooTbl[mb_substr("&larr;",0,6,'SJIS')] = '←';		//\leftarrow ';
	$GooTbl[mb_substr('&or;',0,4,'SJIS')]   = '∨';		//\lor ';
	$GooTbl[mb_substr('&and;',0,5,'SJIS')]  = '∧';		//\land ';
	$GooTbl[mb_substr('&lt;',0,4,'SJIS')] = '<';		
	$GooTbl[mb_substr('&gt;',0,4,'SJIS')] = '>';		

// TeX変換  (1byte変換Tbl)
   $grk[mb_substr("1",0,1,'SJIS')] = '\mathbf{1}';
   $grk[mb_substr("A",0,1,'SJIS')] = '\mathbf{A}';
   $grk[mb_substr("B",0,1,'SJIS')] = '\mathbf{B}';
   $grk[mb_substr("C",0,1,'SJIS')] = '\mathbf{C}';
   $grk[mb_substr("D",0,1,'SJIS')] = '\mathbf{D}';
   $grk[mb_substr("E",0,1,'SJIS')] = '\mathbf{E}';
   $grk[mb_substr("F",0,1,'SJIS')] = '\mathbf{F}';
   $grk[mb_substr("G",0,1,'SJIS')] = '\mathbf{G}';
   $grk[mb_substr("H",0,1,'SJIS')] = '\mathbf{H}';
   $grk[mb_substr("I",0,1,'SJIS')] = '\mathbf{I}';
   $grk[mb_substr("J",0,1,'SJIS')] = '\mathbf{J}';
   $grk[mb_substr("K",0,1,'SJIS')] = '\mathbf{K}';
   $grk[mb_substr("L",0,1,'SJIS')] = '\mathbf{L}';
   $grk[mb_substr("M",0,1,'SJIS')] = '\mathbf{M}';
   $grk[mb_substr("N",0,1,'SJIS')] = '\mathbf{N}';
   $grk[mb_substr("O",0,1,'SJIS')] = '\mathbf{O}';
   $grk[mb_substr("P",0,1,'SJIS')] = '\mathbf{P}';
   $grk[mb_substr("Q",0,1,'SJIS')] = '\mathbf{Q}';
   $grk[mb_substr("R",0,1,'SJIS')] = '\mathbf{R}';
   $grk[mb_substr("S",0,1,'SJIS')] = '\mathbf{S}';
   $grk[mb_substr("T",0,1,'SJIS')] = '\mathbf{T}';
   $grk[mb_substr("U",0,1,'SJIS')] = '\mathbf{U}';
   $grk[mb_substr("V",0,1,'SJIS')] = '\mathbf{V}';
   $grk[mb_substr("W",0,1,'SJIS')] = '\mathbf{W}';
   $grk[mb_substr("X",0,1,'SJIS')] = '\mathbf{X}';
   $grk[mb_substr("Y",0,1,'SJIS')] = '\mathbf{Y}';
   $grk[mb_substr("Z",0,1,'SJIS')] = '\mathbf{Z}';
   $grk[mb_substr("a",0,1,'SJIS')] = '\mathbf{a}';
   $grk[mb_substr("c",0,1,'SJIS')] = '\mathbf{c}';
   $grk[mb_substr("g",0,1,'SJIS')] = '\mathbf{g';
   $grk[mb_substr("p",0,1,'SJIS')] = '\mathbf{p}';
   $grk[mb_substr("q",0,1,'SJIS')] = '\mathbf{q}';
   $grk[mb_substr("r",0,1,'SJIS')] = '\mathbf{r}';
   $grk[mb_substr("u",0,1,'SJIS')] = '\mathbf{u}';
   $grk[mb_substr("v",0,1,'SJIS')] = '\mathbf{v}';
   $grk[mb_substr("e",0,1,'SJIS')] = '\mathrm{e}';
   $grk[mb_substr("d",0,1,'SJIS')] = '\mathrm{d}';
   $grk[mb_substr("n",0,1,'SJIS')] = '\mathrm{n}';
   $grk[mb_substr("m",0,1,'SJIS')] = '\mathrm{m}';
   $grk[mb_substr("i",0,1,'SJIS')] = '\mathrm{i}';
   $grk[mb_substr("j",0,1,'SJIS')] = '\mathrm{j}';
   $grk[mb_substr("k",0,1,'SJIS')] = '\kappa ';
   $grk[mb_substr("x",0,1,'SJIS')] = 'x';
   $grk[mb_substr("y",0,1,'SJIS')] = 'y';
   $grk[mb_substr("z",0,1,'SJIS')] = 'z';
   $grk[mb_substr("t",0,1,'SJIS')] = 't';
   
   $grk[mb_substr("α",0,1,'SJIS')] = '\alpha ';
   $grk[mb_substr("β",0,1,'SJIS')] = '\beta ';
   $grk[mb_substr("γ",0,1,'SJIS')] = '\gamma ';
   $grk[mb_substr("δ",0,1,'SJIS')] = '\delta ';
   $grk[mb_substr("ε",0,1,'SJIS')] = '\epsilon ';
   $grk[mb_substr("ζ",0,1,'SJIS')] = '\zeta '; 
   $grk[mb_substr("η",0,1,'SJIS')] = '\eta '; 
   $grk[mb_substr("θ",0,1,'SJIS')] = '\theta ';
   $grk[mb_substr("ι",0,1,'SJIS')] = '\iota ';
   $grk[mb_substr("κ",0,1,'SJIS')] = '\kappa ';
   $grk[mb_substr("λ",0,1,'SJIS')] = '\lambda ';
   $grk[mb_substr("μ",0,1,'SJIS')] = '\mu ';
   $grk[mb_substr("ν",0,1,'SJIS')] = '\nu ';
   $grk[mb_substr("ξ",0,1,'SJIS')] = '\xi ';
   $grk[mb_substr("π",0,1,'SJIS')] = '\pi ';
   $grk[mb_substr("ρ",0,1,'SJIS')] = '\rho ';
   $grk[mb_substr('ο',0,1,'SJIS')] = 'o ';      // ?
   $grk[mb_substr("σ",0,1,'SJIS')] = '\sigma ';
   $grk[mb_substr("τ",0,1,'SJIS')] = '\tau ';
   $grk[mb_substr("υ",0,1,'SJIS')] = '\upsilon ';
   $grk[mb_substr("φ",0,1,'SJIS')] = '\phi ';
   $grk[mb_substr("χ",0,1,'SJIS')] = '\chi ';
   $grk[mb_substr('ψ',0,1,'SJIS')] = '\psi ';
   $grk[mb_substr("ω",0,1,'SJIS')] = '\omega ';
   $grk[mb_substr("Β",0,1,'SJIS')] = '\Beta ';
   $grk[mb_substr("Γ",0,1,'SJIS')] = '\Gamma ';
   $grk[mb_substr("⊿",0,1,'SJIS')] = '\Delta ';
   $grk[mb_substr("Δ",0,1,'SJIS')] = '\Delta ';
   $grk[mb_substr("Ξ",0,1,'SJIS')] = '\Xi ';
   $grk[mb_substr("Θ",0,1,'SJIS')] = '\Theta ';
   $grk[mb_substr("Λ",0,1,'SJIS')] = '\Lambda ';
   $grk[mb_substr('Ψ',0,1,'SJIS')] = '\Psi ';
   $grk[mb_substr("Φ",0,1,'SJIS')] = '\Phi ';
   $grk[mb_substr("Ω",0,1,'SJIS')] = '\Omega ';
   
   $grk[mb_substr('Σ',0,1,'SJIS')] = '\sum ';
   $grk[mb_substr("Π",0,1,'SJIS')] = '\prod ';

   $grk[mb_substr("∇",0,1,'SJIS')] = '\nabla ';
   $grk[mb_substr("□",0,1,'SJIS')] = '\Box ';
   $grk[mb_substr("△",0,1,'SJIS')] = '\triangle ';
   $grk[mb_substr("∞",0,1,'SJIS')] = '\infty ';
   $grk[mb_substr("・",0,1,'SJIS')] = '\cdot ';
   $grk[mb_substr("。",0,1,'SJIS')] = '\circ ';
   $grk[mb_substr("田",0,1,'SJIS')] = '\otimes ';
   $grk[mb_substr('×',0,1,'SJIS')] = '\times ';
   $grk[mb_substr('÷',0,1,'SJIS')] = '\div ';
   $grk[mb_substr("√",0,1,'SJIS')] = '\sqrt ';
   $grk[mb_substr("±",0,1,'SJIS')] = '\pm ';
   $grk[mb_substr("=",0,1,'SJIS')] = '=';
   $grk[mb_substr("≒",0,1,'SJIS')] = '\simeq ';
   $grk[mb_substr("≡",0,1,'SJIS')] = '\equiv ';
   $grk[mb_substr("≠",0,1,'SJIS')] = '\neq ';
   $grk[mb_substr("≦",0,1,'SJIS')] = '\leq ';
   $grk[mb_substr("≧",0,1,'SJIS')] = '\geq ';
   $grk[mb_substr("~",0,1,'SJIS')] = '\sim ';
   $grk[mb_substr('∫',0,1,'SJIS')] = '{\int}';
   $grk[mb_substr('∮',0,1,'SJIS')] = '\oint ';
   $grk[mb_substr('∬',0,1,'SJIS')] = '\iint ';
   $grk[mb_substr('∂',0,1,'SJIS')] = '\partial ';	
   $grk[mb_substr("∴",0,1,'SJIS')] = '\therefore ';
   $grk[mb_substr('∀',0,1,'SJIS')] = '\forall ';
   $grk[mb_substr('∃',0,1,'SJIS')] = '\exists ';
   $grk[mb_substr('∩',0,1,'SJIS')] = '\cap ';
   $grk[mb_substr('∪',0,1,'SJIS')] = '\cup ';
   $grk[mb_substr('⊂',0,1,'SJIS')] = '\subset ';
   $grk[mb_substr('⊃',0,1,'SJIS')] = '\supset ';
   $grk[mb_substr('∈',0,1,'SJIS')] = '\in ';
   $grk[mb_substr("†",0,1,'SJIS')] = '\dagger ';
   $grk[mb_substr("↑",0,1,'SJIS')] = '\uparrow ';
   $grk[mb_substr("↓",0,1,'SJIS')] = '\downarrow ';
   $grk[mb_substr("→",0,1,'SJIS')] = '\rightarrow ';
   $grk[mb_substr("←",0,1,'SJIS')] = '\leftarrow ';
   $grk[mb_substr("{",0,1,'SJIS')] = '\lbrace ';
   $grk[mb_substr("}",0,1,'SJIS')] = '\rbrace ';
   $grk[mb_substr("|",0,1,'SJIS')] = '|';
   $grk[mb_substr('∨' ,0,1,'SJIS')] = '\lor ';
   $grk[mb_substr('∧' ,0,1,'SJIS')] = '\land ';

   $grk[mb_substr('"',0,1,'SJIS')] = "''";
   $grk[mb_substr("~" ,0,1,'SJIS')] = "\\vec ";
   $grk[mb_substr("{",0,1,'SJIS')] = '\lbrace ';
   $grk[mb_substr("}",0,1,'SJIS')] = '\rbrace ';
   $grk[mb_substr('[',0,1,'SJIS')] = "[";
   $grk[mb_substr(']',0,1,'SJIS')] = "]";
   $grk[mb_substr(";" ,0,1,'SJIS')] = ";";
   $grk[mb_substr(";" ,0,1,'SJIS')] = "\\\\";		// newline
   $grk[mb_substr(' ',0,1,'SJIS')] = '\,';			// space
   $grk[mb_substr('/',0,1,'SJIS')] = '\over ';
   //$grk[mb_substr("<",0,1,'SJIS')] = "\\lt ";		// Editer_core.php では  <
   //$grk[mb_substr(">",0,1,'SJIS')] = "\\gt ";		//     :
   //$grk[mb_substr("<",0,1,'SJIS')] = '\lt ';		// Codecogsの場合では  <
   //$grk[mb_substr(">",0,1,'SJIS')] = '\gt ';		//   :

// 2byte変換Tbl
   $grk2[mb_substr(">=",0,2,'SJIS')]  = '\geq ';
   $grk2[mb_substr("<=",0,2,'SJIS')]  = '\leq ';
   $grk2[mb_substr("!=",0,2,'SJIS')]  = '\neq ';
   $grk2[mb_substr("\\<",0,2,'SJIS')] = '\langle ';
   $grk2[mb_substr("\\>",0,2,'SJIS')] = '\rangle ';
   $grk2[mb_substr("\\/",0,2,'SJIS')] = '\setminus ';
   $grk2[mb_substr("√[",0,2,'SJIS')] = '\sqrt[';
   $grk2[mb_substr("->",0,2,'SJIS')] = '\longrightarrow ';
   $grk2[mb_substr("=>",0,2,'SJIS')] = '\Longrightarrow ';
   $grk2[mb_substr('  ',0,2,'SJIS')]= '\quad\quad\quad ';
   $grk2[mb_substr("^*",0,2,'SJIS')] = '^{*}';
   //$grk2[mb_substr("\\!",0,2,'SJIS')] = ' ';		// -1/3 space
   
// 3byte変換Tbl
   $grk3[mb_substr("<=>",0,3,'SJIS')] = '\Longleftrightarrow ';
   $grk3[mb_substr("(+)",0,3,'SJIS')] = '\oplus ';
   $grk3[mb_substr("、、、",0,3,'SJIS')] = '\cdots ';
   $grk3[mb_substr("...",0,3,'SJIS')] = '\cdots ';
   $grk3[mb_substr("\\N ",0,3,'SJIS')] = '\mathbb{N}';
   $grk3[mb_substr("\\Z ",0,3,'SJIS')] = '\mathbb{Z}';
   $grk3[mb_substr("\\Q ",0,3,'SJIS')] = '\mathbb{Q}';
   $grk3[mb_substr("\\R ",0,3,'SJIS')] = '\mathbb{R}';
   $grk3[mb_substr("\\C ",0,3,'SJIS')] = '\mathbb{C}';
   $grk3[mb_substr("\\L ",0,3,'SJIS')] = '\mathcal{L}';
   $grk3[mb_substr("\\H ",0,3,'SJIS')] = '\mathcal{H}';
   $grk3[mb_substr("\\X ",0,3,'SJIS')] = '\aleph';
   $grk3[mb_substr("ih'",0,3,'SJIS')]  = 'i\hbar ';
   //$grk3[mb_substr("ih’",0,3,'SJIS')] = 'i\hbar ';		// この必要性が不明

?>