Added output of dilatation rate

src/define_cloud.f90

@@ -45,7 +45,7 @@ type (ziso) zi
 !(((((((((((((((( declaration of the subroutine internal variables )))))))))))))
 !------------------------------------------------------------------------------|
 double precision x,y,z,u,v,w,p,r,s,t,e2d,xlsf,xn,yn,zn,don,con,wiso,ev,epr,espr
-double precision current_time,activation_time
+double precision current_time,activation_time,dilatr
 logical inf,wlif,ip
 integer err,iproc,nproc,ierr,i,j,k,nl,nf,nn,nr,kx,ky,kz,kt,icon
 integer ioc,iface,ilsf,noctree,nnode,nface,nlsf,nleaves,ns,nt,dumpi
@@ -120,7 +120,7 @@ else
                 kz,              &
                 kt,              &
                 i=1,nnode)
-   read (19) ((icon,k=1,8),epr,espr,con,e2d,ev,ip,wlif,i=1,nleaves)
+   read (19) ((icon,k=1,8),epr,espr,con,e2d,ev,ip,dilatr,wlif,i=1,nleaves)
    read (19) (ioc,k=1,noctree)                    
    read (19) ((iface,k=1,9),i=1,nface)
    read (19) (nn,nl,nf,nr,inf,i=1,nnode)