Je veux définir f^2 comme étant 1 mais laisser f indéfini

Question

Je veux, par exemple, que Mathematica génère 7 + 5f si j'écris l'expression (2 + f) (3 + f). Je veux toujours que f^2 soit calculé comme 1 (ou n'importe quelle autre valeur que je lui assigne) mais que f soit un symbole spécial indéfini. Si je définis f^2: = 1, je reçois un message d'erreur Tag Power is protected. Je suis un novice de Mathematica, autodidacte, alors essayez d'y répondre de manière aussi élémentaire que possible. Pour l'anecdote, j'essaie de définir les opérations d'algèbre de Clifford dans l'espace-temps n-dimensionnel et être capable de faire une telle affectation simplifierait énormément la tâche.

Answer 1

généralisable à tous les symboles e1, e2, e3, ..., en

x = (a + a1 e1 + a2 e2 + a3 e3 + a4 e1 e2 - a5 e1 e3 + a6 e2 e3 + 
a7 e1 e2 e3); 
y = (b + b1 e1 + b2 e2 + b3 e3 + b4 e1 e2 - b5 e1 e3 + b6 e2 e3 + 
b7 e1 e2 e3); 


ReplaceAll[ 
    Expand[x y], 
    Power[e_, 2] /; First[Characters[ToString[e]]] === "e" -> 1 
] 

---

cette façon que je viens d'apprendre de @Edmund est plus élégant:

Expand[(2 + e1)(3 + e2)] /.Power[s_Symbol,2]/; StringStartsQ["e"]@SymbolName[s]->1 

6 + 3 e1 + 2 e2 + e1 e2 

Answer 2

ReplaceAll[Expand[(2 + f) (3 + f)], Power[f, 2] -> 1] 

7 + 5 f