From owner-FreeBSD-users-jp@jp.freebsd.org  Mon Aug 26 22:27:17 1996
Received: by mail.jp.freebsd.org (8.7.3+2.6Wbeta5/8.7.3) id WAA15640
	Mon, 26 Aug 1996 22:27:17 +0900 (JST)
Received: by mail.jp.freebsd.org (8.7.3+2.6Wbeta5/8.7.3) with SMTP id WAA15635
	for <FreeBSD-users-jp@jp.freebsd.org>; Mon, 26 Aug 1996 22:27:15 +0900 (JST)
Received: by isis.min.ntt.jp (8.6.12/core*min.mx13) with TCP; Mon, 26 Aug 1996 22:27:14 +0900
Message-Id: <199608261327.WAA25648@isis.min.ntt.jp>
To: FreeBSD-users-jp@jp.freebsd.org
In-reply-to: Your message of "Mon, 26 Aug 1996 22:09:07 JST."
             <199608261309.WAA00329@phoebus.mri.co.jp> 
Date: Mon, 26 Aug 1996 22:27:08 +0900
From: Masachika ISHIZUKA <ishizuka@isis.min.ntt.jp>
Reply-To: FreeBSD-users-jp@jp.freebsd.org
X-Distribute: distribute [version 2.1 (Alpha) patchlevel=19]
X-Sequence: FreeBSD-users-jp 3846
Subject: [FreeBSD-users-jp 3846] Re: problem of g77 write format 
Errors-To: owner-FreeBSD-users-jp@jp.freebsd.org
Sender: owner-FreeBSD-users-jp@jp.freebsd.org

>$@$"$^$j!"$_$J$5$s$O;H$o$l$F$*$i$l$J$$$+$b$7$l$^$;$s$,!";d$O;E;vJA!"(J
>FORTRAN$@$N%W%m%0%i%`$r=q$/$3$H$,B?$$$N$G!"(JFreeBSD$@>e$G$b(Jg77$@$,40F0$9$l$P(J
>$@$$$$$J$"$H4|BT$7$F$$$k0l?M$G$9!#<B$O$3$N(Jg77(f2c$@$G$b(J)$@$J$N$G$9$,!"=q<0IU(J
>$@$-$N(JWRITE$@J8$rMQ$$$k$$$k$H$-$K;d$,0U?^$7$F$$$k$b$N$H0c$C$?=PNO7k2L$r=P(J
>$@$9$N$G!":$$C$F$$$^$9!#(J
>
>$@<!$N$h$&$J4JC1$J(JFORTRAN$@$N%W%m%0%i%`$r%3%s%Q%$%k$7$F<B9T$5$;$F$_$F$/$@(J
>$@$5$$!#(J
>
>----- below here -----
>column
>      a=1.23456
>      write(6,'(1p,3e13.5)') a,a*1.0e5,a*1.0e25
>      write(6,'(1p,3e13.5)') a,a*1.0e-5,a*1.0e-25
>      write(1) a,a*1.0e-5,a*1.0e-25
>      stop
>      end
>----- above here -----

  $@@PDM!w?yJB$G$9!#(J

  fortran 77 $@$O==?tG/;H$C$F$$$J$$$N$G$9$,!":#;n$7$K(J FreeBSD
$@I8=`E:IU$N(J f77 $@$G%3%s%Q%$%k$7$F$_$?$i(J

% ./a.out
  1.23456E+00  1.23456E+05  1.23456E+25
  1.23456E+00  1.23456E-05  1.23456E-25

$@$C$F$3$H$G!"$A$c$s$H4|BT$7$?7k2L$K$J$j$^$7$?!#(J
  FreeBSD $@$O!"(J2.2-960801-SNAP $@$G$9!#(Jg77 $@$O<B83$7$F$^$;$s!#(J
