/* joke.exc */

/* This program tells a joke. */

layout( 'Sheet1'
      , rows( heading
            , row( joke as y )
            )
      ).

type table_size = 1:4.

table joke : table_size -> text.
joke[1] = "Did you hear about the".
joke[2] = "builder who ran out of bricks?".
joke[3] = "He shouted, ".
joke[4] = "'BUNG A LOW ROOF ON!'".