diff --git a/post/g5fcst_stats.pl b/post/g5fcst_stats.pl index e764b14..2b4c40d 100755 --- a/post/g5fcst_stats.pl +++ b/post/g5fcst_stats.pl @@ -754,6 +754,11 @@ sub submit_calcjob { $ntspn = 42; $qos = "#SBATCH --qos=dastest"; # wired for now since only way to use CAS $partition = "#SBATCH --partition=preops"; # wired for now since only way to use CAS + } elsif ( $npn == 128 ) { + $mynodes = "mil"; + $ntspn = 42; + $qos = "#SBATCH --qos=dastest"; # wired for now since only way to use MIL + $partition = "#SBATCH --partition=preops"; # wired for now since only way to use MIL } else { $mynodes = "hasw"; $ntspn = 24; diff --git a/post/time_ave.F b/post/time_ave.F index 2d5d00f..0b3d03f 100644 --- a/post/time_ave.F +++ b/post/time_ave.F @@ -295,6 +295,9 @@ program time_ave quadratics = quadtmp endif deallocate (quadtmp) + if (rc/=0) then ! this should not be needed but it is + tend=.true. + endif enddo nquad = m @@ -325,6 +328,9 @@ program time_ave aliases = aliastmp endif deallocate (aliastmp) + if (rc/=0) then ! this should not be needed but it is + tend=.true. + endif enddo nalias = m endif