# [Haskell] + `-cpp`, 59 bytes

*-1 byte thanks to BMO.*

<!-- language-all: lang-hs -->

 main=do x<-readFile __FILE__;print$sum$1:[3|length x>118]--

[Try it online!][TIO-jeq1o6o5]

[Haskell]: https://www.haskell.org/
[TIO-jeq1o6o5]: https://tio.run/##y0gszk7Nyfn/PzcxM882JV@hwka3KDUxxS0zJ1UhPt7N08c1Pt66oCgzr0SluDRXxdAq2rgmJzUvvSRDocLO0NAiVlf3//9/yWk5ienF/3WTCwoA "Haskell – Try It Online"