Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!rex!uflorida!math.ufl.edu!math.ufl.edu!wang
From: wang@math.ufl.edu
Newsgroups: comp.lang.fortran
Subject: Re: character function subprogram
Message-ID: <1991Apr7.211058.25661@math.ufl.edu>
Date: 7 Apr 91 21:10:58 GMT
References: <1991Apr7.200854.25446@math.ufl.edu>
Sender: news@math.ufl.edu
Reply-To: wang@math.ufl.edu
Organization: Department of Mathematics, University of Florida
Lines: 15

I guess my character function subprogram is ok, but I cannot just call
it directly in the PRINT statement (under Unix, of course). For
example, it would work if my main program is writen like this:

	CHARACTER*8 cursor,string,cls*4
	cls = CHAR(27)//'[2J'
	i   = 5
	j   = 35
	string = cursor(i,j)
	PRINT *,cls,string,'I am here!'
	END

This would, in my opinion, miss the point of conveniency of function
subprogram. My question is this: Why can't we call "cursor" directly
in the PRINT statement under Sun Fortran?