/[lmdze]/trunk/Sources/phylmd/CV30_routines/cv30_yield.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/CV30_routines/cv30_yield.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 97 by guez, Fri Apr 25 14:58:31 2014 UTC revision 105 by guez, Thu Sep 4 10:40:24 2014 UTC
# Line 52  contains Line 52  contains
52      ! local variables:      ! local variables:
53      integer i,k,il,n,j,num1      integer i,k,il,n,j,num1
54      real rat, awat, delti      real rat, awat, delti
55      real ax, bx, cx, dx, ex      real ax, bx, cx, dx
56      real cpinv, rdcp, dpinv      real cpinv, rdcp, dpinv
57      real lvcp(nloc,na), mke(nloc,na)      real lvcp(nloc,na), mke(nloc,na)
58      real am(nloc), work(nloc), ad(nloc), amp1(nloc)      real am(nloc), work(nloc), ad(nloc), amp1(nloc)

Legend:
Removed from v.97  
changed lines
  Added in v.105

  ViewVC Help
Powered by ViewVC 1.1.21