program arena;
var
    N, E, L, i , P, Q, vivi, menouna   : longint;
    t   : char;
    Live : array[0..100000] of longint;
 
begin
    readln(N, E, L);
    for i:=0 to N-1 do Live[i]:=L;
    vivi:=0; menouna:=0;
    for i:=0 to E-1 do 
      begin
        read(P, t, t);
        if t = 'f' then readln(Q)
                   else begin
                     assert(t='e');
                     readln;
                    end;
         if t='e' then begin  Live[P]:=Live[P]+1; menouna:=menouna - 1; end
                  else  Live[Q]:=Live[Q]-1;
 
     end;                  
    for i:=0 to E-1 do if Live[i]+menouna>0 then inc(vivi);
    writeln(vivi); (* printing solution *)
end.
 

cHJvZ3JhbSBhcmVuYTsKdmFyCiAgICBOLCBFLCBMLCBpICwgUCwgUSwgdml2aSwgbWVub3VuYSAgIDogbG9uZ2ludDsKICAgIHQgICA6IGNoYXI7CiAgICBMaXZlIDogYXJyYXlbMC4uMTAwMDAwXSBvZiBsb25naW50OwoKYmVnaW4KICAgIHJlYWRsbihOLCBFLCBMKTsKICAgIGZvciBpOj0wIHRvIE4tMSBkbyBMaXZlW2ldOj1MOwogICAgdml2aTo9MDsgbWVub3VuYTo9MDsKICAgIGZvciBpOj0wIHRvIEUtMSBkbyAKICAgICAgYmVnaW4KICAgICAgICByZWFkKFAsIHQsIHQpOwogICAgICAgIGlmIHQgPSAnZicgdGhlbiByZWFkbG4oUSkKICAgICAgICAgICAgICAgICAgIGVsc2UgYmVnaW4KICAgICAgICAgICAgICAgICAgICAgYXNzZXJ0KHQ9J2UnKTsKICAgICAgICAgICAgICAgICAgICAgcmVhZGxuOwogICAgICAgICAgICAgICAgICAgIGVuZDsKICAgICAgICAgaWYgdD0nZScgdGhlbiBiZWdpbiAgTGl2ZVtQXTo9TGl2ZVtQXSsxOyBtZW5vdW5hOj1tZW5vdW5hIC0gMTsgZW5kCiAgICAgICAgICAgICAgICAgIGVsc2UgIExpdmVbUV06PUxpdmVbUV0tMTsKICAgICAgICAgICAgICAgICAKICAgICBlbmQ7ICAgICAgICAgICAgICAgICAgCiAgICBmb3IgaTo9MCB0byBFLTEgZG8gaWYgTGl2ZVtpXSttZW5vdW5hPjAgdGhlbiBpbmModml2aSk7CiAgICB3cml0ZWxuKHZpdmkpOyAoKiBwcmludGluZyBzb2x1dGlvbiAqKQplbmQuCg==

NCA0IDgKMSBlCjAgZQoyIGUKMSBlCgoK

4 4 8
1 e
0 e
2 e
1 e