#include <cstdio>
#include <iterator>
#include <map>
#include <functional>
#include <array>
#include <vector>
namespace XX
{   
    template<template<typename> class Compare, typename T>
    inline T& UP(T& x, const T& y){if(Compare<T>()(y, x)) x = y; return x;}
    template<typename Compare, typename T>
    inline T& UP(T& x, const T& y, Compare comp){if(comp(y, x)) x = y; return x;}

    template<typename T> inline T& GT(T& x, const T& y){return UP<std::greater>(x, y);}
    template<typename T> inline T& LS(T& x, const T& y){return UP<std::less>(x, y);}

    template<typename T>
    struct Mapper
    {
        int operator[](const T& v) { int& ret = table[v]; if(!ret) rtable[ret = table.size()] = v; return ret - 1; }
        template<typename... Args> int operator()(Args... args) { return (*this)[T(args...)]; }
        T rev(int idx){return rtable[idx + 1];}
        std::map<T, int> table;
        std::map<int, T> rtable;
    };

    template<typename T, int S>
    struct ReferenceArray
    {
        struct It {typename std::array<T*, S>::iterator it; T& operator*(){return **it;} void operator++(){it++;} bool operator!=(const It& other){return it != other.it;} };
        int size()const{return _ptr.size();}
        It begin()const{return {_ptr.begin()};}
        It end()const{return {_ptr.end()};}
        T& operator[](int idx)const{return *_ptr[idx];}
        mutable std::array<T*, S> _ptr;
    };
    template<typename T, typename... Args> 
    ReferenceArray<T, sizeof...(Args) + 1> MAKEV(T& arg1, Args&... args) {return {&arg1, &args...};}

    struct Range
    {   
        struct It {   int num, step; int operator*(){return num;} void operator++(){num += step;} bool operator!=(const It& other){return num != other.num;} };
        Range(int ee):b(0),e(ee){}
        Range(int bb, int ee):b(bb), e(ee){}
        It begin(){return {b, (b < e? 1: -1)};}
        It end(){return {e, 0};}
        int b, e;
    };

}



template<typename T> struct ScanfSpecifier{};
#define DEF(T,V) template<> struct ScanfSpecifier<T>{static constexpr const char* value = V;};
DEF(char*,"%s")DEF(int,"%d")DEF(double,"%lf")DEF(float,"%f")DEF(char,"%c")DEF(const char*,"%s")DEF(unsigned long,"%lu")DEF(unsigned int, "%u")
#ifdef _MSC_VER
DEF(long long int,"%I64d")
#else
DEF(long long int,"%lld")
#endif
#undef DEF
template<typename T> int RD(T& arg){return std::scanf(ScanfSpecifier<T>::value, &arg);}
template<int S> int RD(char (&arg)[S]){return std::scanf("%s", arg);}
int RD(char* arg){return std::scanf("%s", arg);}
template<> int RD<char>(char& arg){return std::scanf(" %c", &arg);}
template<typename T, typename... Args> int RD(T& arg1, Args&... args) {return RD(arg1) + RD(args...);}
template<typename T> T RD(){T ret; RD(ret); return ret;}
template<typename It> void RDV(It begin, It end) { while(begin != end) RD(*begin++); }
template<typename C> void RDV(C& c) {RDV(std::begin(c), std::end(c));}
template<typename... Args> void WT(Args... args) { int alc = 0; int dummy[] = {((alc++? std::printf(" "): 0), std::printf(ScanfSpecifier<Args>::value, args), 0)...}; }
template<typename... Args> void WTL(Args... args) { WT(args...); std::printf("\n"); }
template<typename It> void WTV(It begin, It end) { int alc = 0; while(begin != end) (alc++? std::printf(" "): 0), WT(*begin++); }
template<typename C> void WTV(const C& c) {WTV(std::begin(c), std::end(c));}
template<typename It> void WTVL(It begin, It end) { WTV(begin, end); std::printf("\n"); }
template<typename C> void WTVL(const C& c) {WTVL(std::begin(c), std::end(c));}





//alias
template<typename T> T& UMAX(T& x, T y){return XX::UP<std::greater>(x, y);}
template<typename T> T& UMIN(T& x, T y){return XX::UP<std::less>(x, y);}
using XX::UP; //(x,y) comp
using RG = XX::Range;
using XX::MAKEV;
using XX::Mapper;
//RD[L],RDV[L],WT[L],WTV[L] for i/o
//template
#include <vector>
#include <string>
#include <set>
#include <map>
#include <cstdlib>
#include <algorithm>
#include <functional>
using namespace std;

typedef array<int, 4> C;
C cs[512];

map<C, int> table;



void f(C& c)
{
    C mn = c;

    for(int i = 0; i < 4; i++)
    {
        int tmp = c[0];
        for(int j = 1; j < 4; j++)
            c[j - 1] = c[j];
        c[3] = tmp;

        if(c < mn)
            mn = c;
    }
    c = mn;
}

int kind(C c)
{
    C o = c;
    int ret = 0;
    for(int i = 0; i < 4; i++)
    {
        int tmp = c[0];
        for(int j = 1; j < 4; j++)
            c[j - 1] = c[j];
        c[3] = tmp;

        if(c == o)
            ret++;
    }

    return ret;
}

int main()
{
    int N;
    RD(N);
    for(int i = 0; i < N; i++)
    {
        RDV(cs[i].begin(), cs[i].end());
        f(cs[i]);
    }


    long long int ans = 0;
    for(int i = 0; i < N; i++)
    {
        if(i >= 5)
            for(int j = 0; j < i; j++)
                for(int d = 0; d < 4; d++)
                {
                    map<C, int> cnt;
                    C b;
                    for(int k = 0; k < 4; k++)
                        b[k] = cs[j][(3 - k + d) & 3];

                    long long alc = 1;

                    for(int k = 0; k < 4; k++)
                    {
                        C s;

                        s[0] = cs[i][(k + 1) & 3];
                        s[1] = cs[i][k];
                        s[2] = b[k];
                        s[3] = b[(k + 1) & 3];

                        alc *= kind(s);
                        f(s);
                        cnt[s]++;
                    }
                    for(auto e: cnt)
                    {
                        int v1 = table[e.first] - (e.first == cs[j]);
                        int v2 = e.second;


                        for(int i = 0; i < v2; i++)
                            alc *= (v1 - i);
                    }

                    ans += alc;

                }

        table[cs[i]]++;
    }


    WTL(ans);
}





Measured memory_bytes: 80000