Not a bug, but the format is non-standard fortran.
Michael Baudin [Thu, 14 Aug 2008 12:38:11 +0000 (12:38 +0000)]
scilab/modules/optimization/src/fortran/writebuf.f

index 010751c..c05453e 100644 (file)
@@ -59,8 +59,12 @@ c     ====================================
       character*(*) buffer
       double precision r1
       
-      write(buffer(1:15),'(1pd15.7)') r1
+c Initialize the buffer with empty blanks
+c      write(buffer(:),'(a)') " "
+c What is the p format edit descriptor ?
+c      write(buffer(1:15),'(1pd15.7)') r1
+      write(buffer(1:15),'(1d15.7)') r1
 
       end
 c     ====================================
-      
\ No newline at end of file
+