using System;
using System.Collections.Generic;
using System.Linq;
class Program
{
static List<string> GetInputList()
{
var WillReturn = new List<string>();
string wkStr;
while ((wkStr = Console.ReadLine()) != null) WillReturn.Add(wkStr);
return WillReturn;
}
const long Hou = 1000000007;
static void Main()
{
List<string> InputList = GetInputList();
long N = long.Parse(InputList[0]);
char[] SArr = InputList[1].ToCharArray();
// 場合の数[下にあるマス数]なDP表
var PrevDP = new DualSegmentTree(N, Hou);
for (long I = 0; I <= N - 1; I++) {
PrevDP.RangeAdd(I, I, 1);
}
for (long I = 0; I <= SArr.GetUpperBound(0); I++) {
var CurrDP = new DualSegmentTree(N, Hou);
for (long J = 0; J <= N - 1; J++) {
long CurrPatternCnt = PrevDP.GetVal(J);
if (CurrPatternCnt == 0) continue;
long UpperMasuCnt = N - I - J - 1;
Action<long, long> UpdateAct = (pInd1, pInd2) =>
{
long MinInd = Math.Min(pInd1, pInd2);
long MaxInd = Math.Max(pInd1, pInd2);
CurrDP.RangeAdd(MinInd, MaxInd, CurrPatternCnt);
};
// 増加の場合
if (SArr[I] == '<') {
if (UpperMasuCnt == 0) continue;
long Ind1 = J;
long Ind2 = J + UpperMasuCnt - 1;
UpdateAct(Ind1, Ind2);
}
// 減少 の場合
if (SArr[I] == '>') {
if (J == 0) continue;
long Ind1 = 0;
long Ind2 = J - 1;
UpdateAct(Ind1, Ind2);
}
}
PrevDP = CurrDP;
}
long Answer = 0;
foreach (long EachInd in PrevDP.GetNodeIndEnum()) {
Answer += PrevDP.GetVal(EachInd);
Answer %= Hou;
}
if (Answer < 0) Answer += Hou;
Console.WriteLine(Answer);
}
}
// 区間加算、1点取得な双対セグ木(フェニック木使用) (法を指定可能)
#region DualSegmentTree
internal class DualSegmentTree
{
private long[] mBitArr; // 内部配列(1オリジンなため、添字0は未使用)
private long mExternalArrUB;
private long mHou;
// ノードのIndexの列挙を返す
internal IEnumerable<long> GetNodeIndEnum()
{
for (long I = 0; I <= GetUB(); I++) {
yield return I;
}
}
// ノードのUBを返す
internal long GetUB()
{
return mExternalArrUB;
}
// コンストラクタ
// フェニック木の外部配列(0オリジン)のUBを指定
internal DualSegmentTree(long pExternalArrUB, long pHou)
{
mExternalArrUB = pExternalArrUB;
// フェニック木の外部配列は0オリジンで、
// フェニック木の内部配列は1オリジンなため、2を足す
mBitArr = new long[pExternalArrUB + 2];
mHou = pHou;
}
// 双対セグメント木の機能
// 区間加算
internal void RangeAdd(long pSta, long pEnd, long AddVal)
{
pSta++; // 1オリジンに変更
pEnd++; // 1オリジンに変更
long ImosSta = pSta;
long ImosEnd = pEnd + 1;
// いもす法
FenwickTree_Add(ImosSta, AddVal);
if (ImosEnd <= mBitArr.GetUpperBound(0)) {
FenwickTree_Add(ImosEnd, -AddVal);
}
}
// 双対セグメント木の機能
// 1点取得
internal long GetVal(long pInd)
{
pInd++; // 1オリジンに変更
return FenwickTree_GetSum(1, pInd);
}
// フェニック木の機能
// [pSta,pEnd] のSumを返す
private long FenwickTree_GetSum(long pSta, long pEnd)
{
long Result = FenwickTree_GetSum(pEnd) - FenwickTree_GetSum(pSta - 1);
Result %= mHou;
if (Result < 0) Result += mHou;
return Result;
}
// フェニック木の機能
// [0,pEnd] のSumを返す
private long FenwickTree_GetSum(long pEnd)
{
long Sum = 0;
while (pEnd >= 1) {
Sum += mBitArr[pEnd];
Sum %= mHou;
pEnd -= pEnd & -pEnd;
}
if (Sum < 0) Sum += mHou;
return Sum;
}
// フェニック木の機能
// [I] に Xを加算
private void FenwickTree_Add(long pI, long pX)
{
pX %= mHou;
while (pI <= mBitArr.GetUpperBound(0)) {
mBitArr[pI] += pX;
mBitArr[pI] %= mHou;
pI += pI & -pI;
}
}
}
#endregion