#include <fstream>
#include <cmath>
#include <algorithm>

using namespace std;

ifstream f("triang.in");
ofstream g("triang.out");

struct punct
{
    double x,y;
};
punct v[1501];

int n,i,j,k;
int nr;
double X0,Y0, X1,Y1, X2,Y2, X3,Y3, X4,Y4;
double l,h, sinus, cosinus;

int st, dr, mij;
bool gasit;

bool cmp(punct a, punct b)
{
    return (a.x<b.x || (a.x==b.x && a.y<b.y));
}

double tf(double x)
{
    return int(x*10000)/10000.0;
}

int main()
{
    f>>n;
    for (i=1;i<=n;i++)
    {
        f>>v[i].x>>v[i].y;
        v[i].x=tf(v[i].x);
        v[i].y=tf(v[i].y);
    }

    sort(v+1,v+n+1,cmp);

    for (i=1;i<=n;i++)
        for (j=1;j<=n;j++)
            if (i!=j)
            {
                X1=tf(v[i].x), Y1=tf(v[i].y);
                X2=tf(v[j].x), Y2=tf(v[j].y);

                X0=tf((X1+X2)/2), Y0=tf((Y1+Y2)/2);

                l=tf(sqrt(tf((X1-X2))*tf((X1-X2))+tf((Y1-Y2))*tf((Y1-Y2))));
                h=tf(tf(sqrt(3))/2*l);

                if (X1>X2)
                    swap(X1,X2);
                if (Y1>Y2)
                    swap(Y1,Y2);

                sinus=tf((Y2-Y1)/l);
                cosinus=tf((X2-X1)/l);


                X3=tf(X0-h*sinus);
                Y3=tf(Y0+h*cosinus);

                X4=tf(X0+h*sinus);
                Y4=tf(Y0-h*cosinus);


                st=1, dr=n, gasit=0;
                while (st<=dr && !gasit)
                {
                    mij=(st+dr)/2;
                    if (abs(v[mij].x-X3)<=0.003)
                    {
                        if (abs(v[mij].y-Y3)<=0.003)
                        {
                            nr++;
                            gasit=1;
                        }
                        else if (v[mij].y<Y3)
                            st=mij+1;
                        else
                            dr=mij-1;
                    }
                    else if (v[mij].x<X3)
                        st=mij+1;
                    else
                        dr=mij-1;
                }

                st=1, dr=n, gasit=0;
                while (st<=dr && !gasit)
                {
                    mij=(st+dr)/2;
                    if (abs(v[mij].x-X4)<=0.003)
                    {
                        if (abs(v[mij].y-Y4)<=0.003)
                        {
                            nr++;
                            gasit=1;
                        }
                        else if (v[mij].y<Y4)
                            st=mij+1;
                        else
                            dr=mij-1;
                    }
                    else if (v[mij].x<X4)
                        st=mij+1;
                    else
                        dr=mij-1;
                }
            }

    g<<nr/3;

    return 0;
}