MATLAB TO HP PRIME

[xavimb26]

Can someone help me to turn this matlab code into an hp prime program code? It's a single iteration of simplex:

A = [
8 10 -9 9 7 1 0 0;
4 9 -8 -10 -7 0 1 0;
8 1 -4 5 -8 0 0 1;
];
C = [5 3 5 0 -1 0 0 0];
b = [152;112;159];
base0 = [1,3,7]

B = A(:,base0)
cb = C(base0)
xb = B\b
z0 = cb*xb
cn = C; cn(base0) = []
N = A; N(:,base0) = []

cnred = cn - cb*inv(B)*N

restrict = xb./(inv(B)*N*[0 0 0 0 1]')