(CommandList
  children: [
    (C {(echo)} {(DQ ("*** CLEAN BEGIN ***"))})
    (C {(echo)} {(DQ ("Cleaning up the main work area. This may take a while..."))})
    (C {(rm)} {(-rf)} {(work)})
    (C {(mkdir)} {(work)})
    (C {(mkdir)} {(-p)} {(source)})
    (C {(echo)} {(DQ ("*** CLEAN END ***"))})
  ]
)