X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=programs%2Ffortran%2Fbuild_frtn.sh;h=f9c9a324252153cc96e301df76853fbba50604a1;hb=903be085d6c0c341f8e088c39dc7cbf25dec22f9;hp=6767e19731147ba2e227abe00235a8c69570db30;hpb=4dafd752143adb3a13d2f7203d15abbf202764e4;p=h316.git

diff --git a/programs/fortran/build_frtn.sh b/programs/fortran/build_frtn.sh
index 6767e19..f9c9a32 100755
--- a/programs/fortran/build_frtn.sh
+++ b/programs/fortran/build_frtn.sh
@@ -21,11 +21,12 @@ at ptp frtn.slst
 run 37000
 d a 100
 go
-d p 27777
+d a 27777
 go
 q
-
 EOF
+
+rm -f frtn.sys frtn.slst
 h316 build.do
 rm -f build.do