Metodo Simplex em Delphi

Gente preciso fazer a resolução do método simplex em delphi, alguém tem o algoritmo ou o fonte?

Grato