#include<bits/stdc++.h>
using namespace std;
int n;
string s[10005][5];
map<pair<string,string>,int>M;
int main( ){
	cin>>n;
	for(int i=1;i<=n;i++){
		cin>>s[i][1]>>s[i][2]>>s[i][3]>>s[i][4];
		M[{s[i][1],s[i][4]}]++;
	}
	long long ans=0;
	for(int i=1;i<=n;i++){
		for(int j=1;(j<=n);j++){
			if(s[j][4]!=s[i][1]) continue;
			//cout<<i<<' '<<j<<endl;
			for(int k=1;(k<=n);k++){
				if(s[k][1]!=s[i][4]) continue;
				//cout<<i<<' '<<j<<' '<<k<<endl;
				for(int l=1;(l<=n);l++){
					if(i!=j&&i!=k&&i!=l&&j!=k&&j!=l&&k!=l&&(s[l][1]==s[k][4])&&(s[l][4]==s[j][1])){
						//cout<<"***"<<i<<' '<<j<<' '<<k<<' '<<l<<endl;
						int lr=(s[i][1]==s[i][1]&&s[i][4]==s[l][1])&&(s[j][1]==s[i][1]&&s[j][4]==s[l][1])&&(s[k][1]==s[i][1]&&s[k][4]==s[l][1])&&(s[l][1]==s[i][1]&&s[l][4]==s[l][1]),rl=(s[i][1]==s[i][4]&&s[i][4]==s[l][4])&&(s[j][1]==s[i][4]&&s[j][4]==s[l][4])&&(s[k][1]==s[i][4]&&s[k][4]==s[l][4])&&(s[l][1]==s[i][4]&&s[l][4]==s[l][4]);
						ans+=max(0,(M[{s[i][1],s[l][1]}]-lr)*(M[{s[i][4],s[l][4]}]-rl-(s[i][1]==s[i][4]&&s[l][1]==s[l][4])));
					}
				}
			}
		}
	}
	cout<<ans<<endl;
	return 0;
}