#!/usr/local/bin/perl
require 'cgi-lib.pl';
&ReadParse(*in);
$|=1;
print "Content-type: text/html\n\n";
print "\n";
print "Result For System of Nonlinear Equations\n";
print "\n";
print "\n";
print "Our program returned the following results!\n";
print "
\n";
print "
\n";
open (prog,"|PAULH/nonlinear");
for ($row=1;$row<=6;$row++)
{
for ($col=1;$col<=7;$col++)
{
print prog "$in{$row.$col}\n";
}
}
close(prog);
print "\n";
print "Return to the problem\n";