function fm_list($q__fm_list_forum_id)
{
    if (!is_file("files/data_storage/" . $q__fm_list_forum_id)) {
        die("<title>ERROR</title><center><h1><font color=red>Inexistant</font></h1>ID <b>$q__fm_list_forum_id</b> does not exist.</center>");
    }
    $q__fm_list_tempo1 = file("files/data_storage/" . $q__fm_list_forum_id);
    $q__fm_list_tempo2 = explode("<,>",$q__fm_list_tempo1[1]);
    $q__fm_list_tempo3 = explode("<,>",$q__fm_list_tempo1[0]);
    if ($q__fm_list_tempo3[0] != "FORUM") {
        die("<title>ERROR</title><center><h1><font color=red>Incorrect Data Type</font></h1>ID <b>$q__fm_list_forum_id</b> is not a <cite>FORUM</cite>.<br>It is a <cite>$q__fm_list_tempo3[0]</cite>.</center>");
    }
    for ($e = 0; $e < $q__fm_list_tempo2[0]+$q__fm_list_tempo2[1]+3; $e++) {
        $q__fm_list_results[$e] = explode("<,>",rtrim($q__fm_list_tempo1[$e]));
    }
    return $q__fm_list_results;
}