#include <cstdio>
#include <cstring>
#include <cctype>
using namespace std;

#define N 100007
typedef long long ll;
int n;
char s[N];
ll xs[N];

int main() {
	gets(s);
	n=strlen(s);
	while (isspace(s[n-1])) --n;

	int cur=0;
	++xs[cur];
	for (int i=0;i<n;++i) {
		if (s[i]=='(') ++cur;
		else if (s[i]==')') --cur;
		++xs[cur];
	}
	ll ans=0;
	for (int i=1;i<N;++i) ans+=xs[i]*(xs[i]-1)/2;
	printf("%lld\n",ans);
}