Working files

examples/template_example/SIZE

@@ -2,22 +2,22 @@ C     Dimension file to be included
 C
 C     HCUBE array dimensions
 C
-      parameter (ldim=2)
-      parameter (lx1=8,ly1=lx1,lz1=1,lelt=300,lelv=lelt)
-      parameter (lxd=12,lyd=lxd,lzd=1)
-      parameter (lelx=20,lely=20,lelz=1)
+      parameter (ldim=3)
+      parameter (lx1=5,ly1=lx1,lz1=lx1,lelt=480,lelv=lelt)
+      parameter (lxd=8,lyd=lxd,lzd=lxd)
+      parameter (lelx=1,lely=1,lelz=1)
  
       parameter (lzl=3 + 2*(ldim-3))
  
       parameter (lx2=lx1-2)
       parameter (ly2=ly1-2)
-      parameter (lz2=lz1  )
+      parameter (lz2=lz1-2)
       parameter (lx3=lx1)
       parameter (ly3=ly1)
       parameter (lz3=lz1)
 
-      parameter (lp = 512)
-      parameter (lelg = 4100)
+      parameter (lp = 32)
+      parameter (lelg = 500)
 c
 c     parameter (lpelv=lelv,lpelt=lelt,lpert=3)  ! perturbation
 c     parameter (lpx1=lx1,lpy1=ly1,lpz1=lz1)     ! array sizes
@@ -36,8 +36,8 @@ c
       parameter (lbx2=1,lby2=1,lbz2=1)
  
 C     LX1M=LX1 when there are moving meshes; =1 otherwise
-      parameter (lx1m=1,ly1m=1,lz1m=1)
-      parameter (ldimt= 2)                       ! 2 passive scalars + T
+      parameter (lx1m=lx1,ly1m=ly1,lz1m=lz1)
+      parameter (ldimt= 4)                       ! 3 passive scalars + T
       parameter (ldimt1=ldimt+1)
       parameter (ldimt3=ldimt+3)
 c
@@ -69,8 +69,8 @@ C
 C
 C     Uzawa projection array dimensions
 C
-      parameter (mxprev = 20)
-      parameter (lgmres = 30)
+      parameter (mxprev = 40)
+      parameter (lgmres = 40)
 C
 C     Split projection array dimensions
 C
@@ -92,11 +92,11 @@ c automatically added by makenek
       parameter(lxo   = lx1) ! max output grid size (lxo>=lx1)
 
 c automatically added by makenek
-      parameter(lpart = 1  ) ! max number of particles
+      parameter(lpart = 62000) ! max number of particles
 
 c automatically added by makenek
       integer ax1,ay1,az1,ax2,ay2,az2
-      parameter (ax1=lx1,ay1=ly1,az1=lz1,ax2=lx2,ay2=ly2,az2=lz2) ! running averages
+      parameter (ax1=1,ay1=1,az1=1,ax2=1,ay2=1,az2=1) ! running averages
 
 c automatically added by makenek
       parameter (lxs=1,lys=lxs,lzs=(lxs-1)*(ldim-2)+1) !New Pressure Preconditioner