| Andrew Cooke | Contents | Latest | RSS | Twitter | Previous | Next

C[omp]ute

Welcome to my blog, which was once a mailing list of the same name and is still generated by mail. Please reply via the "comment" links.

Always interested in offers/projects/new ideas. Eclectic experience in fields like: numerical computing; Python web; Java enterprise; functional languages; GPGPU; SQL databases; etc. Based in Santiago, Chile; telecommute worldwide. CV; email.

Personal Projects

Lepl parser for Python.

Colorless Green.

Photography around Santiago.

SVG experiment.

Professional Portfolio

Calibration of seismometers.

Data access via web services.

Cache rewrite.

Extending OpenSSH.

C-ORM: docs, API.

Last 100 entries

Lepton Decay Irregularity; An Easier Way; Julia's BinDeps (aka How To Install Cairo); Good Example Of Good Police Work (And Anonymity Being Hard); Best Santiago Burgers; Also; Michael Emmerich (Vibrator Translator) Interview (Japanese Books); Clarice Lispector (Brazillian Writer); Books On Evolution; Looks like Ara (Modular Phone) is dead; Index - Translations From Chile; More Emotion in Chilean Wines; Week 7; Aeon Magazine (Science-ish); QM, Deutsch, Constructor Theory; Interesting Talk Transcripts; Interesting Suggestion Of Election Fraud; "Hard" Books; Articles or Papers on depolarizing the US; Textbook for "QM as complex probabilities"; SFO Get Libor Trader (14 years); Why Are There Still So Many Jobs?; Navier Stokes Incomplete; More on Benford; FBI Claimed Vandalism; Architectural Tessellation; Also: Go, Blake's 7; Delusions of Gender (book); Crypto AG DID work with NSA / GCHQ; UNUMS (Universal Number Format); MOOCs (Massive Open Online Courses); Interesting Looking Game; Euler's Theorem for Polynomials; Weeks 3-6; Reddit Comment; Differential Cryptanalysis For Dummies; Japanese Graphic Design; Books To Be Re-Read; And Today I Learned Bugs Need Clear Examples; Factoring a 67 bit prime in your head; Islamic Geometric Art; Useful Julia Backtraces from Tasks; Nothing, however, is lost with less discomfort than that which, when lost, cannot be missed; Article on Didion; Cost of Living by City; British Slavery; Derrida on Metaphor; African SciFi; Traits in Julia; Alternative Japanese Lit; Pulic Key as Address (Snow); Why Information Grows; The Blindness Of The Chilean Elite; Some Victoriagate Links; This Is Why I Left StackOverflow; New TLS Implementation; Maths for Physicists; How I Am 8; 1000 Word Philosophy; Cyberpunk Reading List; Detailed Discussion of Message Dispatch in ParserCombinator Library for Julia; FizzBuzz in Julia w Dependent Types; kokko - Design Shop in Osaka; Summary of Greece, Currently; LLVM and GPUs; See Also; Schoolgirl Groyps (Maths); Japanese Lit; Another Example - Modular Arithmetic; Music from United; Python 2 and 3 compatible alternative.; Read Agatha Christie for the Plot; A Constructive Look at TempleOS; Music Thread w Many Recommendations; Fixed Version; A Useful Julia Macro To Define Equality And Hash; k3b cdrom access, OpenSuse 13.1; Week 2; From outside, the UK looks less than stellar; Huge Fonts in VirtualBox; Keen - Complex Emergencies; The Fallen of World War II; Some Spanish Fiction; Calling C From Fortran 95; Bjork DJ Set; Z3 Example With Python; Week 1; Useful Guide To Starting With IJulia; UK Election + Media; Review: Reinventing Organizations; Inline Assembly With Julia / LLVM; Against the definition of types; Dumb Crypto Paper; The Search For Quasi-Periodicity...; Is There An Alternative To Processing?; CARDIAC (CARDboard Illustrative Aid to Computation); The Bolivian Case Against Chile At The Hague; Clear, Cogent Economic Arguments For Immigration; A Program To Say If I Am Working; Decent Cards For Ill People; New Photo

© 2006-2015 Andrew Cooke (site) / post authors (content).

Y Combinators and Monads - How?

From: "andrew cooke" <andrew@...>

Date: Wed, 2 May 2007 13:38:17 -0400 (CLT)

Search for "unix pipe erlang" and it seems like everyone and their dog has
written code something like that below (they allows functions to be
chained together as parallel processes).

But what if my functions need to manage some state?  I have a rather large
(and useful) (quasi-)monad library.  How do I integrate that?

Andrew

PS "Response" doesn't make much sense out of context, but provides some
information for logging.

-module(chain).

-import(choopa_util, [res_info/2, res_info/3]).
-export([new_end/3, new_link/4, echo/2]).


bootstrap(Fun) ->
    Pid = spawn(fun() -> Fun(Fun) end),
    fun(Message) -> Pid ! Message end.

new_end(Response, Filter, Name) ->
    bootstrap(fun(Self) ->
                      receive
                          {data, Data} ->
                              Filter(Data),
                              Self(Self);
                          exit ->
                              res_info(Response, "Exiting ~s", [Name]);
                          Other ->
                              res_info(Response, "~s: unexpected ~p ",
                                       [Name, Other]),
                              Self(Self)
                      end
              end).

new_link(Response, Filter, Name, Next) ->
    bootstrap(fun(Self) ->
                      receive
                          {data, Data} ->
                              Next({data, Filter(Data)}),
                              Self(Self);
                          exit ->
                              Next(exit),
                              res_info(Response, "Exiting ~s", [Name]);
                          Other ->
                              res_info(Response, "~s: unexpected ~p ",
                                       [Name, Other]),
                              Self(Self)
                      end
              end).

echo(Response, Tag) ->
    fun(Message) -> res_info(Response, Tag),
                    Message
    end.

Bananas etc

From: "andrew cooke" <andrew@...>

Date: Wed, 2 May 2007 13:45:56 -0400 (CLT)

Some answers after sleeping on this (original post was sent yesterday;
reposted today due to svn shenanigans - not having a very good day,
svn-wise).

1 - What I keep calling monads are really bananas and folds and all that
stuff - ana-thing and cata-wotsist - and I really need to get those clear
(and their relation to monads).  For example, the most popular of my
"monad" functions is really a fold that cleans up after a A -> B -> (C *
A) converts [B] to [C] (and what is that thing called? - it's the A that
is my "monad").

2 - This is kind-of irrelevant to what I was stuck on because the levels
are different.  My monads/folds/whatevers are processing (individual items
in) lists of data, while the processes are processing (passing around)
chunks of data (sub-lists).

3 - (2) is kind-of related to streams and protocols.  Working on Mule has
made me more interested in how you define and separate protocols at
different layers (in theory easy, but in practice you seem to need to make
certain compromises).

Andrew

Comment on this post