In haskell, combining "case" and ">>=" -


I have a lot of code in style: 

  do X & lt; - Get some X-X of this case - & gt; ... that - & gt; ... other - & gt; ...

Any combination of "x and lt; - ..." and "case x" lines to eliminate the need for a variable in any way?

You can use the bind operator in the x pipe. 

  import system. Environment (getArgs) Main :: IO () Main = getArgs & gt; & Gt; = Process where the process ["xxx"] = putStrLn "You have entered xxx" process ["yyy"] = putStrLn "you entered yyy" process _ = putStrLn "error"

-

Comments

Post a Comment

Popular posts from this blog

google indexing -

I have a question, how can I get results of similar Google results like Wikipedia, MySpace ... When you search Wikipedia on Google, you have the result of an input search for Wikipedia, which is user-friendly. When you search MySpace on Google, you have Google results below, some links: login, register, sign up, search ... I actually do this on Google for my website Want a kind result? Thank you. itemprop = "text"> create a sitemap: Custom Search Engine Create: Thanks Google!
Read more

php - How to paginate multiple results in CakePHP? -

How can I use the Pageinization Assistant in KPHPH to set more than one result on the same page? They will do the page independently Edit: I have found a reason why it can not do this because because the page will get its URL from the assistant controller / verb and after that Finally add its parameters. If it pulls the URL from the address bar, it has its own unique variable and then a straw_rele is used to navigate to the next one if you have already placed the page, or if it is not present in it Now, I'm thinking of re-writing assistant to support this feature to support this feature, but I'm not sure if I need it or if they are already I support it and I am doing it wrong Here's my solution in your controller: function index () {// your default model is $ $ this- & gt; Set ('model1', $ this- & gt; paginated)); // Endorsement for Model 2- $ this- & gt; Set ('Model2', $ this- & gt; Paginated ('Model2')); } In your ...
Read more

wpf - Converter stops filter working -

I'm trying to display the file name in a listbox, taken from a special directory. They are stored in an ObservableCollection of FileInfo Object: Public supervision & lt; FileInfo & gt; Project Files {Get (empty (selected folder == empty); DirectoryInfo D = New Directory Info (SelectedFolder); if (! D.Extists) returns empty; New Observe Collection & lt; FileInfo & gt; (d.EnumerateFiles ( Return "* .xsi")}}} When a text is entered or a text box has changed in "FilesFilterBy" I applied a filter on the listbox, called Is: Private Zero FilterFiles_TextChanged (Object Sender, TextChangedEventArgs e) {ICollectionView View = Archive Source.GetDefaultView (ProjectFiles); see.filters = new new & amp; object> (IsTextInFilename);} public bool isTextInFilename (object item) {string file name = path.GetFileNameWithoutExtension (as fileInfo) .Name item Returns (filename. ToLower (). Includes (File Byte Text. Taylor ());} At the same time,...
Read more