<?php require('identification.php'); ?>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
<title>TRACK: проверка наличия файлов</title>
<meta http-equiv="Content-Type" content="text/html; charset=koi8-r">
<link rel="stylesheet" href="stev_sty.css" type="text/css">
</head>

<body>

<h2 align=center>TRACK: проверка наличия файлов</h2>

<?php

chdir ("data/$user");

# --------------------------------------------------------------------

if (!file_exists("zams.in1") or !file_exists("zams.in3"))
{
    echo "<H2 align=center><FONT color=red>Внимание!</FONT></H2>";
    echo "<p>Отсутствует файл 'ZAMS.IN1' или 'ZAMS.IN3', ";
    echo "необходимый для работы процедуры TRACK. Запустите процедуру ";
    echo "<A href=phystab_form.php>PHYSTAB</A>.";
} 
else if (!file_exists("track.mod"))
{
    echo "<H2 align=center><FONT color=red>Внимание!</FONT></H2>";
    echo "<p>Отсутствует файл 'TRACK.MOD', ";
    echo "необходимый для работы процедуры TRACK. Запустите процедуру ";
    echo "<A href=zams1.php>ZAMS</A>.";
}
else
{
    chkfile ("envelop.in");
    chkfile ("envelopa.in");

    $envf = file ("envelopa.in");
    $M = $envf[0];
    $Menv = $envf[1];
    $alfa = $envf[6];
    $eta = $envf[7];

    echo "
    <P>На диске есть необходимые для работы процедуры TRACK файлы
    (ZAMS.IN1, ZAMS.IN3, ENVELOP.IN, TRACK.MOD),
    рассчитанные для следующих параметров:</P>
 
    <table border=0 cellpadding=5>
    
    <tr><td>Масса звезды M, в массах Солнца</td>
    <td><input type=text name=M value=$M size=8 disabled></td>
    <td></td></tr>
    
    <tr><td>Масса оболочки звезды M<i>env</i></td>
    <td><input type=text name=Menv value=$Menv size=8 disabled></td>
    <td></td></tr>
    
    <tr><td>Параметр теории длины пути перемешивания alpha</td>
    <td><input type=text name=alfa value=$alfa size=8 disabled></td>
    <td></td></tr>
    
    <tr><td>Коэффициент потери массы eta</td>
    <td><input type=text name=eta value=$eta size=8 disabled></td>
    <td></td></tr>
    
    </table>";
}
?>

<H3>Выберите удобное для Вас условие конца расчета эволюционного трека</H3>

<p>Вы можете задать один из следующих параметров:</p>

<form action=track2.php method=post>

<table border=0 cellpadding=5>

<tr><td>Число рассчитываемых моделей трека</td>
<td><input type=text name=nmod value=0 size=18></td>
<td></td></tr>

<tr><td>Возраст последней рассчитываемой модели (в годах)</td>
<td><input type=text name=age value=0.000E+00 size=18></td>
<td></td></tr>

<tr><td>Содержание водорода в центре последней модели</td>
<td><input type=text name=xc value=0.0 size=18></td>
<td></td></tr>

</table>

<p align=center>
<input type=submit value=Отправить>
<input type=reset value=Очистить>
</p>

</form>

</body>
</html>
