(List
  (Com {[LIT_CHARS sh]} {[LIT_CHARS ./ceph.conf.sh]} {[ComSub (Com {[LIT_CHARS hostname]} {[LIT_CHARS -i]})]}  )
  (Com {[LIT_CHARS sh]} {[LIT_CHARS ./mon.sh]} {[ComSub (Com {[LIT_CHARS hostname]} {[LIT_CHARS -i]})]}  )
  (Com {[LIT_CHARS mkdir]} {[LIT_CHARS -p]} {[LIT_CHARS /var/lib/ceph/osd/ceph-0]} {[LIT_CHARS /var/lib/ceph/osd/ceph-1]}  )
  (Com {[LIT_CHARS sh]} {[LIT_CHARS ./osd.sh]} {[LIT_CHARS 0]}  )
  (Com {[LIT_CHARS sh]} {[LIT_CHARS ./osd.sh]} {[LIT_CHARS 1]}  )
  (Com {[LIT_CHARS rbd]} {[LIT_CHARS import]} {[LIT_CHARS block]} {[LIT_CHARS foo]}  )
  (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Ceph is ready"]]}  )
  (While
    (Com {[LIT_CHARS true]}    )
    (Com {[LIT_CHARS sleep]} {[LIT_CHARS 10]}    )
  )
)