<html><head></head><body><div style="color:#000; background-color:#fff; font-family:Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif;font-size:13px"><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr">I am very new to Haskell and I am attempting to make a simple password program as my first program. I have ran into a problem and I am not very sure on how to fix it. I do not know how to make a second section for the passwords. My guessing attempts have failed so I am asking for help.</div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr">Here is my code</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36484"><br></div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36484">main = do </div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36485"> putStrLn "Hello, Who are you?"</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36486"> name <- getLine --User Input</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36487"> putStrLn ("Hey " ++ name ++ ", What's the password?")</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36488"> pass <- getLine</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36489"> if pass == "12345"</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36490"> then putStrLn ("Welcome")</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36491"> pw</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36492"> else do</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36493"> putStrLn "That is wrong!"</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36494"> main</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36495">pw = do</div><div dir="ltr" id="yui_3_16_0_ym19_1_1501800173681_36496"> putStrLn "What Password do you need?"</div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr">Thanks in advance, Casey :D</div><div id="yui_3_16_0_ym19_1_1501800173681_36248" dir="ltr"><br></div></div></body></html>