Changeset cb47b9c for enyflx.f


Ignore:
Timestamp:
11/19/09 11:29:16 (14 years ago)
Author:
baerbaer <baerbaer@…>
Branches:
master
Children:
2d5d396
Parents:
ffd2d46
Message:

Explicitly declare variables.

All variables should be declared so that we can remove the implicit statements
from the beginning of the INCL.H file.

git-svn-id: ​svn+ssh://svn.berlios.de/svnroot/repos/smmp/trunk@25 26dc1dd8-5c4e-0410-9ffe-d298b4865968

File:
1 edited

Legend:

Unmodified
Added
Removed

  • enyflx.f

    rffd2d46 rcb47b9c  
    2222
    2323      include 'INCL.H'
     24     
     25      integer nml
     26     
     27      integer ntlvr, i, i14, i1, i1s, i2, i2s, ia, ic, ijhb, ifivr,
     28     &        ims, io, iowh, it, jowh, ity, iv, ivw, j, jty
     29      double precision cqi, cth, qp, e0, evw, vr, ep, rij, py, px, pz,
     30     &                 rij2, rij6, rij12, sr, xij, xi, yij, xj, yj, yi,
     31     &                 zj, zi, zij
    2432
    2533      ntlvr=nvrml(nml)
Note: See TracChangeset for help on using the changeset viewer.