Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.csd.uwm.edu!gem.mps.ohio-state.edu!tut.cis.ohio-state.edu!quanta.eng.ohio-state.edu!kcgl1.eng.ohio-state.edu!MCDOWELL
From: MCDOWELL@kcgl1.eng.ohio-state.edu (James K. McDowell)
Newsgroups: comp.lang.fortran
Subject: free form vs, fixed
Message-ID: <2995@quanta.eng.ohio-state.edu>
Date: 10 Sep 89 00:47:34 GMT
Sender: news@quanta.eng.ohio-state.edu
Organization: Ohio State University
Lines: 30


	How will 8X interpret this piece of code in both the
	fixed and freeform modes ?

		PROGRAM TEST
		I = 1
		J = 2
		IF ( I .EQ. 1 ) THEN J = 1
		WRITE(6,*) I, J
		STOP
		END

	This is a favorite of mine and I use it as an example
	for teaching my students. The program is correct under
	F77 with "WRITE(6,*) I, J" displaying a value of 1 for I
	and a value of 2 for J.

	thanx in advance.

	>>> Jim




	James K. McDowell
	Department of Chemical Engineering
	College of Engineering
	The Ohio State University

	mcdowell@kcgl1.eng.ohio-state.edu