#include <fstream>
#include <algorithm>
#include <cstring>
#define mengdi 1000000007
#define MAX 100010
#define ll long long
using namespace std;
ifstream fin("magics.in");
ofstream fout("magics.out");
ll ans;
int n,m;
ll ha[MAX];
int do1(int a,int b)
{
	int pls=1;
	for(int i=a;i<=b;i++)
	{
		ha[i]+=pls;
		ha[i]%=mengdi;
		pls++;
	}
	return 0;
}
int do2(int x)
{
	ans=ha[x];
	fout<<ha[x]<<endl;
	return 0;
}
int main()
{
	int a,b;
	memset(ha,0,sizeof(ha));
	fin>>n>>m;
	string czh;
	for(int i=1;i<=m;i++)
	{
		fin>>czh;
		if(czh=="C")
		{
			fin>>a>>b;
			do1(a,b);
		}
		if(czh=="Q")
		{
			fin>>a;
			do2(a);
		}
	}
	return 0;
}