Need to walk through this error with someone

gistfile1.txt

   I'm trying to bring up the code in Ed Kmett's excellent blog post:
   
   https://www.schoolofhaskell.com/user/edwardk/cellular-automata/part-1
   
   But I get this error:
   
   • Expected kind ‘((* -> *) -> Constraint) -> *’,
        but ‘Diagram SVG’ has kind ‘*’
    • In the type signature: grid :: [[Bool]] -> Diagram SVG R2
    |
291 | grid :: [[Bool]] -> Diagram SVG R2
    |                     ^^^^^^^^^^^^^^