tex

\overset{#1}{#2}

overset( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x , y+z );

}

\underset{#1}{#2}

underset( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x , y+not(z) );

}

\frac{#1}{#2}

frac( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y+(z/2) );

put-grafic-color( bar[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x , y+not(z/2) );

}

\integral-frac{#1}{#2}

integral-frac( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y+(z/2) );

put-grafic-color( bar[i][j][k] , x , y+(z/4) );

put-grafic-color( bar[i][j][k] , x , y+not(z/4) );

put-grafic-color( b[i][j][k] , x , y+not(z/2) );

}

{#1}^{#2}

^( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x+z , y+z );

}

{#1}_{#2}

_( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x+z , y+not(z) );

}

{#1}^_^{#2}

^_^( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x+not(z) , y+z );

}

{#1}_^_{#2}

_^_( int a[i][j][k] , int b[i][j][k] , int x , int y )

{

put-grafic-color( a[i][j][k] , x , y );

put-grafic-color( b[i][j][k] , x+not(z) , y+not(z) );

}