require_once("eprConst.inc"); require_once("eprUtil.inc"); require_once("makeinpConst.inc"); if ($_GET['send']) { /* SH parameter form */ $shParameterComposition = composeSHParameter($vars['nn'], $vars['s'], $vars['i']); foreach ($shParameterComposition as $matrixName) { for ($i = 0; $i < 3; $i++) { for ($j = 0; $j < 3; $j++) { $vars['shParam'][$matrixName][$i][$j] = $vars['shParam'][$matrixName][$i][$j]; } } } } else { $shParameterComposition = array(); } printHeader("Spin-Hamiltonian Parameters", 'None'); ?>