(List
  (FunctionDef myping []
    (List
      (If
        (Com {[LIT_CHARS hash]} {[LIT_CHARS fping]}
          <
          (FilenameRedirectNode filename={[LIT_CHARS /dev/null]} <REDIR_GREAT "2>"> 2),
          >
        )
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('RES', {[ComSub (Com {[LIT_CHARS fping]} {[LIT_CHARS -aq]} {[VarSub 1]})]})])
        (ElseTrue)
        (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('RES', {[ComSub (Pipeline (Com {[LIT_CHARS ping]} {[LIT_CHARS -c]} {[LIT_CHARS 1]} {[VarSub 1]}) (Com {[LIT_CHARS grep]} {[LIT_CHARS ttl]}) )]})])
      )
      (Com {[LIT_CHARS echo]} {[VarSub RES]})
    )
  )
  (If
    (DBracket {B1 UNARY_STRING_z {[DQ [VarSub 1]]}})
    (List
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "Usage: "][VarSub 0][LIT_CHARS " environment (role)"]]})
      (Com {[LIT_CHARS exit]})
    )
    (ElseTrue)
    (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ENVIRONMENT', {[DQ [VarSub 1]]})])
  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('ROLE_REQUESTED', {[DQ [VarSub 2]]})])
  (If
    (DBracket {B1 UNARY_FILE_f {[LIT_CHARS cluster.txt]}})
    (List
      (While
        (Com {[LIT_CHARS read]} {[LIT_CHARS HOSTNAME]} {[LIT_CHARS MACADDR]} {[LIT_CHARS IPADDR]} {[LIT_CHARS ILOIPADDR]} {[LIT_CHARS DOMAIN]} {[LIT_CHARS ROLE]})
        (List
          (If
            (DBracket {B2 BINARY_STRING_EQUAL {[VarSub HOSTNAME]} {[DQ [LIT_CHARS end]]}})
            (Com {[LIT_CHARS continue]})
          )
          (If
            (DBracket {B? LOGICAL_BINARY_OR {B1 UNARY_STRING_z {[DQ [VarSub ROLE_REQUESTED]]}} {B2 BINARY_STRING_EQUAL {[DQ [VarSub ROLE]]} {[DQ [VarSub ROLE_REQUESTED]]}}})
            (List
              (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('HOSTS', {[DQ [VarSub HOSTS][LIT_CHARS " "][VarSub HOSTNAME]]})])
              (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('IPS', {[DQ [VarSub IPS][LIT_CHARS " "][VarSub IPADDR]]})])
            )
          )
        )
      )
      (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "HOSTS = "][VarSub HOSTS]]})
      (For HOST [{[VarSub IPS]}])
        (List
          (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('RES', {[ComSub (Com {[LIT_CHARS myping]} {[VarSub HOST]})]})])
          (If
            (DBracket {B1 UNARY_STRING_z {[VarSub RES]}})
            (List
              (Com {[LIT_CHARS echo]} {[VarSub HOST]} {[LIT_CHARS is]} {[LIT_CHARS down]})
              (Com {[LIT_CHARS continue]})
            )
            (ElseTrue)
            (Com {[LIT_CHARS echo]} {[VarSub HOST]} {[LIT_CHARS is]} {[LIT_CHARS up]})
          )
          (Com {[LIT_CHARS ./nodessh.sh]} {[VarSub ENVIRONMENT]} {[VarSub HOST]} {[DQ [LIT_CHARS chef-client]]} {[LIT_CHARS sudo]})
        )
      )
    )
  )
)