->                                               (@ +-
  say <- date # 'YYYY-MM-DD'                         (say <- date # 'YYYY-MM-DD' -  
  ' date = .today                                        (# today .date)
;                                                    )
                                                 )