Exemplos de fibats em PHP

Exemplo n.º 1

Arquivo: mytestall.php Projeto: smurphy8/ATS-Postiats-contrib

require './libatscc2php/CATS/PHParref_cats.php';
//
require './libatscc2php/DATS/list_dats.php';
require './libatscc2php/DATS/stream_dats.php';
require './libatscc2php/DATS/reference_dats.php';
//
echo "fact(10) = ";
echo fact(10);
echo "\n";
flush();
echo "fact2(10) = ";
echo fact2(10);
echo "\n";
flush();
echo "fibats(20) = ";
echo fibats(20);
echo "\n";
flush();
echo "acker(3, 3) = ";
echo acker(3, 3);
echo "\n";
flush();
echo "isevn(1000) = ";
echo isevn(1000);
echo "\n";
flush();
echo "isodd(1001) = ";
echo isodd(1001);
echo "\n";
flush();
//

Exemplo n.º 2

Arquivo: mytest_process.php Projeto: smurphy8/ATS-Postiats-contrib

<h2>Order Results</h2>
<?php 
$fact_arg = intval($_REQUEST["fact_arg"]);
$fibats_arg = intval($_REQUEST["fibats_arg"]);
$acker_arg1 = intval($_REQUEST["acker_arg1"]);
$acker_arg2 = intval($_REQUEST["acker_arg2"]);
//
echo "<p>Your order has been fulfilled as follows:";
echo "<br>";
echo "<br>";
//
echo "fact({$fact_arg}) = ", fact($fact_arg);
echo "<br>";
echo "<br>";
//
echo "fibats({$fibats_arg}) = ", fibats($fibats_arg);
echo "<br>";
echo "<br>";
//
echo "acker({$acker_arg1}, {$acker_arg2}) = ", acker($acker_arg1, $acker_arg2);
echo "<br>";
//
echo "<hr>";
//
echo "<p>Your order is processed at ";
echo date("H:i, F jS, Y");
echo "<br>";
//
?>

</body>