import std.stdio;
import std.string;
import std.conv;
import std.algorithm;
import std.container;
import std.array;
import std.math;

void main()
{
  int m = readln.chomp.split.back.to!int;
  string s = readln;
  int l = 0, r = 1;
  bool[string] set;
  foreach (i; 0..m) {
    string v = readln;
    auto f = function(char c, ref int w) {
      if (c == '+') {
        ++w;
      } else {
        --w;
      }
    };
    if (v[0] == 'L') {
      f(v[1], l);
    } else {
      f(v[1], r);
    }
    set[s[l..r]] = true;
  }
  writeln = set.length;
}