minor fixes to A97

code/A97_ElevationExtract.R

@@ -102,7 +102,7 @@ ElevationExtract <- function(header, output, ncores){
     
     #save output
     save(output.tile, file = paste(output, "elevation_tile_", i, ".RData", sep=""))
-    print(i)
+    print(paste(i, "done")))
   }
   stopCluster(cl)
   }

code/submit-A97.sh

@@ -7,9 +7,9 @@
 #$ -j y
 
 #$ -l h_rt=00:30:00:00
-#$ -l h_vmem=1G
+#$ -l h_vmem=60G
 
-#$ -pe smp 4-32
+#$ -pe smp 24-32
 
 #$ -cwd