Path: utzoo!utgpu!jarvis.csri.toronto.edu!rutgers!tut.cis.ohio-state.edu!purdue!haven!umbc3!mbph!hybl
From: hybl@mbph.UUCP (Albert Hybl  Dept of Biophysics  SM)
Newsgroups: comp.lang.fortran
Subject: Re: Character aliases are Satanic extensions
Summary: Why do I count 60,000 lines?
Keywords: Using SAP inclusions
Message-ID: <599@mbph.UUCP>
Date: 31 May 89 00:27:41 GMT
References: <598@mbph.UUCP>
Organization: University of Maryland, School of Medicine, Baltimore, MD 21201
Lines: 61


In article <592@mbph.UUCP> from hybl@mbph.UUCP (Albert Hybl) writes
]I am converting a set of programs containing a total of about
]60,000 line of "standard" fortran code written for a VAX computer.
]
While in article <11596@cgl.ucsf.EDU> from seibel@cgl.ucsf.edu,
(George Seibel) writes
>Well, Al, I gotta come clean here.   The Satanic program came out
>of our lab here at UCSF.   Quite some while ago, I suggested in a
>group meeting that we dump the Hollerith stuff.   The response was
>(a now infamous quote) "Hollerith was a great man.  He should be
>honored".   Along with some laughter.  ... 
>I fully agree with you that the DEC VMS Fortran compiler is responsible
>for some real porting headaches.
>
George, I did not say and do not think that AMBER is Satanic.  Indeed,
I think it is an important contribution applicable to the study of
molecular structure.  I am infuriated because the X3.9-1978 standard
has failed to provide us with a portable computer language and the
tools with which to filter obsolete features.  My quixotic rebuke
was intended to be directed at the suicide clauses in the X3.9-1978
standard and the unhelpful contributions from the vendors.

> ...                                       What this really meant was
>that no one felt like going through 40000 lines of code and doing it.

Hmmm, why do I count 60,000 lines?  The following table lists the
subdirectories of Amber along with the line count for the source code
files (*.ftn), the #include files (*.h) and the Makefiles.  Where
do we differ?

                 *.ftn    *.h  Makefile
          anal    8072     24     91
          dmin    5130     23     86
          dyn     6182     38     89
          edit    4825     67     85
          etc     1592      7     77
          link    2748     94     77
          mdanal  8923    131     85
          min     5503     32     93
          nmode   4489     17     60
          parm    2685    119     68
          pol     4910     37     75
          prep    2986     41     66
          ==========================
                 58045    630    952
          Total  59627 ~ 60,000

>BTW, if you're willing to wait a couple of months, I'll be releasing
>a new revision of Amber with avoidable machine dependencies removed.

Now you tell me--I've already converted most of it into a more portable
format.  

----------------------------------------------------------------------
Albert Hybl, PhD.              Office UUCP: uunet!mimsy!mbph!hybl
Department of Biophysics       Home   UUCP: uunet!mimsy!mbph!hybl!ah
University of Maryland                CoSy: ahybl
School of Medicine
Baltimore, MD  21201                 Phone: (301) 328-7940 (Office)
----------------------------------------------------------------------