#include <stdio.h>
#include "pilha.h"

#define TAM_PILHA 100
typedef double Stack[TAM_PILHA];

static Stack pilha;
static int topo;

static void Erro (char *errmsg)
{
  fputs (errmsg,stderr);
  fputc ('\n', stderr);
}

void empilha (double x)
{
  if (topo < TAM_PILHA) 
    pilha[topo++] = x;
  else 
    Erro ("Pilha cheia");
}

double desempilha ()
{
  if (topo > 0) 
    return pilha[--topo];
  else 
    {
      Erro ("Pilha vazia");
      return 1.0;
    }
}


void LimpaPilha ()
{
  topo = 0;
}

void ListaPilha ()
{
  int i;
  for (i = 0; i < topo; i++)
    printf ("\t[%3.3d]: %f\n", i, pilha[i]);
}