#include <bits/stdc++.h>
using namespace std;
#define int long long int
#define double long double
inline int power(int a, int b) {
int x = 1;
while (b) {
if (b & 1) x *= a;
a *= a;
b >>= 1;
}
return x;
}
const int M = 1000000007;
const int N = 3e5+9;
const int INF = 2e9+1;
const int LINF = 2000000000000000001;
//_ ***************************** START Below *******************************
string a;
int consistency(int n) {
int l = 0;
int lc = 0;
int lct = 0;
for(int i=0; i<n; i++){
if(a[i] == 'L') l++;
else if(a[i] == 'C') lc += l;
else if(a[i] == 'T') lct += lc;
}
int llct = lct + lc;
int t = 0;
int ct = 0;
for(int i=n-1; i>=0; i--){
if(a[i] == 'T') t++;
else if(a[i] == 'C') ct += t;
}
int lctt = lct + ct;
int x = 0;
l = 0;
for(int i=0; i<n; i++){
if(a[i] == 'L') l++;
else if(a[i] == 'T') t--;
x = max(x, l * t);
}
int lcct = lct + x;
int ans = max({ lct, lctt, llct, lcct } );
return ans;
}
void solve() {
cin >> a;
int n = a.size();
cout << consistency(n) << endl ;
}
int32_t main() {
ios_base::sync_with_stdio(0); cin.tie(0); cout.tie(0);
int t = 1;
while (t--) {
solve();
}
return 0;
}
I2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CiNkZWZpbmUgaW50ICAgICAgICAgICAgICBsb25nIGxvbmcgaW50CiNkZWZpbmUgZG91YmxlICAgICAgICAgICBsb25nIGRvdWJsZQppbmxpbmUgaW50IHBvd2VyKGludCBhLCBpbnQgYikgewogICAgaW50IHggPSAxOwogICAgd2hpbGUgKGIpIHsKICAgICAgICBpZiAoYiAmIDEpIHggKj0gYTsKICAgICAgICBhICo9IGE7CiAgICAgICAgYiA+Pj0gMTsKICAgIH0KICAgIHJldHVybiB4Owp9CgoKY29uc3QgaW50IE0gPSAxMDAwMDAwMDA3Owpjb25zdCBpbnQgTiA9IDNlNSs5Owpjb25zdCBpbnQgSU5GID0gMmU5KzE7CmNvbnN0IGludCBMSU5GID0gMjAwMDAwMDAwMDAwMDAwMDAwMTsKCi8vXyAqKioqKioqKioqKioqKioqKioqKioqKioqKioqKiBTVEFSVCBCZWxvdyAqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqCgoKCnN0cmluZyBhOwoKaW50IGNvbnNpc3RlbmN5KGludCBuKSB7CgkKCQoJaW50IGwgPSAwOwoJaW50IGxjID0gMDsKCWludCBsY3QgPSAwOwoJCglmb3IoaW50IGk9MDsgaTxuOyBpKyspewoJCWlmKGFbaV0gPT0gJ0wnKSBsKys7CgkJZWxzZSBpZihhW2ldID09ICdDJykJbGMgKz0gbDsKCQllbHNlIGlmKGFbaV0gPT0gJ1QnKQlsY3QgKz0gbGM7Cgl9CgkKCWludCBsbGN0ID0gbGN0ICsgbGM7CgkKCWludCB0ID0gMDsKCWludCBjdCA9IDA7Cglmb3IoaW50IGk9bi0xOyBpPj0wOyBpLS0pewoJCWlmKGFbaV0gPT0gJ1QnKSB0Kys7CgkJZWxzZSBpZihhW2ldID09ICdDJykJY3QgKz0gdDsKCX0KCQoJaW50IGxjdHQgPSBsY3QgKyBjdDsKCgkKCWludCB4ID0gMDsKCWwgPSAwOwoJZm9yKGludCBpPTA7IGk8bjsgaSsrKXsKCQlpZihhW2ldID09ICdMJykgbCsrOwoJCWVsc2UgaWYoYVtpXSA9PSAnVCcpIHQtLTsKCQkKCQl4ID0gbWF4KHgsIGwgKiB0KTsKCX0KCQoJaW50IGxjY3QgPSBsY3QgKyB4OwoJCglpbnQgYW5zID0gbWF4KHsgbGN0LCBsY3R0LCBsbGN0LCBsY2N0IH0gKTsKCQoJcmV0dXJuIGFuczsKCn0KCgoKCgoKCgoKCgoKdm9pZCBzb2x2ZSgpIHsKICAgIAoJY2luID4+IGE7CglpbnQgbiA9IGEuc2l6ZSgpOwoJCiAgICBjb3V0IDw8IGNvbnNpc3RlbmN5KG4pIDw8IGVuZGwgOwoKfQoKCgoKCmludDMyX3QgbWFpbigpIHsKICAgIGlvc19iYXNlOjpzeW5jX3dpdGhfc3RkaW8oMCk7IGNpbi50aWUoMCk7IGNvdXQudGllKDApOwoKICAgIGludCB0ID0gMTsKICAgIHdoaWxlICh0LS0pIHsKICAgICAgICBzb2x2ZSgpOwogICAgfQoKICAgIHJldHVybiAwOwp9