 % Institute of Computing's logo
% Version 2010-03-07-163300 (slanted abacus, by Jorge Stolfi)
{ 
  \def\lastedit{2010-03-08 13:28:49 by stolfi}
  \typeout{macros-logo-ic.tex \lastedit} 
}
\usepackage{graphicx}
 
\makeatletter
\advance\endlinechar by -256\relax

% Directory and filename of the logo's EPS file.
% Redefine as needed.
\def\iclogodir{.}
\def\iclogofile#1{ic-logo-slant-line-wht-red-red-#1.eps}

% Nominal logo dimensions (should match those of UNICAMP's logo!)
\def\iclogowidth{60pt}    % Nominal width of logo box, with or without name
\def\iclogoheight{65pt}   % Nominal height of logo box, with or without name

% Nominal dimensions of abacus only:
\def\icabacuswidth{\iclogowidth}  % Nominal width of IC abacus
\def\icabacusheight{50pt}         % Nominal height of IC abacus without name

% Nominal dimensions of abacus, reduced for use with name:
\def\icabacusredwidth{54pt}  % Reduced width of IC abacus

% IC abacus in a tight-fitting box, without name
\def\icabacus{
  \hbox to \icabacuswidth{
    \hss
    \special{! /@scaleunit 1 def}\special{psfile=\iclogodir/\iclogofile{0240} hscale=0.25 vscale=0.25 voffset=-70.0 hoffset=-76.5 }
    \vrule height \icabacusheight width 0pt
    \hss
  }
}

% IC logo in a standard-size box, top-aligned, without name
\def\iclogobare{
  \vbox to \iclogoheight{
    \offinterlineskip
    \hrule height 0pt width 0pt depth 0pt
    \kern 6pt
    \icabacus
    \vss
  }
}

% Font for IC name below IC logo
\def\iclogofont{
  \fontfamily{cmss}\fontseries{bx}\fontshape{n}\fontsize{7pt}{8pt}\selectfont
}

% IC logo in a standard-size box, top-aligned, with name below
\def\iclogonamed{
  \vbox to \iclogoheight{
    \offinterlineskip
    \hrule height 0pt width 0pt depth 0pt
    \kern 0pt
    \hbox to \iclogowidth{
      \hss
      \scalebox{0.90}{\hbox{\icabacus}}
      \hss
    }
    \kern 4pt
    \hbox to \iclogowidth{
      \iclogofont I\hss N\hss S\hss T\hss I\hss T\hss U\hss T\hss O\hss {~}\hss D\hss E\vphantom{ÇÃ}
    }
    \hbox to \iclogowidth{
      \iclogofont C\hss O\hss M\hss P\hss U\hss T\hss A\hss \c{C}\hss \~{A}O
    }
    \vss
  }
}

\advance\endlinechar by 256
\makeatother 
