anchor.diff:          print *, '### quoversion:         ', quovmaj, quovmin
           print *, '### nnodes:             ', nnodes
           print *, '### nnoderanks:         ', nnoderanks
  +        print *, '### nnumanodes          ', nnumanodes
           print *, '### nsockets:           ', nsockets
           print *, '### ncores:             ', ncores
           print *, '### npus:               ', npus
  
positive.code:     !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  
      ! gather basic system info
      call QM_SYSGROK(quo, nnodes, nnoderanks, noderank, nsockets, ncores, npus)
      ! allocate array large enough for node ranks
      allocate(ranks(nnoderanks))
  
  
negative.code: 
  !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
  ! gathers basic system info
  subroutine QM_SYSGROK(quoc, nnodes, nnoderanks, noderank, &
                        nnumanodes, nsocks, ncores, npus)
      integer*8, intent(in) :: quoc
      integer*4, intent(out) :: nnodes, nnoderanks, noderank, &
                                nnumanodes, nsocks, ncores, npus
      integer*4 :: qerr, tmpnsocks
      ! how many nodes are in our job
      call QUO_NNODES(quoc, nnodes, qerr)
  