fdd := fopen"(""te_file", WRITE")";fprintf"("fdd, "%g", a")":fclose"("fdd")";
