Expression::operator Reel()const { //exception return Reel(0); }
/*! \sa Reel */ Rationnel::operator Reel()const { return Reel((float)num/den); }
void OperateurBinaire::Calculer(Pile* stack){ Donnee* dB= stack->depiler(); // On commence par depiler les 2 dernieres donnees entrees. B est la derniere donne empile, donc le second membre de l'operation. La seconde donne empile est le premier membre, A. Donnee* dA= stack->depiler(); Expression* testExA =dynamic_cast<Expression*>(dA); // On verifie d'abord si l'une des 2 donnees n'est pas une expression. Il faudra alors cancatener l'expression avec l'autre donnee et l'operateur. Expression* testExB =dynamic_cast<Expression*>(dB); if (testExA) { testExA->enfiler_fin(dB); testExA->enfiler_fin(this); // Si le premier membre est une expression, il faut enfiler le second membre et l'operateur à la fin successivement. stack->empiler(testExA); } else if (testExB) { testExB->enfiler_debut(dA); testExB->enfiler_fin(this); // Si le second membre est une expression et que le premier ne l'est pas, il faut enfiler le premier membre au début de B, et l'operateur à la fin. stack->empiler(testExB); } else { Complexe* testC1 = dynamic_cast< Complexe*>(dA); Complexe* testC2 = dynamic_cast< Complexe*>(dB); Reel* test1 = dynamic_cast< Reel*>(dA); Reel* test2 = dynamic_cast< Reel*>(dB); Rationnel* test3 = dynamic_cast< Rationnel*>(dA); Rationnel* test4 = dynamic_cast< Rationnel*>(dB); Entier* testE1 = dynamic_cast< Entier*>(dA); Entier* testE2 = dynamic_cast< Entier*>(dB); if ( testC1 || testC2){ //On a au moins un complexe. On travaille donc avec des complexes. Complexe A= Complexe(dA); // constructeur de complexe a partir de donnee. Complexe B= Complexe(dB); switch (typeoperation) { // Switch selon le type de l'operation, attribut de l'operateurBinaire. case (PLUS): { Complexe *X= new Complexe(A+B); stack->empiler(X); } break; case(MINUS): { Complexe *X= new Complexe(A-B); stack->empiler(X); } break; case(DIV): { if (B.CNull()){ // Cas ou une division par zero est tentée. stack->empiler(dA); stack->empiler(dB); throw CalculException("Division par zero impossible."); } else { Complexe *X= new Complexe(A/B); stack->empiler(X); } } break; case (MULT): { Complexe *X= new Complexe(A*B); stack->empiler(X); } break; case(MODULO): { stack->empiler(dA); // Modulo inappliquable sur complexes. On re-empile donc les donnees dans le bon ordre. stack->empiler(dB); throw CalculException("Modulo inappliquable pour Complexe.\nFonction utilisable avec Entier uniquement."); } break; case (POW): { stack->empiler(dA); stack->empiler(dB); throw CalculException("POW inappliquable pour Complexe."); } break; } } else if ( test1 || test2 ) { //Au moins un reel Reel A=Reel(dA); Reel B=Reel(dB); Reel* dC = new Reel; switch (typeoperation) { case (PLUS): { *dC=(A+B); stack->empiler(dC); } break; case(MINUS): { *dC=(A-B); stack->empiler(dC); } break; case(DIV): { if (B.getVal()==0){ //Cas ou une division par zero est tentée. stack->empiler(dA); stack->empiler(dB); throw CalculException("Division par zero impossible."); } else { *dC=(A/B); stack->empiler(dC); } } break; case (MULT): { *dC=(A*B); stack->empiler(dC); } break; case(MODULO): { stack->empiler(dA); stack->empiler(dB); throw CalculException("Modulo inappliquable pour Reel.\nFonction utilisable avec Entier uniquement."); } break; case (POW): { *dC=(A*B); *dC=Reel(pow(A.getVal(),B.getVal())); stack->empiler(dC); } break; } } else if ( test3 || test4 ) { //Au moins un rationnel Rationnel A=Rationnel(dA); Rationnel B=Rationnel(dB); Rationnel* dC = new Rationnel; switch (typeoperation) { case (PLUS): { *dC=(A+B); stack->empiler(dC); } break; case(MINUS): { *dC=(A-B); stack->empiler(dC); } break; case(DIV): { if (B.getNumerateur().getVal()==0){ stack->empiler(dA); stack->empiler(dB); throw CalculException("Division par zero impossible."); } else { *dC=(A/B); stack->empiler(dC); } } break; case (MULT): { *dC=(A*B); stack->empiler(dC); } break; case(MODULO): { stack->empiler(dA); stack->empiler(dB); throw CalculException("Modulo inappliquable pour Rationnel.\nFonction utilisable avec Entier uniquement."); } break; case (POW): { *dC=Rationnel(pow(A.getNumerateur(),float(B)),pow(A.getDenumerateur(),float(B))); stack->empiler(dC); } break; } } else if ( testE1 || testE2){ //On a forcément deux entiers Entier* C = new Entier; // Il est inutile de creer des variables locales entieres et de proceder a une conversion a partir de donnee, puisque testE1 et testE2 sont tout les 2 forcéments des entiers. Nous pouvons donc les utiliser dans le calcul. switch (typeoperation) { case (PLUS): { *C = *testE1 + *testE2; stack->empiler(C); } break; case(MINUS): { *C = *testE1 - *testE2; stack->empiler(C); } break; case(DIV): { if (testE2->getVal()==0){ stack->empiler(testE1); stack->empiler(testE2); throw CalculException("Division par zero impossible."); } else { *C = *testE1 / *testE2; stack->empiler(C); } } break; case (MULT): { *C = *testE1 * *testE2; stack->empiler(C); } break; case(MODULO): { if (testE2->getVal()==0){ stack->empiler(testE1); stack->empiler(testE2); throw CalculException("Modulo: Division par zero impossible."); } else { *C = *testE1 % *testE2; stack->empiler(C); } } break; case (POW): { *C = Entier(pow(testE1->getVal(),testE2->getVal())); stack->empiler(C); } break; } } else throw CalculException("Echec de la reconnaissance du type de 2 variables entrees.\nSource: Operateurbinaire.cpp. "); } }
Constante* Analyseur::ToConstante(QString s) const { Historique* h =Historique::GetInstance(); if (EstConstante(s)) { if (!(h->ModeComplexe()))//Dans ce cas, il ne faut pas utiliser les complexes { if (EstExpression(s)) { /* Il faut retirer les '*/ s=s.left(s.length()-1); s=s.right(s.length()-1); return new Expression(s); } if (EstComplexe(s)) { Reel temp(0); Reel temp2(0); QStringList list=s.split("$", QString::SkipEmptyParts); if (EstRationnel(list[0])) { QStringList tempList=list[0].split("/", QString::SkipEmptyParts); Rationnel rat(tempList[0].toInt(),tempList[1].toInt()); temp=Reel(rat); } else { temp=Reel(VirguleToPoint(list[0]).toDouble()); } if (EstRationnel(list[1])) { QStringList tempList2=list[1].split("/", QString::SkipEmptyParts); Rationnel rat(tempList2[0].toInt(),tempList2[1].toInt()); temp2=Reel(rat); } else { temp2=Reel(VirguleToPoint(list[1]).toDouble()); } return new Complexe(temp,temp2); } if (EstReel(s)) { return new Reel(VirguleToPoint(s).toDouble()); } if (EstRationnel(s)) { QStringList list=s.split("/", QString::SkipEmptyParts); Entier temp=list[0].toInt(); Entier temp2=list[1].toInt(); return new Rationnel(temp,temp2); } if (EstEntier(s)) { return new Entier(s.toInt()); } } else//Il faut tout couvertir en Complexe!!! { Entier entierNull(0); if (EstExpression(s)) { /* Il faut retirer les '*/ s=s.left(s.length()-1); s=s.right(s.length()-1); return new Expression(s); } if (EstComplexe(s)) { Reel temp(0); Reel temp2(0); QStringList list=s.split("$", QString::SkipEmptyParts); if (EstRationnel(list[0])) { QStringList tempList=list[0].split("/", QString::SkipEmptyParts); Rationnel rat(tempList[0].toInt(),tempList[1].toInt()); temp=Reel(rat); } else { temp=Reel(VirguleToPoint(list[0]).toDouble()); } if (EstRationnel(list[1])) { QStringList tempList2=list[1].split("/", QString::SkipEmptyParts); Rationnel rat(tempList2[0].toInt(),tempList2[1].toInt()); temp2=Reel(rat); } else { temp2=Reel(VirguleToPoint(list[1]).toDouble()); } return new Complexe(temp,temp2); } if (EstReel(s)) { return new Complexe(Reel(VirguleToPoint(s).toDouble()),entierNull); } if (EstRationnel(s)) { QStringList list=s.split("/", QString::SkipEmptyParts); Entier temp=list[0].toInt(); Entier temp2=list[1].toInt(); return new Complexe(temp/temp2,entierNull); } if (EstEntier(s)) { return new Complexe(Entier(s.toInt()),entierNull); } } } else { throw Exception("Ce n'est pas une instruction !"); } return 0; }