Increasing the size of another internal array

Author: whaeck

src/viewr.f90

@@ -340,7 +340,7 @@ subroutine viewr
    real(kr)::xx,yy,zz
    character(80)::text
    integer,parameter::mmax=20000   !same in plotr and viewr
-   integer,parameter::maxaa=200000
+   integer,parameter::maxaa=500000
    real(kr),dimension(15)::z
    real(kr),dimension(maxaa)::aa
    real(kr),dimension(mmax)::x,y,b,dxm,dxp,dym,dyp