@designliquido/delegua 0.0.1 → 0.1.2

package/testes/testes.egua

@@ -1,631 +0,0 @@
-escreva("--------------------------------");
-escreva("Testes Internos - Linguagem Egua");
-escreva("--------------------------------");
-escreva("|");
-
-var erros = 0;
-
-funcao startTest(){
-  escreva(tSeSenao());
-  escreva("|");
-  escreva(tEnquanto());
-  escreva("|");
-  escreva(tPara());
-  escreva("|");
-  escreva(tFacaEnquanto());
-  escreva("|");
-  escreva(tCasoEscolha());
-  escreva("|");
-  escreva(tTentePegue());
-  escreva("|");
-  escreva(tClasse());
-}
-
-funcao tSeSenao(){
-  escreva("----------------------------");
-  escreva("Iniciando Teste: Se - Se Não");
-  escreva("----------------------------");
-  var a = 1;
-  var b = 1;
-  se (a == b)
-    retorna("Se - Se não: OK!");
-  senao {
-    erros = erros + 1;
-    retorna("Se - Se não: ERRO!");
-  }
-}
-
-funcao tEnquanto(){
-  escreva("------------------------");
-  escreva("Iniciando Teste: Enquanto");
-  escreva("------------------------");
-  var a = 0;
-  enquanto(a<5){
-    a = a + 1;
-  }
-  se (a == 5)
-    retorna("Enquanto: OK!");
-  senao {
-    erros = erros + 1;
-    retorna("Enquanto: ERRO!");
-  }
-  escreva(a);
-}
-
-funcao tPara(){
-  escreva("--------------------");
-  escreva("Iniciando Teste: Para");
-  escreva("--------------------");
-  var a = 0;
-  para (var i = 0; i < 5; i = i + 1) {
-  a = a + 1;
-  }
-  se (a == 5)
-    retorna("Para: OK!");
-  senao {
-    erros = erros + 1;
-    retorna("Para: ERRO!");
-  }
-}
-
-funcao tFacaEnquanto(){
-  escreva("-----------------------------");
-  escreva("Iniciando Teste: Faça - Enquanto");
-  escreva("-----------------------------");
-  var a = 0;
-  fazer {
-    a = a + 1;
-  } enquanto(a<5){
-  }
-  se (a == 5)
-    retorna("Faça - Enquanto: OK!");
-  senao {
-    erros = erros + 1;
-    retorna("Faça - Enquanto: ERRO!");
-  }
-}
-
-funcao tCasoEscolha(){
-  escreva("--------------------");
-  escreva("Iniciando Teste: Caso - Escolha");
-  escreva("--------------------");
-  escolha(1){
-    caso 1: 
-    retorna("Caso - Escolha: OK!");  
-    caso 2:
-    retorna("Caso - Escolha: ERRO!");
-  }
-}
-
-funcao tTentePegue(){
-  escreva("--------------------");
-  escreva("Iniciando Teste: Tente - Pegue");
-  escreva("--------------------");
-  tente {
-  1 > "1";
-  escreva("Tente - Pegue: ERRO!");
-  } pegue {
-  escreva("Tente - Pegue: OK!");
-  } finalmente {
-  retorna(" ");  
-  }
-}
-
-funcao tClasse(){
-  escreva("--------------------");
-  escreva("Iniciando Teste: Classe");
-  escreva("--------------------");
-  tente{
-  classe Animal {
-    correr() {
-      escreva("Correndo Loucamente");
-    }
-  }
-  classe Cachorro herda Animal {
-    latir() {
-      escreva("Au Au Au Au");
-    }
-  }
-  var nomeDoCachorro = Cachorro();
-  nomeDoCachorro.correr();
-  nomeDoCachorro.latir();
-  escreva("Classe: OK!");
-  } pegue {
-  escreva("Classe: ERRO!");  
-  } finalmente {
-  retorna(" ");
-  }
-}
-
-startTest();
-escreva("----------------------------");
-escreva("Teste terminado com " + texto(erros) + " erro(s)!");
-escreva("----------------------------");
-
-
-escreva("--------------------------------");
-escreva("Testes Internos - Biblioteca EguaMat");
-escreva("--------------------------------");
-escreva("|");
-
-var errosM = 0;
-
-
-var m = importar("eguamat");
-var nula = m.nula();
-
-var o = [1,1,2,3,15];
-var p = [2,6,7,10,20];
-
-
-funcao teste_gerarPontosAbscissa() {
-  var gerarPontosAbscissa = m.gerarPontosAbscissa(2,3);
-
-  se (gerarPontosAbscissa != nula)
-    escreva (gerarPontosAbscissa);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tfun1R(){
-  var fun1R = m.fun1R(2,3);
-  
-  se (fun1R != nula)
-        escreva (fun1R);
-      senao {
-        errosM = errosM+1;
-        escreva(errosM);
-      }
-}
-
-funcao tfun2R(){
-  var fun2R = m.fun2R(2,-4,3);
-  
-  se (fun2R != nula)
-    escreva (fun2R);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao taprox(){
-  var aprox = m.aprox(1,10);
-  
-  se (aprox != nula)
-        escreva (aprox);
-  senao {
-        errosM = errosM+1;
-        escreva(errosM);
-
-    }
-}
-
-
-funcao tsen(){
-  var sen = m.sen(60);
-  
-  se (sen != nula)
-        escreva (sen);
-      senao {
-        errosM = errosM+1;
-        escreva(errosM);
-      }
-}
-
-funcao tcos(){
-  var cos = m.cos(60);
-  
-  se (cos != nula)
-        escreva (cos);
-      senao {
-        errosM = errosM+1;
-        escreva(errosM);
-      }
-}
-
-funcao ttan(){
-  var tan = m.tan(60);
-
-  se (tan != nula)
-    escreva (tan);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tarsen(){
-  var arsen = m.arsen(60);
-
-  se (arsen != nula)
-    escreva (arsen);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tarcos(){
-  var arcos = m.arcos(60);
-
-  se (arcos != nula)
-    escreva (arcos);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tartan(){
-  var artan = m.artan(60);
-
-  se (artan != nula)
-    escreva (artan);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao texp(){
-  var exp = m.exp(10);
-
-  se (exp != nula)
-    escreva (exp);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tlog(){
-  var log = m.log(10);
-  
-  se (log != nula)
-    escreva(log);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tpotencia(){
-  var pot = m.potencia(2,3);
-  
-  se (pot != nula)
-    escreva(pot);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao traizq(){
-  var raizq = m.raizq(49);
-
-  se (raizq != nula)
-    escreva(raizq);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tvmed(){
-  var vmed = m.velocidadeMedia(30,10);
-
-  se (vmed != nula)
-    escreva(vmed);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tdeltas(){
-  var deltas = m.deltaS(10,30);
-
-  se (deltas != nula)
-    escreva(deltas);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tdeltat(){
-  var deltat = m.deltaT(10,30);
-
-  se (deltat != nula)
-    escreva(deltat);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tacel(){
-  var acel= m.aceleracao(30,0,60,0);
-  
-  se (acel != nula)
-    escreva(acel);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tmrufh(){
-  var mrufh = m.mrufh(0,30,15);
-
-  se (mrufh != nula)
-    escreva(mrufh);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tmruvvel(){
-  var mruvvel = m.mruv(0,30,15,2);
-
-  se (mruvvel != nula)
-    escreva(mruvvel);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tmoda(){
-  var i = [1,2,2,3,4];
-  var modaUm = m.moda(i);
-  var j = [1,2,2,3,3];
-  var modaDois = m.moda(j);
-  var k = [1,2,3,4,5];
-  var modaTres = m.moda(k);
-  
-  se (modaUm[0] == 2)
-    escreva(modaUm);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-  se (modaDois[0] == 2 e modaDois[1] == 3)
-    escreva(modaDois);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-
-  se (modaTres)
-    escreva(modaTres);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-escreva("--------------------------------");
-escreva("Função gerarPontosAbscissa:");
-teste_gerarPontosAbscissa();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função fun1R:");
-tfun1R();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função fun2R:");
-tfun2R();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função aprox:");
-taprox();
-
-escreva("|");
-escreva("--------------------------------");
-escreva("Função numeroOcorrencias():");
-escreva(m.numeroOcorrencias([1, 2, 3, 4, 5], 3));
-
-escreva("|");
-escreva("--------------------------------");
-escreva("Função max():");
-escreva(m.max([1, 2, 3, 4, 5]));
-
-escreva("|");
-escreva("--------------------------------");
-escreva("Função min():");
-escreva(m.min([1, 2, 3, 4, 5]));
-
-escreva("|");
-escreva("--------------------------------");
-escreva("Função sen:");
-tsen();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função cos:");
-tcos();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função tan:");
-ttan();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função arsen:");
-tarsen();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função arcos:");
-tarcos();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função artan:");
-tartan();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função exp:");
-texp();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função log:");
-tlog();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função potencia:");
-tpotencia();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função raizq:");
-traizq();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função vmed:");
-tvmed();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função deltas:");
-tdeltas();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função deltat:");
-tdeltat();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função acel:");
-tacel();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função mruhfh:");
-tmrufh();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função mruvvel:");
-tmruvvel();
-escreva("--------------------------------");
-escreva("Função moda:");
-tmoda();
-escreva("|");
-
-escreva("--------------------------------");
-escreva("Testes Funções Internas - Linguagem Egua");
-escreva("--------------------------------");
-escreva("|");
-
-funcao ttamanho(){
-  var array = [1,2,3];
-  var tam = tamanho(array);
-
-  se (tam != nula)
-    escreva(tam);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao ttexto(){
-  var t = 123;
-  var text = texto(t);
-
-  se (text != nula)
-    escreva(text);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao treal(){
-  var n = '123.05';
-  var rel = real(n);
-
-  se (rel != nula)
-    escreva(rel);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tinteiro(){
-  var i = '50.56';
-  var int = inteiro(i);
-
-  se (int != nula)
-    escreva(int);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao tordenar(){
-  var i = [4,2,1,5,3];
-  var ord = ordenar(i);
-
-  se (ord != nula)
-    escreva(ord);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao taleatorio(){
-  var ran = aleatorio();
-  se (ran != nula)
-    escreva(ran);
-  senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-funcao taleatorioEntre(){
-  var ran = aleatorioEntre(0,3);
-  se (ran == 0)
-    escreva(ran);
-  senao se (ran == 1) {
-    escreva(ran);
-  } senao se (ran == 2){
-    escreva(ran);
-  } senao {
-    errosM = errosM+1;
-    escreva(errosM);
-  }
-}
-
-escreva("--------------------------------");
-escreva("Função interna: Tamanho");
-ttamanho();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Texto");
-ttexto();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Real");
-treal();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Inteiro");
-tinteiro();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Ordenar");
-tordenar();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Aleatório");
-taleatorio();
-escreva("|");
-escreva("--------------------------------");
-escreva("Função interna: Aleatório Entre");
-taleatorioEntre();
-escreva("|");
-escreva("--------------------------------");
-escreva("Teste terminado com " + texto(errosM) + " erro(s)!");
-escreva("----------------------------");