• 0 Posts
  • 58 Comments
Joined 1 year ago
cake
Cake day: July 3rd, 2023

help-circle




  • I dunno, I ended up blocking the instance way before I knew about their reputation (like, when I first joined Lemmy) because all of the users their kept posting the most unhinged shit.

    I have definitely seen blatant apologism for China/Russia from them.

    FWIW, I’m much further left than your average Democrat (I consider myself a leftist/anarchist). I personally don’t consider what I’ve seen from them to be very “left”, just authoritarian.


  • I made this mistake for ages because Haskell is so popular and it’s functional and pure, but it’s not actually a requirement for functional languages to be pure. OCaml isn’t.

    I didn’t say that FP languages have to necessarily be pure, just that FP languages tackle the problem of mutation by arranging programs such that most things are typically pure and side effects typically happen at the periphery (logging is probably the one exception, though). This is true even in FP languages that allow arbitrary side effects in functions, it’s just not enforced by a compiler.

    I agree Rust code has a different feel to OCaml code but that’s because it makes some things easier (e.g. mutation, vectors). You still could write Rust as if it was OCaml (except for the lack of currying), it’s just that nobody does that because it sucks.

    That’s the entire point, though. It’s all about what the language emphasizes and makes easy to do. If it’s unnatural to write a functional program in Rust and no one does it, then it’s not really reasonable to call it a functional language. Writing functional programs is not idiomatic Rust, and that’s okay.


  • Fundamentally it’s a language oriented around blocks of statements rather than composition of expressions. Additionally, it takes a different approach to the mutation problem than FP languages: where FP seeks to make most things pure and push mutation and side effects to the edges of the program, Rust uses its type system to make such mutation and side effects more sane. It’s an entirely different philosophy when it comes to programming. I don’t think either approach is necessarily better, mind you, just a different set of tradeoffs.

    I’m a professional Haskell developer and am very much immersed in FP. When I read Rust code, I have to completely shift my thinking to something much more imperative. Whereas if I read, say, Ocaml, the difference is mostly syntactic. This isn’t a slight, mind you. I quite like Rust. But it’s a very different paradigm.








  • Your post only showed adding functionality over the algebra, not new types on which the algebra operates (or “sorts”, as they are otherwise known). In other words, you can’t easily extend Expr to support Boolean logic in addition to addition itself. For a concrete example, how could you represent ternary operators like in the expression 2 + 2 == 4 ? 1 : 2, such that it’s well typed and will never result in an exception? With GADTs, this is very simple to do:

    data Expr a where
      Lit :: Int -> Expr Int
      Add :: Expr Int -> Expr Int -> Expr Int
      Eq :: Expr Int -> Expr Int -> Expr Bool
      If :: Expr Bool -> Expr Int -> Expr Int ->  Expr Int
    
    eval :: Expr a -> a
    eval expr = case expr of
      Lit n -> n
      Add a b -> eval a + eval b
      Eq a b -> eval a == eval b
      If p a b -> if eval p then eval a else eval b
    
    -- >> eval example == 1 => true
    example :: Expr Int
    example =
      If ((Lit 2 `Add` Lit 2)  `Eq` Lit 4) (Lit 1) (Lit 2)
    

  • This is a very common toy example we use in Haskell, though honestly this OOP version leaves a lot to be desired, comparatively

    The issue is that it tries to shoehorn separation of data and functions on data into a paradigm that’s fundamentally about fusing those two things together.

    Here’s the Haskell version. Note how much simpler it is because data and functions are separate:

    data Expr
      = Lit Int
      | Add Expr Expr
    
    eval :: Expr -> Int
    eval expr = case expr of
      Lit n -> n
      Add a b -> eval a + eval b
    
    print :: Expr -> String
    print expr = case expr of
      Lit n -> show n
      Add a b -> "(" ++ print a ++ " + " ++ print b ++ ")"
    

    Typescript can do something similar:

    type Expr = {
      kind: 'Lit',
      value: number
    } | {
      kind: 'Add',
      left: Expr,
      right: Expr
    }
    
    function eval(expr: Expr): number {
      switch(expr.kind){
        case 'Lit': return expr.value;
        case 'Add': return eval(expr.left) + eval(expr.right);
        default:
          const _impossible: never = expr;
          return _impossible;
    }
    
    function print(expr: Expr): string {
      switch(expr.kind){
        case 'Lit': return `${expr.value}`;
        case 'Add': return `(${print(expr.left)} + ${print(expr.right)})`;
        default:
          const _impossible: never = expr;
          return _impossible;
    }
    

    Both the OOP approach and Typescript itself struggle with additions to the algebra composed of different types, however. For example, imagine extending it to handle booleans as well, supporting equality operations. It’s difficult to make that well-typed using the techniques discussed thus far. In Haskell, we can handle that by making Expr a GADT, or Generalized Algebraic Data Type. That article actually already provides the code for this, so you can look there if you’re curious how it works.