How do you program Gaussian Elimination in Maxima?
Here's the pseudocode:
COL : 1
while PR does not reach last row (
PE = A[PR, COL]
if /PE/ is not largest
swap PR and row that contains the number with largest element
set CR = 1 row after PR
while CR does not reach end (
compute MULT = A[CR, COL] / PE
set MR = MULT * PR
compute CR = CR ? MR
set CR = 1 row after current CR
)
set PR = 1 step lower after current PR
set COL = 1 step to the right after current COL
)
backward substitute using modified matrix(ces)
print the x's
Can you please guide me doing the program?
Thank you.
_________________________________________________________________
Easily edit your photos like a pro with Photo Gallery.
http://get.live.com/photogallery/overview