%\NeedsTeXFormat{LaTeX2e}
%\typeout{Option Style‘qbgraph’2005 July 29 by T. Moonlight}
%\typeout{......................main style +qbgraph++++++++++}
\typeout{                       sub style         +qbgraphd+ Def}
%
% 定義系
%
% #1の値で変数#2を定義する
\newcommand{\qbdef}[2]{
\Mul{#1}{1}{#2}
}
% #1の値で変数#2を定義する
\newcommand{\qbdefp}[4]{
\qbdef{#1}{#3}
\qbdef{#2}{#4}
}
% #1の値で変数#2を定義する
\newcommand{\qbtmpdefp}[2]{
\qbdef{\tmpx}{#1}
\qbdef{\tmpy}{#2}
}
% #1の値で変数#2を一時定義する
\newcommand{\qbdefptmp}[2]{
\qbdef{#1}{\tmpx}
\qbdef{#2}{\tmpy}
}
%
% 判断系
%
% #1<=#3<=#2 なら1　でなければ、0
\newcommand{\qbininterval}[3]{
  \ifdim #2 pt < #1 pt \qbininterval{#2}{#1}{#3} \else 
  \ifdim #3 pt>#1 pt
     \ifdim #3 pt<#2 pt 
        1
     \else 
        \ifdim #3 pt>#2 pt 
           0 
        \else 
           1 
        \fi 
     \fi
  \else
     \ifdim #3 pt< #1 pt
        0
     \else
        1
     \fi
  \fi
  \fi
}
%
%相似記号
\def\proportionalto{%
   \mathrel{\mathchoice
      {\@proportionalto\tf@size}{\@proportionalto\tf@size}%
      {\@proportionalto\sf@size}{\@proportionalto\ssf@size}}}
\def\@proportionalto#1{%
   \vcenter{\hbox{%
      \dimen@#1\p@\unitlength.1\dimen@
      \@proportionalto@check@boldness
%%% 「相似記号」の形を調節するには, \qbezier コマンドたちに与えた
%%% 座標の値を変更します. (←あまり参考になりませんね…)
      \qbezier(3.4,2.7)(2.5,3.375)(1.6,2.7)%
      \qbezier(1.6,2.7)(.7,1.5)(1.6,.3)%
      \qbezier(1.6,.3)(2.5,-.375)(3.4,.3)%
      \qbezier(3.4,.3)(5,1.5)(6.6,2.7)%
      \qbezier(6.6,2.7)(7.5,3.375)(8.4,2.7)%
      \qbezier(8.4,2.7)(9.3,1.5)(8.4,.3)%
      \qbezier(8.4,.3)(7.5,-.375)(6.6,.3)%
      \vrule\@width\dimen@\@height\z@\@depth\z@}}}
\def\@proportionalto@check@boldness{%
   \def\@varpropto@temp{bold}%
   \ifx\math@version\@varpropto@temp\thicklines\else\thinlines\fi}
%

\endinput
% ここまでがマクロ。以下例文。