Voici les commandes pour ecrire dans un fichier :
f:=fopen("essai") crèe un fichier du nom spécifié ici essai
(et donc l’efface si celui-ci existait déjà) et lui associer la variable
f.
fprint(f,12) écrit 12 dans le fichier essai.
fclose(f) ferme le fichier essai.
On tape :
testfprint(nom):={ local a,f; a:=[]; f:=fopen(nom); for (k:=1;k<11;k++){ fprint(f,k); } fclose(f); return a; }
puis :
On obtient :