{
{ This procedure is used to free an FDE entry. Before calling this procedure,
{ all memory assigned to the file should be freed. All tables subordinate to he FDE
{ should be freed. The FDE cannot be accessed after being freed.
{
{ Before calling this procedure, the FDE entry should be unlocked with gfp$unlock_fde if it is
{ locked.
{
{     GFP$FREE_FDE (FDE_P)
{
{ FDE_P: (INPUT) This parameter contains a pointer to the entry being freed.
{
