(define-module (glicid packages mpi)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module ((gnu packages mpi)
                #:prefix gnu:)
  #:use-module (glicid utils)
  #:use-module (guix utils)
  #:use-module (glicid packages parallel)
  #:use-module (gnu packages parallel)
  #:use-module (guix gexp)
  #:use-module (gnu packages))

(define-public openmpi-glicid
  (package/inherit gnu:openmpi-4
    (name "openmpi-glicid")
    (inputs (modify-inputs (package-inputs gnu:openmpi-4)
              (append openpmix) ;; because we use pmix4 now, openpmi-4 defaults to internal pmix3
              (replace "slurm" slurm-glicid)))

    )
)



(define-public openmpi-glicid-new
  (package/inherit gnu:openmpi-4
    (name "openmpi-glicid-new")
    (arguments 
      (substitute-keyword-arguments (package-arguments gnu:openmpi-4)
       ((#:configure-flags flags)
        (append `(cons* "--with-pmix=external" ,flags)))))
    (inputs (modify-inputs (package-inputs gnu:openmpi-4)
              (append openpmix) ;; because we use pmix4 now, openpmi-4 defaults to internal pmix3
              (replace "slurm" slurm-glicid)))

    )
)