Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!panda!talcott!harvard!cmcl2!rna!cubsvax!peters
From: peters@cubsvax.UUCP (Peter S. Shenkin)
Newsgroups: net.lang.f77
Subject: f77 bug:  comparing logicals
Message-ID: <464@cubsvax.UUCP>
Date: Fri, 25-Apr-86 15:48:50 EDT
Article-I.D.: cubsvax.464
Posted: Fri Apr 25 15:48:50 1986
Date-Received: Sun, 27-Apr-86 07:30:48 EDT
Organization: Columbia Univ. Bio. CG Fac., NY
Lines: 15

The following program, compiled with f77, prints "f" for all three
comparisons;  under VMS, using dec fortran,  the three results are
"T", "F" and "T", as one would expect.

cccccccccccccccccccccccc BEGIN HERE ccccccccccccccccccccccccccccccccccccccc
	write(6,*)'.true. .eq. .true. :', .true. .eq. .true.
	write(6,*)'.true. .eq. .false. :', .true. .eq. .false.
	write(6,*)'.false. .eq. .false. :', .false. .eq. .false.

	stop
	end
cccccccccccccccccccccccc END HERE cccccccccccccccccccccccccccccccccccccccccc

Peter S. Shenkin	 Columbia Univ. Biology Dept., NY, NY  10027
{philabs,rna}!cubsvax!peters		cubsvax!peters@columbia.ARPA