Inverse = {Inverse(<x>) : Calcul l'inverse du nombre complexe x. x ne peut être nul}
[
{Déclaration des erreurs possibles}
NewError("nbArgs", "W", "Le nombre d'arguments utilisés est incorrect"),
NewError("div0", S, "L'argument fourni doit être non nul"),
{Calcul de l'inverse avec levée d'erreur}
if (Nargs() <> 1) then RaiseError("nbArgs", [affichage := 1, valRetournee := 0])
elif (%1 = 0) then RaiseError("div0", [affichage := 1, valRetournee := Nil])
else 1/%1
fi
]
TeXgraph#
Var
DisplayError = 1;
ReturnValue = Nil;
ErrorInFile = "";
ErrorInMac = "";
ErrorInExpr = "";
Mac
NewError = {NewError( "nom", type, "message" )}
NewMac(%1,Concat("[ $message:=""",%3, """, $type:=""",%2,""",",LF,"if DisplayError then Message([""Error : "",type,LF,""In file : "",ErrorInFile,LF,""In mac : "",ErrorInMac,LF,""In expr. : "",ErrorInExpr,LF,LF, message]) fi,",LF,"ReturnValue]"));
RaiseError = {RaiseError("nom", [options]}
[ ReturnValue := Nil, ErrorInFile := "", ErrorInMac := "", ErrorInExpr := "",
$options:=%2, Eval([%1,"()"])
];
inverse = {inverse(x) renvoie l'inverse de x, pour tester}
[if %1=0 then
RaiseError("div0", [ErrorInFile:="error.mac", ErrorInMac:="inverse", ErrorInExpr:=%1, ReturnValue:=1])
else 1/%1
fi];
Cmd {exemple de création d'erreur}
NewError("div0","Division par 0", "L'expression au dénominateur s'annule.");
Inverse = {Inverse(z) : renvoie l'inverse du complexe non nul z}
[
if Nargs() <> 1 then
FichierMacErr := "Operation.mac",
FichierMacVersionErr := "13.11",
MacroErr := "Inverse",
LibelleErr := "Nombre d'argument invalide",
ValRetournee := 0,
TraiterErreur()
elif %1 = 0
FichierMacErr := "Operation.mac",
FichierMacVersionErr := "13.11",
MacroErr := "Inverse",
LibelleErr := "Nombre d'argument invalide",
ValRetournee := 0,
TraiterErreur()
else
1/%1
]
inverse = {inverse(x) renvoie l'inverse de x, pour tester}
[if %1=0 then
TraiterErreur([FichierErr:="Operation.mac", VersionFichierErr:="13.11", MacroErr:="Inverse", LibelleErr:="Argument nul", ValRetournee:=2.758])
else 1/%1
fi];
Alphonse Capriani a écrit:En revanche, qu'entends-tu par une exécution de TeXgraph en mode console? Tu veux dire réaliser des exports a partir d'un *.teg dans le terminal via la commande CmdTexgraph?
Si oui, quelle est la syntaxe de cette commande exactement? J'ai jeté un oeil sur les exemple que tu as posté dans ce fil (notamment pour nous montrer les effets de la fonction Message en mode console) mais je n'ai pas trouvé de doc sur l'utilisation de cette commande (je continue quand même mes recherches )
Revenir vers Propositions - Discussions
Utilisateurs parcourant ce forum : Aucun utilisateur inscrit et 9 invités