PPT Slide
NetSolve - FORTRAN Interface
double precision A(MAX,MAX), B(MAX)
integer IPIV(MAX), N, INFO, LWORK
call DGESV(N,1,A,MAX,IPIV,B,MAX,INFO)
Easy ‘switch’ to NetSolve
call NETSL(‘DGESV()’,NSINFO,
N,1,A,MAX,IPIV,B,MAX,INFO)
http://www.cs.utk.edu/netsolve/