HDTenEightyP/NetNews huggingface dataset:
From: timh@teal.csn.org (Tim Haley)
Newsgroups: comp.lang.fortran
Subject: Re: f77 cross reference listings
Date: 8 Apr 92 03:54:37 GMT
Distribution: na
Organization: Colorado SuperNet, Inc.

In response to my earlier posting, silvert@biome.bio.ns.ca 
(Bill Silvert) writes:
>
>This seems to be an FAQ, so I will remind this newsgroup that you can
>ftp pub/fortran/fxref.tar.Z from biome.bio.dfo.ca.
>
>Bill
>-- 
Thanks for the information.  Fxref has put out this little fire for now.
Thanks for the quick responses of everyone who mailed me suggestions.
Back to the trenches...

Tim
timh@csn.org
From: dik@cwi.nl (Dik T. Winter)
Newsgroups: comp.lang.fortran
Subject: Re: my problem is solved
Keywords: FORTRAN77 READ WRITE FORMAT
Date: 16 Apr 92 01:05:55 GMT
Organization: CWI, Amsterdam

In article <1992Apr15.210008.14027@craycos.com> jrbd@craycos.com (James Davies) writes:
 > In article <376@sousa.ltn.dec.com> peterson@tle.enet.dec.com writes:
 > 
 > >The 
 > >Fortran-77 standard requires that Fortran processors MODIFY hollerith formats
 > >(nHxxx and 'xxx') in FORMATs when you READ using such a FORMAT.  Then if
 > >you turn around and WRITE using that same FORMAT now the hollerith will be 
 > >whatever was read for those columns.  Arcane, huh?
 > 
 > This must be a DEC extension...section 13.5.2 (page 13-5) says "An apostrophe
 > edit descriptor must not be used on input", and 13.5.2 says "An H edit 
 > descriptor must not be used on input".

Definitely not a DEC extension.  While it may be true that it is not in the
77 standard (I just do not have the 77 standard here), it was in the 66
standard.  So if 77 left it out it is not an extension but a left-over.
-- 
dik t. winter, cwi, kruislaan 413, 1098 sj  amsterdam, nederland
dik@cwi.nl
Newsgroups: comp.lang.fortran
From: sryashur@happy.colorado.edu
Subject: Inventory system?
Organization: University of Colorado, Boulder
Date: 8 Apr 92 20:06:51 MDT



		I'm looking for a fortran program that is basically
	an inventory system, which allows you to change items in the
	inventory, add new items, or delete items. Anything similar
	to this will also be much appreciated.



				Steven R. Yashur
Newsgroups: comp.lang.fortran
From: langer@aero.org (John V. Langer)
Subject: Re: f77 cross reference listings
Organization: The Aerospace Corporation, El Segundo, CA
Distribution: na
Date: Sun, 12 Apr 1992 23:59:56 GMT

>>Help!! We have a need to generate cross reference listings of variables used
>>in a given Fortran subroutine.  What would be nice is to get the sort
>>of listings that VMS compilers would give with options /list/cross_ref. 
>>(Forgive me if I have the syntax wrong, I've never used VMS).  
>
>This seems to be an FAQ, so I will remind this newsgroup that you can
>ftp pub/fortran/fxref.tar.Z from biome.bio.dfo.ca.

Just thought I'd mention "ftnchek", available from the "netlib@att.research.com"
mail server.  (Send a message like "send help" or "send index" to get started).
It gives cross listings and checks for lots of sematic errors (like passing
a real but receiving it as an integer) that compilers are not obligated to
notice.



-- 
===============================================================================
| langer@aerospace.aero.org  |  jvl@mickey.aero.org  |  langer@130.221.192.10 |
===============================================================================
From: dik@cwi.nl (Dik T. Winter)
Newsgroups: comp.lang.fortran
Subject: Re: Format of unformatted files: does a standard exist?
Date: 10 Apr 92 21:39:20 GMT
Organization: CWI, Amsterdam

In article <1992Apr10.151307.28643@e2big.mko.dec.com> lionel@quark.enet.dec.com (Steve Lionel) writes:
 > Integers are simpler, being divided into "little endian" (DEC, Intel x86)
 > and "big endian" ("Type A" above, IBM 370).  I'm not able to tell which
 > camp Cray is in, though I suspect it's big-endian.
 > 
The short answer is none of those above.  Cray memory is not byte addressable
but (64 bit) word addressable.  But a software convention makes the Cray
big-endian, but incompatible with IBM etc. of course (4 byte ints vs.
8 byte ints).
-- 
dik t. winter, cwi, kruislaan 413, 1098 sj  amsterdam, nederland
dik@cwi.nl
Newsgroups: comp.lang.fortran
From: bai@msiadmin.cit.cornell.edu (Dov Bai-MSI Visitor)
Subject: Re: Best compiler for a 386 (DOS/OS2v2)?
Organization: /usr/local/lib/news/organization
Date: Wed, 15 Apr 1992 20:27:02 GMT

In article <1992Apr15.144534.9962@ucsu.Colorado.EDU> kassarji@spot.Colorado.EDU (KASSARJIAN STEVEN J) writes:

>
>MS-Fortran is only a 16-bit compiler, thus it will not perform any better under
>OS/2 v2 than it does under v1.3.  For instance, it will have the usual limit of
>16 MB, instead of 1 GB, and will not show any speed increase because of the
>flat addressing mode and 32-bit operations.

Actually, I am not sure about the 1GB limit. There has been a discussion
a while ago in the comp.os.os2.misc group about OS/2 being able to address
more than 16M, and some people claimed that it is only on none ISA buses
(i.e. Micro-channel Architecture or EISA). I dont know if they are right.
 
>I think that the dynamic allocation feature is broke--I couldn't get it to
>work and all I got was protected-mode violations when I tried to use dynamic
>arrays.

I managed to get dynamic arrays with v5.0. If your arrays are larger
than 64k, you must declare them with the [HUGE] attribute, or compile
your program in the huge memory model. I dont know about v5.1.

>Regards
>Steve Kassarjian
>kassarji@spot.Colorado.edu

Dov Bai
From: potter@scan2.tamu.edu (Shane Potter)
Newsgroups: comp.lang.fortran
Subject: 'Q' format specification
Date: 7 Apr 92 00:15:51 GMT
Reply-To: potter@scan2.tamu.edu
Organization: Cyclotron Institute, Texas A&M University
News-Software: VAX/VMS VNEWS 1.3-4

Greetings:

	Here's a question you FORTRAN gurus ought to be able to knock out
pretty quick.  I'm using a VAX 3100 workstation with DEC Fortran (not sure
what version).  The code I'm trying to interpret uses a 'Q' format specification
on some of the read statements.  I've never heard of a Q specification and can't
find anything about it in any of my F77 reference books.  Here's the subroutine:

	SUBROUTINE I4READ(file, IX)
    1	READ (FILE, 10, ERR=100, END=200) IQ, IDUM
   10   FORMAT(Q, I10)
	IF(IQ.NE.0) IX=IDUM
     	RETURN
  100   WRITE(file, 150)
  150   FORMAT( '$error during read, try again: ')
	GOTO 1
  200   WRITE(file, 250)
  250   FORMAT( '$eof during read, try again: ')
        GOTO 1
        END

	I cannot at all understand what that stupid Q is doing there.  As near
as I can tell, the input at that point consists of only 1 float number no bigger
than 5 or 6 significant digits (at the most).  If anyone please has any clue
as to what this silly Q means, PLEASE let me know.  Thanks,
						
						Shane Potter
						potter@scan2.tamu.edu
						Texas A & M University
						Cyclotron Institute
From: liu@samui.trl.OZ.AU (Richard Liu)
Newsgroups: comp.lang.fortran
Subject: assigning to do loop control variables inside the loop
Date: 14 Apr 92 04:05:46 GMT
Organization: Telecom Research Labs, Melbourne, Australia


 I am trying to port some fortran code which has do loops that look like

 	do 10 i=start,e2,ee
        .....

	if (sometest .eq. bar) i = start2
10	continue


Our fortran compiler will not compile this as assignments to the control 
variable are not allowed. What is the eqivalent legal code.  I tried this
awful hack.

	jk = start
	go to 5
4	jk = start2
5	do 10 i=jk,e2,ee
	..... 
	if (sometest .eq. bar) go to 4
10	continue

This compiles but produces incorrect results so I am not sure if the 2
loops are sematically the same. 
Please email responses as our news feed is very flaky.




  Richard Liu                              r.liu@trl.oz.au
  Telecom Research Labs.                   Phone: +61 3 253 6336
  P.O. 249 Clayton, Vic.,Australia         Fax:   +61 3 253 6789
  X400: g=richard s=liu ou=trl o=telecom prmd=telecom006 admd=telememo c=au
Newsgroups: comp.lang.fortran
From: bai@msiadmin.cit.cornell.edu (Dov Bai-MSI Visitor)
Subject: Re: Looking for libraries for F2C for OS/2 2.0
Organization: /usr/local/lib/news/organization
Date: Wed, 8 Apr 1992 21:16:48 GMT

In article <ignacij.702751333@meishan> ignacij@meishan (Ignacy Misztal) writes:
>I would like to use F2C with the 32-bit GCC compiler under OS/2 2.0. GCC
>correctly compiles output from F2C that was run under DOS, but it cannot use 
>the DOS (or 16-bit OS/2) F2C libraries to produce an executable. Is there any
>way to generate these libraries? Will the libary for any 32-bit 386
>system (extend, UNIX) be the same?
>----------------------------------------------------------------------
>Ignacy Misztal			E-mail: ignacy@uiuc.edu
>University of Illinois		Phone: (217) 244-3164
>1207 W. Gregory Dr.
>Urbana, IL 61801
>----------------------------------------------------------------------

Grab the sources for the F2C library by FTP from
	research.att.com
login as netlib ( not anonymous! ) and compile them under the 32-bit compiler.
In fact, you may also compile the sources for F2C itself and get a 32-bit
F2C.

Ouch, when will I get MY copy  of OS2 ? -:)

Dov


	

Newsgroups: comp.lang.fortran
From: slagle@lmsc.lockheed.com (Mark Slagle)
Subject: Re: Format of unformatted files: does a standard exist?
Reply-To: slagle@lmsc.lockheed.com
In-reply-to: dik@cwi.nl's message of 10 Apr 92 21:39:20 GMT
Organization: Lockheed Missiles and Space Co., Sunnyvale, Ca.
	<1992Apr9.201412.16191@ux1.cso.uiuc.edu>
	<1992Apr10.151307.28643@e2big.mko.dec.com> <5837@charon.cwi.nl>
Date: Mon, 13 Apr 92 22:41:22 GMT

In article <5837@charon.cwi.nl> dik@cwi.nl (Dik T. Winter) writes:
   In article <1992Apr10.151307.28643@e2big.mko.dec.com> lionel@quark.enet.dec.com (Steve Lionel) writes:
    > Integers are simpler, being divided into "little endian" (DEC, Intel x86)
    > and "big endian" ("Type A" above, IBM 370).  I'm not able to tell which
    > camp Cray is in, though I suspect it's big-endian.
    > 
   The short answer is none of those above.  Cray memory is not byte addressable
   but (64 bit) word addressable.  But a software convention makes the Cray
   big-endian, but incompatible with IBM etc. of course (4 byte ints vs.
   8 byte ints).

----
Note that CRAY provides library routines that write
virtually any format you want.  You just need to
know and specify what you need.

--
----
Mark E. Slagle                                 PO Box 61059
slagle@lmsc.lockheed.com                       Sunnyvale, CA   94088
408-756-0895                                   USA
From: ignacij@meishan (Ignacy Misztal)
Newsgroups: comp.lang.fortran
Subject: Re: Looking for libraries for F2C for OS/2 2.0
Date: 13 Apr 92 16:35:40 GMT
Article-I.D.: meishan.ignacij.703182954
Organization: University of Illinois at Urbana

dappel@grafted.UUCP (Dave Appel) writes:

>ignacij@meishan (Ignacy Misztal) writes:
>> I would like to use F2C with the 32-bit GCC compiler under OS/2 2.0. GCC
>> correctly compiles output from F2C that was run under DOS, but it cannot use 
>> the DOS (or 16-bit OS/2) F2C libraries to produce an executable. Is there any
>> way to generate these libraries? Will the libary for any 32-bit 386
>> system (extend, UNIX) be the same?
>> ----------------------------------------------------------------------
>> Ignacy Misztal			E-mail: ignacy@uiuc.edu

> 
>    You could get the source codes to the F2C libraries and
>recompile them with GCC to make new OS/2 2.0 GCC libraries.
>    I ftp'd the F2C package from research.att.com  
>I think they had both source and object
>and are in directory dist/f2c.  Good luck.

>--
>Dave Appel
>The Grafted Branch BBS
>317-881-4369
>internet: dappel@grafted.UUCP
>uucp: ..!uunet!grafted.UUCP!dappel
>    -= newsfeeds available, contact robert@towers.rn.com =-

Unfortunately the netlib files are meant for unix and there have problems under
gcc under OS/2. In particular, some files are over the 8.3 standard, and ar 
does not work correctly for some reasons.

----------------------------------------------------------------------
Ignacy Misztal			E-mail: ignacy@uiuc.edu
University of Illinois		Phone: (217) 244-3164
1207 W. Gregory Dr.
Urbana, IL 61801
----------------------------------------------------------------------
Newsgroups: comp.lang.fortran
From: m803948@ee.nthu.edu.tw (Shih-Min Kao)
Subject: Are there libi77.a for djgpp/gcc under MSDOS 5.0 available
Organization: National Tsing Hua University (HsinChu)
Date: Thu, 9 Apr 1992 05:41:30 GMT

    Recently, I got F2C program from netlib@research.att.com. I failed when
I tried to make the libi77.a and libf77.a by using the djgpp/gcc. There were 
many mistakes reported while buliding the library. I don't have much to time
to read and modify the source code. So, if you have the libi77.a and libf77.a
for djgpp/gcc 386 version under MSDOS 5.0. Please send me one copy. 
Or help me to make the library. 
    
    Any help will be greatly appreciated. 


    Shih-Min Kao (National Tsing-Hua University EE department) 
    E-mail:smkao@ee.nthu.edu.tw
From: toon@moene.uucp (Toon Moene)
Newsgroups: comp.lang.fortran
Subject: Re: Silly reaction to FORTRAN to C translator queries
Date: 10 Apr 92 21:06:38 GMT

In article <1992Apr10.132855.13100@news.clarkson.edu>  
taylor@sun.soe.clarkson.edu (Ross Taylor,Peyt312,6652,2655436) writes:
> All these queries for programs to convert Fortran to C makes me wonder
> if we will have a comp.lang.fortran newsgroup in the future.  In five
> years time most of the readers of this group will have switched to
> C and that will be the end of fortran :( 
> 
> Ross Taylor
> 
> PS: I'm only joking (I think - hope).  I can't stand C but thats another
>     personal comment that should not be taken seriously.

You must be (joking, that is). I'm both a C and a FORTRAN (note the  
capitals :-) programmer ... and I know that some problems ask for C  
(notably all character munching programming like mailers, news readers,  
etc. - I actually wrote a mail program in FORTRAN once for an OS that  
doesn't have a C compiler; gentlemen, that's no laughing matter), but I  
prefer FORTRAN for all number crunching business (well, actually FORTRAN  
90 - and that's were the public domain stuff breaks down: neither f2c nor  
the upcoming GNU FORTRAN compiler supports the interesting F90 stuff, like  
array syntax and run time allocation :-(
Furthermore, translating FORTRAN to C automatically (by f2c) renders it  
almost completely unreadable - e.g. all formatted I/O is completely hidden  
in a multi-level call tree of I/O routines that bear no relation to the  
original statement.

--
Toon Moene (toon@moene.uucp)
Kantershof 269, 1104 GN  Amsterdam, The Netherlands
Tel.: + 31 20 6982029; Fax: + 31 20 6003411
No Disclaimers; a NeXT at home protects against this occupational hazard.
Newsgroups: comp.lang.fortran
From: bai@msiadmin.cit.cornell.edu (Dov Bai-MSI Visitor)
Subject: Re: Looking for libraries for F2C for OS/2 2.0
Organization: /usr/local/lib/news/organization
Date: Thu, 16 Apr 1992 13:05:15 GMT

In article <uoaBJB1w161w@grafted.UUCP> dappel@grafted.UUCP (Dave Appel) writes:
>ignacij@meishan (Ignacy Misztal) writes:
>
>> Unfortunately the netlib files are meant for unix and there have problems und
>> gcc under OS/2. In particular, some files are over the 8.3 standard, and ar 
>> does not work correctly for some reasons.

Can you try compiling on an HPFS drive ? This would cure the 8.3 problem.
Alternatively you can edit the sources and truncate the names of include
files to 8.3 names.

Dov


>> Ignacy Misztal			E-mail: ignacy@uiuc.edu
>> University of Illinois		Phone: (217) 244-3164
>> 1207 W. Gregory Dr.
>> Urbana, IL 61801
>> ----------------------------------------------------------------------
>


Newsgroups: comp.lang.fortran
From: vaxinf@V36.CHEMIE.UNI-KONSTANZ.DE ()
Subject: Re: PD Fortran Compiler
Reply-To: vaxinf@V36.CHEMIE.UNI-KONSTANZ.DE ()
Organization: UNIV. KONSTANZ, FAK. F. CHEMIE
Date: Thu, 9 Apr 1992 09:56:45 GMT


Ajay Shah, (213)749-8133, ajayshah@usc.edu writes:

> There is a project underway to write a fortran frontend to gcc.
> But generally hackers (the kind who write free programs) don't
> take too much interest in fortran.

> There is
>        (a) a great free C compiler and
>        (b) a great fortran to C translator.

I want to contradict this article:

1.) You loose to much speed due to the cross-compilation.
2.) f2c only accepts strict f77 without any extentions, so you have
    additional work, if you have code with do..enddo-constructions
    and the other things being accepted by all modern f77-compilers.

Eberhard Heuser-Hofmann vaxinf@dg2.chemie.uni-konstanz.de
Univ.Konstanz, Germany
Newsgroups: comp.lang.fortran
From: moniot@mary.fordham.edu (Robert Moniot)
Subject: Re: character missing
Organization: Fordham University
Summary: problem of reading and or writing text
News-Software: VAX/VMS VNEWS 1.41    
Keywords: FORTRAN77 READ
Date: Mon, 13 Apr 1992 00:44:00 GMT

In article <28571@slice.ooc.uva.nl>, noam@ooc.uva.nl (Noam Kloos) writes...
>Dear Programmers,
> 
>I just got into programming FORTRAN77 (MS and CDC) and I enjoy it very
>much.
[text deleted]
>       CHARACTER*80 LINE
>       ...
>  99   FORMAT(A80)
>       READ(1,99) LINE
>       WRITE(1,99) LINE
>       ...
>If the varable read in line is 'abcdefghi' it will write 'bcdefghi'.
>I tried all kind of things. On my PC and on the Cyber, but with the
>same result.

For historical reasons, Fortran reserves column 1 for carriage control
for output but not for input.  (See any text or manual for details.)
So you cannot, in general, read and print data with the same format.
The above code should be rewritten


       READ(1,98) LINE
  98   FORMAT(A80)
       WRITE(1,99) LINE
  99   FORMAT(1X,A80)



Bob Moniot
Fordham University
College at Lincoln Center
New York, NY  10023  (212) 636-6331

BitNet:   MONIOT@FORDMULC
InterNet: moniot@mary.fordham.edu
Newsgroups: comp.lang.fortran
From: dave@hoser.b11.ingr.com (Dave Anderson)
Subject: replacement for lib$movc3
Organization: Intergraph Corp.
Date: Thu, 16 Apr 1992 22:40:24 GMT

Does anyone know of a replacement function for lib$movc3
from the VAX run time library.  A Fortran version is preferable
and I will be compiling it for a UNIX system.  Any good hack will be
appreciated.

Thanks!
-dave
+-------------------------+               +---------------------------+
+                         +Brought to you +                           +
+    David Anderson       +     by,       + Tel. (205)730-5619        +
+ System Software Support + KludgeWare-   + FAX  (205)730-6011        +
+   Intergraph Corp.      +  Solutions    + dave@hoser.b11.ingr.com   +
+ Huntsville, AL 35894    +  for the      + uunet!ingr!b11!hoser!dave +
+                         + time being    +                           +
+-------------------------+               +---------------------------+
From: baker@cs.tcd.ie (Sean Baker)
Newsgroups: comp.lang.fortran
Subject: Beginners Question
Date: 7 Apr 92 16:43:48 GMT
Organization: DSG, Dept. of Comp. Sci., Trinity College, Dublin.

I am investigating using fortran on top of UNIX but I have a few
questions about fortran language bindings to the UNIX runtime
environemnet (libraries & system calls).  Can anybody point me in the
direction of some fortran code that uses the UNIX runtime environment.
I have anonymous ftp access.

Thanking you all in advance,
Sean.
From: 445mathers@gw.wmich.edu
Newsgroups: comp.lang.fortran
Subject: LINPACK on FTP?
Date: 9 Apr 92 04:51:55 EST
Organization: Western Michigan University


Is there an anonymous FTP site that has the LINPACK library of linear
algebra subroutines on it?

If so, please e-mail me a response as I am not able to check this area
often. 

Thank you!

Mark

Newsgroups: comp.lang.fortran
From: rolfe@dsuvax.dsu.edu (Tim Rolfe)
Subject: Re: Lahey fortran libraries
Keywords: Lahey Fortran
Organization: Dakota State University
Distribution: usa
Date: Wed, 8 Apr 1992 20:48:44 GMT

In <1992Apr8.155112.10244@gn.ecn.purdue.edu> stecker@gn.ecn.purdue.edu (Scott D. Stecker) writes:

>I am looking for any public domain msdos compatible Lahey Fortran libraries.
>I am really looking for a callable routine that will solve a 100*100 matrix
>of linear equations. [ . . . ]

Presumably this is not Lahey's Personal Fortran --- a square array of size
100 by 100 requires 40,000 bytes for REAL*4, 80,000 bytes for REAL*8, and
the Lahey Personal Fortran has a 64Kbyte limit for the data segment (and
separately for the code segment, and the stack segment . . .).

As to the simultaneous equations code itself, that's actually a fairly
simple numerical analysis problem --- check indices under "Gaussian
Elimination".

-- 
                                              --- Tim Rolfe
                                           rolfe@dsuvax.dsu.edu
                                            ROLFE@SDNET.BITNET
From: potter@scan2.tamu.edu (SHANE POTTER)
Newsgroups: comp.lang.fortran
Subject: Q format specification
Date: 7 Apr 92 02:58:02 GMT
Reply-To: potter@scan2.tamu.edu
Organization: Cyclotron Institute, Texas A&M University
News-Software: VAX/VMS VNEWS 1.3-4

I want to thank Walter for his prompt reply to my question, and also tell
you to check the protection on your mail file.  It would not let me send
mail to you.
While I am here, does anybody know if the Q specification is unique to VAX
fortran or is this some new standard being developed?

						Thanks, Shane
From: silvert@cs.dal.ca (Bill Silvert)
Newsgroups: comp.lang.fortran
Subject: Re: Substring assignment -F77 vs F90
Date: 14 Apr 92 18:53:49 GMT
Reply-To: silvert@biome.bio.ns.ca (Bill Silvert)
Distribution: na
Organization: Habitat Ecology Div., Bedford Inst. of Oceanography

In <1992Apr14.140138.13861@cfa.harvard.edu> mcdowell@cfa.harvard.edu (Jonathan McDowell) writes:

>I've gotten a little confused ("So what else
>is new, Jonathan?"). I have long been irritated
>by the well known behaviour of several of my favorite
>F77 compilers:

>  CHARACTER*4 A
>  A='1234'
>  A(2:)=A
>  WRITE(*,*) 'RESULT=',A
> ----
>  RESULT='1111'

>The new F90 standard explicitly ensures that
>the result will be
>  RESULT='1123' 
>as I would prefer, and the Brainerd et al book (page 176) 
>states that the above code is actually *illegal* in F77. I don't
>have a copy of the F77 standard, and neither my Sun nor my VAX language
>guides flag this as an extension, and the compiler doesn't give a
>warning message. 

It is illegal and the result is processor-dependent.  The standard
states that you cannot assign a string to itself, and the result
obviously depends on the order in which the processor copies the
different addresses.
-- 
William Silvert, Habitat Ecology Division, Bedford Inst. of Oceanography
P. O. Box 1006, Dartmouth, Nova Scotia, CANADA B2Y 4A2.  Tel. (902)426-1577
InterNet Address: silvert@biome.bio.dfo.ca
-- 
William Silvert, Habitat Ecology Division, Bedford Inst. of Oceanography
P. O. Box 1006, Dartmouth, Nova Scotia, CANADA B2Y 4A2.  Tel. (902)426-1577
InterNet Address: silvert@biome.bio.dfo.ca