(command.CommandList
  children: [
    (C {<set>} {<-o>} {<nounset>})
    (C {<set>} {<-o>} {<pipefail>})
    (C {<set>} {<-o>} {<errexit>})
    (command.ShFunction
      name: install
      body: 
        (BraceGroup
          children: [
            (C {<sudo>} {<apt>} {<install>} {<vagrant>})
            (C {<sudo>} {<apt>} {<install>} {<virtualbox>})
          ]
        )
    )
    (command.ShFunction
      name: archlinux
      body: 
        (BraceGroup
          children: [(C {<vagrant>} {<init>} {<'archlinux/archlinux'>}) (C {<vagrant>} {<up>})]
        )
    )
    (C {(DQ ($ Id.VSub_At '$@'))})
  ]
)