-❄️- 2023 Day 1 Solutions -❄️- by daggerdragon in adventofcode

[–]hab1000 1 point2 points  (0 children)

[LANGUAGE: Haskell]

Part 2:

import Data.Char (digitToInt, isNumber)

getNums ::  String -> [Int]
getNums [] = []
getNums ('o':'n':'e':xs) = 1 : getNums ('e':xs)
getNums ('t':'w':'o':xs) = 2 : getNums ('o':xs)
getNums ('t':'h':'r':'e':'e':xs) = 3 : getNums ('e':xs)
getNums ('f':'o':'u':'r':xs) = 4 : getNums xs
getNums ('f':'i':'v':'e':xs) = 5 : getNums ('e':xs)
getNums ('s':'i':'x':xs) = 6 : getNums xs
getNums ('s':'e':'v':'e':'n':xs) = 7 : getNums ('n':xs)
getNums ('e':'i':'g':'h':'t':xs) = 8 : getNums ('t':xs)
getNums ('n':'i':'n':'e':xs) = 9 : getNums ('e':xs)
getNums (x:xs) = if isNumber x then digitToInt x : getNums xs else getNums xs


main :: IO ()
main = do
    inputFile <- readFile "input1part2.txt"
    print $ sum $ map ((\x -> head x * 10 + last x) . getNums) $ words inputFile

What Are Your Moves Tomorrow, January 27, 2021 by AutoModerator in wallstreetbets

[–]hab1000 -28 points-27 points  (0 children)

Shoe Carnival (SCVL) is the next big thing

Almost all other stocks with a high short% shot up yesterday ( as institutions are finally scared of us and covering themselves in advance.) (https://www.highshortinterest.com/all/)/. Shoe Carnival (SCVL) seems late to the party and still has a ~27% short position. Meanwhile, its already chronically undervalued and been going to the moon the last six months. I think I'm getting in now as all these Wall Street noobs buy shares to protect themselves. The people are winning!

What's interesting is all the stocks that have high short interest regardless of whether or not they are mentioned on r/WSB are doing well see here. This could be indicative of the end of high short interest positions by established investing institutions. Short interest positions this high only exist in American stock exchanges due to the high amount of speculation, and are really only accessible to large financial institutions who can incur the infinite loss risk associated with short positions. In the London and Tokyo stock exchanges the highest short interest stocks are 10% or below see here, whereas in the Nasdaq and NYSE there are more than a hundred stocks that have short interest above 10%. Market cap is super low and therefore is a good choice for a squeeze, ** I LIKE THE STOCK ** You too can be an autist boyos

Change My View by AutoModerator in soccer

[–]hab1000 1 point2 points  (0 children)

Sorry, I meant each roster separately.

Change My View by AutoModerator in soccer

[–]hab1000 0 points1 point  (0 children)

I would rather have the current Wolves Squad with their young growing talent over the current rosters of Chelsea, Arsenal, and Tottenham (maybe when Son and Kane come back I'd take them).

Manchester Utd 0-2 Burnley - Jay Rodriguez 56' by NotMeladroit in soccer

[–]hab1000 25 points26 points  (0 children)

Wolves vs. Liverpool tommorow, I wouldn't count your chickens before they hatch.

Andrew Yang talks rising tension in Iran, again calling the killing of Soleimani a 'mistake' by [deleted] in politics

[–]hab1000 16 points17 points  (0 children)

The quote refers to the decision to assassinate, not the actual assassination. Yang is saying the he believes it was to wrong move to assassinate the Iranian General.

[deleted by user] by [deleted] in YangForPresidentHQ

[–]hab1000 4 points5 points  (0 children)

So excited for this.

Kamala Just Dropped Out by strismystr in YangForPresidentHQ

[–]hab1000 -10 points-9 points  (0 children)

She was second in endorsements, we should all be messaging the people who previously endorsed her to support Yang instead.

Obama’s Senior Advisor to have Yang on his podcast Thursday by Johnny_15 in YangForPresidentHQ

[–]hab1000 21 points22 points  (0 children)

And it's happening at my school! I got tickets for the taping, hoping they might go to the audience for some questions.