#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 *******************************
vector<int> a;
void consistency(string s) {
int n = s.size();
int L = 0;
int LC = 0;
int LCT = 0;
for(int i=0; i<n; i++){
if(s[i] == 'L') L++;
else if(s[i] == 'C') LC += L;
else if(s[i] == 'T') LCT += LC;
}
int T = 0;
int CT = 0;
for(int i=n-1; i>=0; i--){
if(s[i] == 'T') T++;
else if(s[i] == 'C') CT++;
}
int LCTT = LCT + LC;
int LLCT = LCT + CT;
int ans = max(LCTT, LLCT);
int ct = 0;
int l = 0;
int t = T;
for(int i=0; i<n-1; i++){
if(s[i] == 'L') l++;
else if(s[i] == 'T') t--;
ct = max(ct, l * t);
}
int LCCT = LCT + ct;
ans = max(ans, LCCT);
cout << ans << endl;
}
void solve() {
string s;
cin >> s;
consistency(s) ;
}
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+Pj0gMTsKICAgIH0KICAgIHJldHVybiB4Owp9CgoKY29uc3QgaW50IE0gPSAxMDAwMDAwMDA3Owpjb25zdCBpbnQgTiA9IDNlNSs5Owpjb25zdCBpbnQgSU5GID0gMmU5KzE7CmNvbnN0IGludCBMSU5GID0gMjAwMDAwMDAwMDAwMDAwMDAwMTsKCi8vXyAqKioqKioqKioqKioqKioqKioqKioqKioqKioqKiBTVEFSVCBCZWxvdyAqKioqKioqKioqKioqKioqKioqKioqKioqKioqKioqCgoKCnZlY3RvcjxpbnQ+IGE7CnZvaWQgY29uc2lzdGVuY3koc3RyaW5nIHMpIHsKCQoJaW50IG4gPSBzLnNpemUoKTsKCWludCBMID0gMDsKCWludCBMQyA9IDA7CglpbnQgTENUID0gMDsKCWZvcihpbnQgaT0wOyBpPG47IGkrKyl7CgkJaWYoc1tpXSA9PSAnTCcpIEwrKzsKCQllbHNlIGlmKHNbaV0gPT0gJ0MnKSBMQyArPSBMOwoJCWVsc2UgaWYoc1tpXSA9PSAnVCcpIExDVCArPSBMQzsKCX0KCQoJaW50IFQgPSAwOwoJaW50IENUID0gMDsKCWZvcihpbnQgaT1uLTE7IGk+PTA7IGktLSl7CgkJaWYoc1tpXSA9PSAnVCcpIFQrKzsKCQllbHNlIGlmKHNbaV0gPT0gJ0MnKSBDVCsrOwoJCQoJfQoJCglpbnQgTENUVCA9IExDVCArIExDOwoJaW50IExMQ1QgPSBMQ1QgKyBDVDsKCWludCBhbnMgPSBtYXgoTENUVCwgTExDVCk7CgkKCWludCBjdCA9IDA7CglpbnQgbCA9IDA7CglpbnQgdCA9IFQ7Cglmb3IoaW50IGk9MDsgaTxuLTE7IGkrKyl7CgkJaWYoc1tpXSA9PSAnTCcpIGwrKzsKCQllbHNlIGlmKHNbaV0gPT0gJ1QnKSB0LS07CgkJCgkJY3QgPSBtYXgoY3QsIGwgKiB0KTsKCX0KCQoJaW50IExDQ1QgPSBMQ1QgKyBjdDsKCQoJYW5zID0gbWF4KGFucywgTENDVCk7CgkKCWNvdXQgPDwgYW5zIDw8IGVuZGw7Cgp9Cgp2b2lkIHNvbHZlKCkgewogICAgCglzdHJpbmcgczsKCWNpbiA+PiBzOwogICAgY29uc2lzdGVuY3kocykgOwoKfQoKCgoKCmludDMyX3QgbWFpbigpIHsKICAgIGlvc19iYXNlOjpzeW5jX3dpdGhfc3RkaW8oMCk7IGNpbi50aWUoMCk7IGNvdXQudGllKDApOwoKICAgIGludCB0ID0gMTsKICAgIHdoaWxlICh0LS0pIHsKICAgICAgICBzb2x2ZSgpOwogICAgfQoKICAgIHJldHVybiAwOwp9