[MITgcm-devel] Re: quick, dumb question

[Ed Hill]

On Fri, 2004-01-16 at 16:47, Jeff Scott wrote:
> Jean-Michel or Ed,
> 
> Do you know if there are any lines in the code which extend past the
> normal fortran boundary (thereabouts of position 70)?
> 
> The -Mextend option, which allows lines up to 132 characters, is being set
> in genmake. Can I remove this w/o problems? (I'm using pgf77)


Hi Jeff & others,

I'm responding to both Jeff and the devel list since this raises cleanup
issues.

I ran some tests (the full verification suite is in progress) using the
PGI compiler without the "-Mextend" option and, so far, it works just
fine.  Thats good news for Jeff.

The other news is that we have a few files that violate the 72-character
limit.  One can find them with a bash script such as:

  find . -name \*.F | \while read i ; do 
    echo "=== $i ==="
    cat $i | grep -h '^ ' | awk '(length($0) > 72)'
  done

or:

  find . -name \*.F | \
  (
    while read i ; do
      echo "=== $i ==="
      cat $i | grep -h '^ ' | awk '(length($0) > 73)'
    done
  ) | grep -C1 '^ '

which gives a dozen or so files including:

  pkg/sbo/sbo_rho.F
  pkg/exch2/exch2_send_rl2.F

If you recognize any files in that list and can confirm that the code is
indeed wrong (and there are errors!), then please check-in a fix.

thanks,
Ed

-- 
Edward H. Hill III, PhD
office:  MIT Dept. of EAPS;  Room 54-1424;  77 Massachusetts Ave.
            Cambridge, MA 02139-4307
email:   eh3 at mit.edu,  ed at eh3.com
URL:     http://web.mit.edu/eh3/
phone:   617-253-0098
fax:     617-253-4464