diff --git a/.gitignore b/.gitignore index 7b1e433bd..de3cfc8f8 100644 --- a/.gitignore +++ b/.gitignore @@ -16,4 +16,3 @@ fix/sfc_climo *.swp *.o -*.nc \ No newline at end of file diff --git a/reg_tests/cpld_gridgen/RegressionTests_hera.intel.log b/reg_tests/cpld_gridgen/RegressionTests_hera.intel.log new file mode 100644 index 000000000..316fa4295 --- /dev/null +++ b/reg_tests/cpld_gridgen/RegressionTests_hera.intel.log @@ -0,0 +1,150 @@ +Mon Apr 8 19:09:11 UTC 2024 +Start Regression test + +Working dir = /scratch1/NCEPDEV/stmp4/Denise.Worthen/CPLD_GRIDGEN/rt_1965110/025 +Baseline dir = /scratch1/NCEPDEV/nems/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/025 + +Checking test 025 results .... +Comparing Bu.mx025_SCRIP.nc........OK +Comparing C384.mx025.tile1.nc........OK +Comparing C384.mx025.tile2.nc........OK +Comparing C384.mx025.tile3.nc........OK +Comparing C384.mx025.tile4.nc........OK +Comparing C384.mx025.tile5.nc........OK +Comparing C384.mx025.tile6.nc........OK +Comparing Ct.mx025_SCRIP_land.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx025.to.C384.nc........OK +Comparing Cu.mx025_SCRIP.nc........OK +Comparing Cv.mx025_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx025.nc........OK +Comparing kmtu_cice_NEMS_mx025.nc........OK +Comparing mesh.mx025.nc........OK +Comparing rect.0p25_SCRIP.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx025.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.nc........OK + + +Working dir = /scratch1/NCEPDEV/stmp4/Denise.Worthen/CPLD_GRIDGEN/rt_1965110/050 +Baseline dir = /scratch1/NCEPDEV/nems/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/050 + +Checking test 050 results .... +Comparing Bu.mx050_SCRIP.nc........OK +Comparing C192.mx050.tile1.nc........OK +Comparing C192.mx050.tile2.nc........OK +Comparing C192.mx050.tile3.nc........OK +Comparing C192.mx050.tile4.nc........OK +Comparing C192.mx050.tile5.nc........OK +Comparing C192.mx050.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx050_SCRIP_land.nc........OK +Comparing Ct.mx050_SCRIP.nc........OK +Comparing Ct.mx050.to.C192.nc........OK +Comparing Cu.mx050_SCRIP.nc........OK +Comparing Cv.mx050_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx050.nc........OK +Comparing kmtu_cice_NEMS_mx050.nc........OK +Comparing mesh.mx050.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.neareststod.nc........OK +Comparing tripole.mx050.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx050.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.nc........OK + + +Working dir = /scratch1/NCEPDEV/stmp4/Denise.Worthen/CPLD_GRIDGEN/rt_1965110/100 +Baseline dir = /scratch1/NCEPDEV/nems/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/100 + +Checking test 100 results .... +Comparing Bu.mx100_SCRIP.nc........OK +Comparing C96.mx100.tile1.nc........OK +Comparing C96.mx100.tile2.nc........OK +Comparing C96.mx100.tile3.nc........OK +Comparing C96.mx100.tile4.nc........OK +Comparing C96.mx100.tile5.nc........OK +Comparing C96.mx100.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx100_SCRIP_land.nc........OK +Comparing Ct.mx100_SCRIP.nc........OK +Comparing Ct.mx100.to.C96.nc........OK +Comparing Cu.mx100_SCRIP.nc........OK +Comparing Cv.mx100_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx100.nc........OK +Comparing kmtu_cice_NEMS_mx100.nc........OK +Comparing mesh.mx100.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.neareststod.nc........OK +Comparing tripole.mx100.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx100.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.nc........OK +Comparing ufs.topo_edits_011818.nc........OK + + +Working dir = /scratch1/NCEPDEV/stmp4/Denise.Worthen/CPLD_GRIDGEN/rt_1965110/500 +Baseline dir = /scratch1/NCEPDEV/nems/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/500 + +Checking test 500 results .... +Comparing Bu.mx500_SCRIP.nc........OK +Comparing C48.mx500.tile1.nc........OK +Comparing C48.mx500.tile2.nc........OK +Comparing C48.mx500.tile3.nc........OK +Comparing C48.mx500.tile4.nc........OK +Comparing C48.mx500.tile5.nc........OK +Comparing C48.mx500.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx500_SCRIP_land.nc........OK +Comparing Ct.mx500_SCRIP.nc........OK +Comparing Ct.mx500.to.C48.nc........OK +Comparing Cu.mx500_SCRIP.nc........OK +Comparing Cv.mx500_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx500.nc........OK +Comparing kmtu_cice_NEMS_mx500.nc........OK +Comparing mesh.mx500.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.neareststod.nc........OK +Comparing tripole.mx500.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx500.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.nc........OK + + +REGRESSION TEST WAS SUCCESSFUL +Mon Apr 8 19:31:41 UTC 2024 +Elapsed time: 00h:23m:55s. Have a nice day! diff --git a/reg_tests/cpld_gridgen/RegressionTests_hercules.intel.log b/reg_tests/cpld_gridgen/RegressionTests_hercules.intel.log new file mode 100644 index 000000000..d92854007 --- /dev/null +++ b/reg_tests/cpld_gridgen/RegressionTests_hercules.intel.log @@ -0,0 +1,150 @@ +Tue Apr 9 06:44:10 CDT 2024 +Start Regression test + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_1693683/025 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils.hercules/reg_tests/cpld_gridgen/baseline_data/025 + +Checking test 025 results .... +Comparing Bu.mx025_SCRIP.nc........OK +Comparing C384.mx025.tile1.nc........OK +Comparing C384.mx025.tile2.nc........OK +Comparing C384.mx025.tile3.nc........OK +Comparing C384.mx025.tile4.nc........OK +Comparing C384.mx025.tile5.nc........OK +Comparing C384.mx025.tile6.nc........OK +Comparing Ct.mx025.to.C384.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx025_SCRIP_land.nc........OK +Comparing Cu.mx025_SCRIP.nc........OK +Comparing Cv.mx025_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx025.nc........OK +Comparing kmtu_cice_NEMS_mx025.nc........OK +Comparing mesh.mx025.nc........OK +Comparing rect.0p25_SCRIP.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx025.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_1693683/050 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils.hercules/reg_tests/cpld_gridgen/baseline_data/050 + +Checking test 050 results .... +Comparing Bu.mx050_SCRIP.nc........OK +Comparing C192.mx050.tile1.nc........OK +Comparing C192.mx050.tile2.nc........OK +Comparing C192.mx050.tile3.nc........OK +Comparing C192.mx050.tile4.nc........OK +Comparing C192.mx050.tile5.nc........OK +Comparing C192.mx050.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx050.to.C192.nc........OK +Comparing Ct.mx050_SCRIP.nc........OK +Comparing Ct.mx050_SCRIP_land.nc........OK +Comparing Cu.mx050_SCRIP.nc........OK +Comparing Cv.mx050_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx050.nc........OK +Comparing kmtu_cice_NEMS_mx050.nc........OK +Comparing mesh.mx050.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.neareststod.nc........OK +Comparing tripole.mx050.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx050.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_1693683/100 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils.hercules/reg_tests/cpld_gridgen/baseline_data/100 + +Checking test 100 results .... +Comparing Bu.mx100_SCRIP.nc........OK +Comparing C96.mx100.tile1.nc........OK +Comparing C96.mx100.tile2.nc........OK +Comparing C96.mx100.tile3.nc........OK +Comparing C96.mx100.tile4.nc........OK +Comparing C96.mx100.tile5.nc........OK +Comparing C96.mx100.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx100.to.C96.nc........OK +Comparing Ct.mx100_SCRIP.nc........OK +Comparing Ct.mx100_SCRIP_land.nc........OK +Comparing Cu.mx100_SCRIP.nc........OK +Comparing Cv.mx100_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx100.nc........OK +Comparing kmtu_cice_NEMS_mx100.nc........OK +Comparing mesh.mx100.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.neareststod.nc........OK +Comparing tripole.mx100.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx100.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.nc........OK +Comparing ufs.topo_edits_011818.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_1693683/500 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils.hercules/reg_tests/cpld_gridgen/baseline_data/500 + +Checking test 500 results .... +Comparing Bu.mx500_SCRIP.nc........OK +Comparing C48.mx500.tile1.nc........OK +Comparing C48.mx500.tile2.nc........OK +Comparing C48.mx500.tile3.nc........OK +Comparing C48.mx500.tile4.nc........OK +Comparing C48.mx500.tile5.nc........OK +Comparing C48.mx500.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx500.to.C48.nc........OK +Comparing Ct.mx500_SCRIP.nc........OK +Comparing Ct.mx500_SCRIP_land.nc........OK +Comparing Cu.mx500_SCRIP.nc........OK +Comparing Cv.mx500_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx500.nc........OK +Comparing kmtu_cice_NEMS_mx500.nc........OK +Comparing mesh.mx500.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.neareststod.nc........OK +Comparing tripole.mx500.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx500.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.nc........OK + + +REGRESSION TEST WAS SUCCESSFUL +Tue Apr 9 07:04:50 CDT 2024 +Elapsed time: 00h:21m:53s. Have a nice day! diff --git a/reg_tests/cpld_gridgen/RegressionTests_jet.intel.log b/reg_tests/cpld_gridgen/RegressionTests_jet.intel.log new file mode 100644 index 000000000..350d3e3c8 --- /dev/null +++ b/reg_tests/cpld_gridgen/RegressionTests_jet.intel.log @@ -0,0 +1,150 @@ +Mon Apr 8 19:07:01 UTC 2024 +Start Regression test + +Working dir = /lfs4/HFIP/h-nems/Denise.Worthen/CPLD_GRIDGEN/rt_2966831/025 +Baseline dir = /lfs4/HFIP/hfv3gfs/emc.nemspara/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/025 + +Checking test 025 results .... +Comparing Bu.mx025_SCRIP.nc........OK +Comparing C384.mx025.tile1.nc........OK +Comparing C384.mx025.tile2.nc........OK +Comparing C384.mx025.tile3.nc........OK +Comparing C384.mx025.tile4.nc........OK +Comparing C384.mx025.tile5.nc........OK +Comparing C384.mx025.tile6.nc........OK +Comparing Ct.mx025_SCRIP_land.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx025.to.C384.nc........OK +Comparing Cu.mx025_SCRIP.nc........OK +Comparing Cv.mx025_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx025.nc........OK +Comparing kmtu_cice_NEMS_mx025.nc........OK +Comparing mesh.mx025.nc........OK +Comparing rect.0p25_SCRIP.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx025.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.nc........OK + + +Working dir = /lfs4/HFIP/h-nems/Denise.Worthen/CPLD_GRIDGEN/rt_2966831/050 +Baseline dir = /lfs4/HFIP/hfv3gfs/emc.nemspara/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/050 + +Checking test 050 results .... +Comparing Bu.mx050_SCRIP.nc........OK +Comparing C192.mx050.tile1.nc........OK +Comparing C192.mx050.tile2.nc........OK +Comparing C192.mx050.tile3.nc........OK +Comparing C192.mx050.tile4.nc........OK +Comparing C192.mx050.tile5.nc........OK +Comparing C192.mx050.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx050_SCRIP_land.nc........OK +Comparing Ct.mx050_SCRIP.nc........OK +Comparing Ct.mx050.to.C192.nc........OK +Comparing Cu.mx050_SCRIP.nc........OK +Comparing Cv.mx050_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx050.nc........OK +Comparing kmtu_cice_NEMS_mx050.nc........OK +Comparing mesh.mx050.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.neareststod.nc........OK +Comparing tripole.mx050.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx050.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.nc........OK + + +Working dir = /lfs4/HFIP/h-nems/Denise.Worthen/CPLD_GRIDGEN/rt_2966831/100 +Baseline dir = /lfs4/HFIP/hfv3gfs/emc.nemspara/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/100 + +Checking test 100 results .... +Comparing Bu.mx100_SCRIP.nc........OK +Comparing C96.mx100.tile1.nc........OK +Comparing C96.mx100.tile2.nc........OK +Comparing C96.mx100.tile3.nc........OK +Comparing C96.mx100.tile4.nc........OK +Comparing C96.mx100.tile5.nc........OK +Comparing C96.mx100.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx100_SCRIP_land.nc........OK +Comparing Ct.mx100_SCRIP.nc........OK +Comparing Ct.mx100.to.C96.nc........OK +Comparing Cu.mx100_SCRIP.nc........OK +Comparing Cv.mx100_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx100.nc........OK +Comparing kmtu_cice_NEMS_mx100.nc........OK +Comparing mesh.mx100.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.neareststod.nc........OK +Comparing tripole.mx100.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx100.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.nc........OK +Comparing ufs.topo_edits_011818.nc........OK + + +Working dir = /lfs4/HFIP/h-nems/Denise.Worthen/CPLD_GRIDGEN/rt_2966831/500 +Baseline dir = /lfs4/HFIP/hfv3gfs/emc.nemspara/role.ufsutils/ufs_utils/reg_tests/cpld_gridgen/baseline_data/500 + +Checking test 500 results .... +Comparing Bu.mx500_SCRIP.nc........OK +Comparing C48.mx500.tile1.nc........OK +Comparing C48.mx500.tile2.nc........OK +Comparing C48.mx500.tile3.nc........OK +Comparing C48.mx500.tile4.nc........OK +Comparing C48.mx500.tile5.nc........OK +Comparing C48.mx500.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx500_SCRIP_land.nc........OK +Comparing Ct.mx500_SCRIP.nc........OK +Comparing Ct.mx500.to.C48.nc........OK +Comparing Cu.mx500_SCRIP.nc........OK +Comparing Cv.mx500_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx500.nc........OK +Comparing kmtu_cice_NEMS_mx500.nc........OK +Comparing mesh.mx500.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.neareststod.nc........OK +Comparing tripole.mx500.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx500.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.nc........OK + + +REGRESSION TEST WAS SUCCESSFUL +Mon Apr 8 19:38:29 UTC 2024 +Elapsed time: 00h:33m:11s. Have a nice day! diff --git a/reg_tests/cpld_gridgen/RegressionTests_orion.intel.log b/reg_tests/cpld_gridgen/RegressionTests_orion.intel.log new file mode 100644 index 000000000..4dde38fb8 --- /dev/null +++ b/reg_tests/cpld_gridgen/RegressionTests_orion.intel.log @@ -0,0 +1,150 @@ +Mon Apr 8 18:04:38 CDT 2024 +Start Regression test + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_325586/025 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils/reg_tests/cpld_gridgen/baseline_data/025 + +Checking test 025 results .... +Comparing Bu.mx025_SCRIP.nc........OK +Comparing C384.mx025.tile1.nc........OK +Comparing C384.mx025.tile2.nc........OK +Comparing C384.mx025.tile3.nc........OK +Comparing C384.mx025.tile4.nc........OK +Comparing C384.mx025.tile5.nc........OK +Comparing C384.mx025.tile6.nc........OK +Comparing Ct.mx025_SCRIP_land.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx025.to.C384.nc........OK +Comparing Cu.mx025_SCRIP.nc........OK +Comparing Cv.mx025_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx025.nc........OK +Comparing kmtu_cice_NEMS_mx025.nc........OK +Comparing mesh.mx025.nc........OK +Comparing rect.0p25_SCRIP.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx025.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_325586/050 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils/reg_tests/cpld_gridgen/baseline_data/050 + +Checking test 050 results .... +Comparing Bu.mx050_SCRIP.nc........OK +Comparing C192.mx050.tile1.nc........OK +Comparing C192.mx050.tile2.nc........OK +Comparing C192.mx050.tile3.nc........OK +Comparing C192.mx050.tile4.nc........OK +Comparing C192.mx050.tile5.nc........OK +Comparing C192.mx050.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx050_SCRIP_land.nc........OK +Comparing Ct.mx050_SCRIP.nc........OK +Comparing Ct.mx050.to.C192.nc........OK +Comparing Cu.mx050_SCRIP.nc........OK +Comparing Cv.mx050_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx050.nc........OK +Comparing kmtu_cice_NEMS_mx050.nc........OK +Comparing mesh.mx050.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.neareststod.nc........OK +Comparing tripole.mx050.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx050.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_325586/100 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils/reg_tests/cpld_gridgen/baseline_data/100 + +Checking test 100 results .... +Comparing Bu.mx100_SCRIP.nc........OK +Comparing C96.mx100.tile1.nc........OK +Comparing C96.mx100.tile2.nc........OK +Comparing C96.mx100.tile3.nc........OK +Comparing C96.mx100.tile4.nc........OK +Comparing C96.mx100.tile5.nc........OK +Comparing C96.mx100.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx100_SCRIP_land.nc........OK +Comparing Ct.mx100_SCRIP.nc........OK +Comparing Ct.mx100.to.C96.nc........OK +Comparing Cu.mx100_SCRIP.nc........OK +Comparing Cv.mx100_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx100.nc........OK +Comparing kmtu_cice_NEMS_mx100.nc........OK +Comparing mesh.mx100.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.neareststod.nc........OK +Comparing tripole.mx100.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx100.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.nc........OK +Comparing ufs.topo_edits_011818.nc........OK + + +Working dir = /work/noaa/stmp/dworthen/CPLD_GRIDGEN/rt_325586/500 +Baseline dir = /work/noaa/nems/role-nems/ufs_utils/reg_tests/cpld_gridgen/baseline_data/500 + +Checking test 500 results .... +Comparing Bu.mx500_SCRIP.nc........OK +Comparing C48.mx500.tile1.nc........OK +Comparing C48.mx500.tile2.nc........OK +Comparing C48.mx500.tile3.nc........OK +Comparing C48.mx500.tile4.nc........OK +Comparing C48.mx500.tile5.nc........OK +Comparing C48.mx500.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx500_SCRIP_land.nc........OK +Comparing Ct.mx500_SCRIP.nc........OK +Comparing Ct.mx500.to.C48.nc........OK +Comparing Cu.mx500_SCRIP.nc........OK +Comparing Cv.mx500_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx500.nc........OK +Comparing kmtu_cice_NEMS_mx500.nc........OK +Comparing mesh.mx500.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.neareststod.nc........OK +Comparing tripole.mx500.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx500.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.nc........OK + + +REGRESSION TEST WAS SUCCESSFUL +Mon Apr 8 18:29:13 CDT 2024 +Elapsed time: 00h:26m:29s. Have a nice day! diff --git a/reg_tests/cpld_gridgen/RegressionTests_wcoss2.intel.log b/reg_tests/cpld_gridgen/RegressionTests_wcoss2.intel.log new file mode 100644 index 000000000..6d17bf427 --- /dev/null +++ b/reg_tests/cpld_gridgen/RegressionTests_wcoss2.intel.log @@ -0,0 +1,150 @@ +Mon Apr 8 20:57:57 UTC 2024 +Start Regression test + +Working dir = /lfs/h2/emc/stmp/denise.worthen/CPLD_GRIDGEN/rt_15449/025 +Baseline dir = /lfs/h2/emc/nems/noscrub/emc.nems/UFS_UTILS/reg_tests/cpld_gridgen/baseline_data/025 + +Checking test 025 results .... +Comparing Bu.mx025_SCRIP.nc........OK +Comparing C384.mx025.tile1.nc........OK +Comparing C384.mx025.tile2.nc........OK +Comparing C384.mx025.tile3.nc........OK +Comparing C384.mx025.tile4.nc........OK +Comparing C384.mx025.tile5.nc........OK +Comparing C384.mx025.tile6.nc........OK +Comparing Ct.mx025_SCRIP_land.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx025.to.C384.nc........OK +Comparing Cu.mx025_SCRIP.nc........OK +Comparing Cv.mx025_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx025.nc........OK +Comparing kmtu_cice_NEMS_mx025.nc........OK +Comparing mesh.mx025.nc........OK +Comparing rect.0p25_SCRIP.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p25.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx025.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx025.nc........OK + + +Working dir = /lfs/h2/emc/stmp/denise.worthen/CPLD_GRIDGEN/rt_15449/050 +Baseline dir = /lfs/h2/emc/nems/noscrub/emc.nems/UFS_UTILS/reg_tests/cpld_gridgen/baseline_data/050 + +Checking test 050 results .... +Comparing Bu.mx050_SCRIP.nc........OK +Comparing C192.mx050.tile1.nc........OK +Comparing C192.mx050.tile2.nc........OK +Comparing C192.mx050.tile3.nc........OK +Comparing C192.mx050.tile4.nc........OK +Comparing C192.mx050.tile5.nc........OK +Comparing C192.mx050.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx050_SCRIP_land.nc........OK +Comparing Ct.mx050_SCRIP.nc........OK +Comparing Ct.mx050.to.C192.nc........OK +Comparing Cu.mx050_SCRIP.nc........OK +Comparing Cv.mx050_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx050.nc........OK +Comparing kmtu_cice_NEMS_mx050.nc........OK +Comparing mesh.mx050.nc........OK +Comparing rect.0p50_SCRIP.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx050.Ct.neareststod.nc........OK +Comparing tripole.mx050.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.0p50.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx050.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx050.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx050.nc........OK + + +Working dir = /lfs/h2/emc/stmp/denise.worthen/CPLD_GRIDGEN/rt_15449/100 +Baseline dir = /lfs/h2/emc/nems/noscrub/emc.nems/UFS_UTILS/reg_tests/cpld_gridgen/baseline_data/100 + +Checking test 100 results .... +Comparing Bu.mx100_SCRIP.nc........OK +Comparing C96.mx100.tile1.nc........OK +Comparing C96.mx100.tile2.nc........OK +Comparing C96.mx100.tile3.nc........OK +Comparing C96.mx100.tile4.nc........OK +Comparing C96.mx100.tile5.nc........OK +Comparing C96.mx100.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx100_SCRIP_land.nc........OK +Comparing Ct.mx100_SCRIP.nc........OK +Comparing Ct.mx100.to.C96.nc........OK +Comparing Cu.mx100_SCRIP.nc........OK +Comparing Cv.mx100_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx100.nc........OK +Comparing kmtu_cice_NEMS_mx100.nc........OK +Comparing mesh.mx100.nc........OK +Comparing rect.1p00_SCRIP.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx100.Ct.neareststod.nc........OK +Comparing tripole.mx100.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.1p00.conserve.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx100.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx100.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx100.nc........OK +Comparing ufs.topo_edits_011818.nc........OK + + +Working dir = /lfs/h2/emc/stmp/denise.worthen/CPLD_GRIDGEN/rt_15449/500 +Baseline dir = /lfs/h2/emc/nems/noscrub/emc.nems/UFS_UTILS/reg_tests/cpld_gridgen/baseline_data/500 + +Checking test 500 results .... +Comparing Bu.mx500_SCRIP.nc........OK +Comparing C48.mx500.tile1.nc........OK +Comparing C48.mx500.tile2.nc........OK +Comparing C48.mx500.tile3.nc........OK +Comparing C48.mx500.tile4.nc........OK +Comparing C48.mx500.tile5.nc........OK +Comparing C48.mx500.tile6.nc........OK +Comparing Ct.mx025_SCRIP.nc........OK +Comparing Ct.mx500_SCRIP_land.nc........OK +Comparing Ct.mx500_SCRIP.nc........OK +Comparing Ct.mx500.to.C48.nc........OK +Comparing Cu.mx500_SCRIP.nc........OK +Comparing Cv.mx500_SCRIP.nc........OK +Comparing grid_cice_NEMS_mx500.nc........OK +Comparing kmtu_cice_NEMS_mx500.nc........OK +Comparing mesh.mx500.nc........OK +Comparing rect.5p00_SCRIP.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.bilinear.nc........OK +Comparing tripole.mx025.Ct.to.mx500.Ct.neareststod.nc........OK +Comparing tripole.mx500.Bu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.Bu.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.bilinear.nc........OK +Comparing tripole.mx500.Ct.to.rect.5p00.conserve.nc........OK +Comparing tripole.mx500.Cu.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.Cv.to.Ct.bilinear.nc........OK +Comparing tripole.mx500.nc........OK + + +REGRESSION TEST WAS SUCCESSFUL +Mon Apr 8 21:22:18 UTC 2024 +Elapsed time: 00h:25m:33s. Have a nice day! diff --git a/sorc/ocnice_prep.fd/.gitignore b/sorc/ocnice_prep.fd/.gitignore index 30b2281fe..27a1b1101 100644 --- a/sorc/ocnice_prep.fd/.gitignore +++ b/sorc/ocnice_prep.fd/.gitignore @@ -1,3 +1,3 @@ *~ *.nc -oiprep \ No newline at end of file +oiprep diff --git a/sorc/ocnice_prep.fd/ocniceprep.F90 b/sorc/ocnice_prep.fd/ocniceprep.F90 index 55bd957ce..569e530e9 100644 --- a/sorc/ocnice_prep.fd/ocniceprep.F90 +++ b/sorc/ocnice_prep.fd/ocniceprep.F90 @@ -73,7 +73,7 @@ program ocniceprep meshfsrc = trim(griddir)//fsrc(3:5)//'/'//'mesh.'//trim(fsrc)//'.nc' meshfdst = trim(griddir)//fdst(3:5)//'/'//'mesh.'//trim(fdst)//'.nc' - print '(a)',trim(meshfsrc),trim(meshfdst) + write(logunit,'(a)')'mesh src '//trim(meshfsrc),' mesh dst'//trim(meshfdst) call createRH(trim(meshfsrc),trim(meshfdst),rc=rc) if (chkerr(rc,__LINE__,u_FILE_u)) call ESMF_Finalize(endflag=ESMF_END_ABORT) @@ -106,7 +106,8 @@ program ocniceprep call nf90_err(nf90_close(ncid), 'close: '//trim(gridfile)) ! ----------------------------------------------------------------------------- - ! get the 3rd (vertical or ncat) dimension and the masking variable + ! get the 3rd (vertical or ncat) dimension and variable attributes for the + ! ocean file ! ----------------------------------------------------------------------------- call nf90_err(nf90_open(trim(input_file), nf90_nowrite, ncid), & @@ -123,12 +124,6 @@ program ocniceprep 'get dimension Id: ncat'//trim(input_file)) endif do n = 1,nvalid - if (debug) then - write(logunit,'(i4,a14,i4,a10,3(a6),a2)')n,' '//trim(outvars(n)%var_name)// & - ', ', outvars(n)%var_dimen,', '//trim(outvars(n)%var_remapmethod), & - ', '//trim(outvars(n)%var_grid), ', '//trim(outvars(n)%var_pair), & - ', '//trim(outvars(n)%var_pair_grid) - end if if (do_ocnprep) then if (trim(outvars(n)%var_name) .eq. 'eta')then outvars(n)%long_name = 'Interface height' @@ -139,14 +134,23 @@ program ocniceprep call nf90_err(nf90_get_att(ncid, varid, 'long_name', outvars(n)%long_name), & 'get variable attribute: long_name '//trim(outvars(n)%var_name)) call nf90_err(nf90_get_att(ncid, varid, 'units', outvars(n)%units), & - 'get variable attribute: units '//trim(outvars(n)%var_name) ) + 'get variable attribute: units '//trim(outvars(n)%var_name) ) end if end if end do call nf90_err(nf90_close(ncid), 'close: '//trim(input_file)) + if (debug) then + do n = 1,nvalid + write(logunit,'(i4,a14,i4,a10,3(a6),a2)')n,' '//trim(outvars(n)%var_name)// & + ', ', outvars(n)%var_dimen,', '//trim(outvars(n)%var_remapmethod), & + ', '//trim(outvars(n)%var_grid), ', '//trim(outvars(n)%var_pair), & + ', '//trim(outvars(n)%var_pair_grid) + end do + end if + ! ----------------------------------------------------------------------------- - ! get the masking variable for ocean 3-d remapping + ! get the masking variable for ocean 3-d remapping and create the mask ! ----------------------------------------------------------------------------- if (do_ocnprep) then @@ -176,7 +180,7 @@ program ocniceprep ! 2D bilin if (allocated(bilin2d)) then - call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & + call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & cos(angsrc), sin(angsrc), b2d, dims=(/nxt,nyt/), nflds=nbilin2d, fields=bilin2d) rgb2d = 0.0 call remapRH(src_field=bilin2d, dst_field=rgb2d,rc=rc) @@ -186,47 +190,47 @@ program ocniceprep write(logunit,'(a)')'remap 2D fields bilinear with RH ' write(logunit,'(a)')'packed min/max values, mapped min/max values' do n = 1,nbilin2d - write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & - trim(b2d(n)%var_name),' ',trim(b2d(n)%var_grid),' ', & - trim(b2d(n)%var_pair),' ',trim(b2d(n)%var_pair_grid), & - minval(bilin2d(n,:)), maxval(bilin2d(n,:)), & + write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & + trim(b2d(n)%var_name),' ',trim(b2d(n)%var_grid),' ', & + trim(b2d(n)%var_pair),' ',trim(b2d(n)%var_pair_grid), & + minval(bilin2d(n,:)), maxval(bilin2d(n,:)), & minval(rgb2d(n,:)), maxval(rgb2d(n,:)) end do - call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.bilin2d.nc', 'bilin2d', & + call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.bilin2d.nc', 'bilin2d', & dims=(/nxt,nyt/), nflds=nbilin2d, field=bilin2d) - call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgbilin2d.nc', 'rgbilin2d', & + call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgbilin2d.nc', 'rgbilin2d', & dims=(/nxr,nyr/), nflds=nbilin2d, field=rgb2d) end if end if ! 2D conserv if (allocated(consd2d)) then - call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & + call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & cos(angsrc), sin(angsrc), c2d, dims=(/nxt,nyt/), nflds=nconsd2d, fields=consd2d) rgc2d = 0.0 call remapRH(src_field=consd2d, dst_field=rgc2d,rc=rc) if (chkerr(rc,__LINE__,u_FILE_u)) call ESMF_Finalize(endflag=ESMF_END_ABORT) if (debug) then - write(logunit,'(a)')'remap 2D fields conserv with '//trim(wgtsfile) + write(logunit,'(a)')'remap 2D fields conserv with RH ' write(logunit,'(a)')'packed min/max values, mapped min/max values' do n = 1,nconsd2d - write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & - trim(c2d(n)%var_name),' ', trim(c2d(n)%var_grid),' ', & - trim(c2d(n)%var_pair),' ', trim(c2d(n)%var_pair_grid), & - minval(consd2d(n,:)), maxval(consd2d(n,:)), & + write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & + trim(c2d(n)%var_name),' ', trim(c2d(n)%var_grid),' ', & + trim(c2d(n)%var_pair),' ', trim(c2d(n)%var_pair_grid), & + minval(consd2d(n,:)), maxval(consd2d(n,:)), & minval(rgc2d(n,:)), maxval(rgc2d(n,:)) end do - call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.consd2d.nc', 'consd2d', dims=(/nxt,nyt/), & - nflds=nconsd2d, field=consd2d) - call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgconsd2d.nc', 'rgconsd2d', dims=(/nxr,nyr/), & - nflds=nconsd2d, field=rgc2d) + call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.consd2d.nc', 'consd2d', & + dims=(/nxt,nyt/), nflds=nconsd2d, field=consd2d) + call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgconsd2d.nc', 'rgconsd2d', & + dims=(/nxr,nyr/), nflds=nconsd2d, field=rgc2d) end if end if ! 3D bilin if (allocated(bilin3d))then - call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & + call packarrays(trim(input_file), trim(wgtsdir)//fsrc(3:5)//'/', & cos(angsrc), sin(angsrc), b3d, dims=(/nxt,nyt,nlevs/), nflds=nbilin3d, fields=bilin3d) rgb3d = 0.0 do k = 1,nlevs @@ -243,18 +247,18 @@ program ocniceprep end if if (debug) then - write(logunit,'(a)')'remap 3D fields bilinear with RH' + write(logunit,'(a)')'remap 3D fields bilinear with RH ' write(logunit,'(a)')'packed min/max values,mapped min/max values' do n = 1,nbilin3d - write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & - trim(b3d(n)%var_name),' ', trim(b3d(n)%var_grid),' ', & - trim(b3d(n)%var_pair),' ', trim(b3d(n)%var_pair_grid), & - minval(bilin3d(n,:,:)), maxval(bilin3d(n,:,:)), & + write(logunit,'(i4,a14,3(a2,a6),4g14.4)')n,' '// & + trim(b3d(n)%var_name),' ', trim(b3d(n)%var_grid),' ', & + trim(b3d(n)%var_pair),' ', trim(b3d(n)%var_pair_grid), & + minval(bilin3d(n,:,:)), maxval(bilin3d(n,:,:)), & minval(rgb3d(n,:,:)), maxval(rgb3d(n,:,:)) end do - call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.bilin3d.nc', 'bilin3d', & + call dumpnc(trim(ftype)//'.'//trim(fsrc)//'.bilin3d.nc', 'bilin3d', & dims=(/nxt,nyt,nlevs/), nk=nlevs, nflds=nbilin3d, field=bilin3d) - call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgbilin3d.nc', 'rgbilin3d', & + call dumpnc(trim(ftype)//'.'//trim(fdst)//'.rgbilin3d.nc', 'rgbilin3d', & dims=(/nxr,nyr,nlevs/), nk=nlevs, nflds=nbilin3d, field=rgb3d) end if end if @@ -298,7 +302,6 @@ program ocniceprep fout = trim(ftype)//'.'//trim(fdst)//'.nc' if (debug) write(logunit, '(a)')'output file: '//trim(fout) - gridfile = trim(griddir)//fdst(3:5)//'/'//'tripole.'//trim(fdst)//'.nc' if (do_ocnprep) then call setup_ocnrestart(trim(input_file),trim(fout),bathydst) else diff --git a/sorc/ocnice_prep.fd/restarts_mod.F90 b/sorc/ocnice_prep.fd/restarts_mod.F90 index 8430b08ad..ba56d7b07 100644 --- a/sorc/ocnice_prep.fd/restarts_mod.F90 +++ b/sorc/ocnice_prep.fd/restarts_mod.F90 @@ -82,7 +82,7 @@ subroutine setup_ocnrestart(fin, fout, bathy) character(len= 40) :: timeunit character(len= 20) :: vname, vunit character(len=120) :: vlong - real(kind=8), allocatable :: Layer(:) !< the vertical grid center + real(kind=8), allocatable :: Layer(:) real(kind=8), allocatable :: out3d(:,:,:) integer :: k,n,ncid,varid,dims3(3),dims4(4) diff --git a/sorc/ocnice_prep.fd/utils_esmf_mod.F90 b/sorc/ocnice_prep.fd/utils_esmf_mod.F90 index a497f26e4..9177348ff 100644 --- a/sorc/ocnice_prep.fd/utils_esmf_mod.F90 +++ b/sorc/ocnice_prep.fd/utils_esmf_mod.F90 @@ -20,8 +20,6 @@ module utils_esmf_mod type(ESMF_DynamicMask) :: dynamicLevMask !< an ESMF dynamicMask object type(ESMF_Mesh) :: meshsrc !< an ESMF mesh for the source grid type(ESMF_Mesh) :: meshdst !< an ESMF mesh for destination grids - type(ESMF_Field) :: fldsrc !< ESMF fields on the source grid - type(ESMF_Field) :: flddst !< ESMF fields on the destination grids integer :: srcTermProcessing = 0 !< The source term processing flag, required for Dynamic Masking @@ -58,6 +56,8 @@ subroutine createRH(srcmeshfile,dstmeshfile,rc) integer, intent(out) :: rc ! local variables + type(ESMF_Field) :: fldsrc + type(ESMF_Field) :: flddst type(ESMF_RegridMethod_Flag) :: regridmethod type(ESMF_ExtrapMethod_Flag) :: extrapmethod type(ESMF_Field) :: dststatusfield @@ -133,6 +133,9 @@ subroutine remapRH1d(kk,src_field,dst_field,rc) real(kind=8), intent(out) :: dst_field(:) integer, intent(out) :: rc + ! local variables + type(ESMF_Field) :: fldsrc + type(ESMF_Field) :: flddst real(kind=8), pointer :: srcptr(:), dstptr(:) character(len=20) :: subname = 'remapRH1d' !---------------------------------------------------------------------------- @@ -181,6 +184,9 @@ subroutine remapRH2d(src_field,dst_field,rc) real(kind=8), intent(out) :: dst_field(:,:) integer, intent(out) :: rc + ! local variables + type(ESMF_Field) :: fldsrc + type(ESMF_Field) :: flddst real(kind=8), pointer :: srcptr(:,:), dstptr(:,:) character(len=20) :: subname = 'remapRH2d' !---------------------------------------------------------------------------- @@ -224,7 +230,7 @@ end subroutine remapRH2d !! !! @param[in] kk the vertical or category index !! @param[in] src_field the field on the source grid - !! @param[in] hmask the mask field to use with dynamic masking (optional) + !! @param[in] hmask the mask field to use with dynamic masking !! @param[out] dst_field the field on the destination grid !! @param[out] rc an error return code !! @@ -238,6 +244,9 @@ subroutine remapRH1ddyn(kk,src_field,dst_field,hmask,rc) real(kind=8), intent(out) :: dst_field(:) integer, intent(out) :: rc + ! local variables + type(ESMF_Field) :: fldsrc + type(ESMF_Field) :: flddst integer :: i,n real(kind=8), pointer :: srcptr(:), dstptr(:) character(len=20) :: subname = 'remapRH1ddyn' @@ -281,7 +290,7 @@ end subroutine remapRH1ddyn !! !! @param[in] kk the vertical or category index !! @param[in] src_field the field on the source grid - !! @param[in] hmask the mask field to use with dynamic masking (optional) + !! @param[in] hmask the mask field to use with dynamic masking !! @param[out] dst_field the field on the destination grid !! @param[out] rc an error return code !! @@ -294,6 +303,9 @@ subroutine remapRH2ddyn(kk,src_field,dst_field,hmask,rc) real(kind=8), intent(out) :: dst_field(:,:) integer, intent(out) :: rc + ! local variables + type(ESMF_Field) :: fldsrc + type(ESMF_Field) :: flddst integer :: i,n real(kind=8), pointer :: srcptr(:,:), dstptr(:,:) character(len=20) :: subname = 'remapRH2ddyn' diff --git a/sorc/ocnice_prep.fd/utils_mod.F90 b/sorc/ocnice_prep.fd/utils_mod.F90 index ab49e3a09..24a0711a4 100644 --- a/sorc/ocnice_prep.fd/utils_mod.F90 +++ b/sorc/ocnice_prep.fd/utils_mod.F90 @@ -134,7 +134,7 @@ subroutine packarrays3d(filesrc, wgtsdir, cosrot, sinrot, vars, dims, nflds, fie ! local variables integer :: n, nn - real(kind=8), allocatable, dimension(:,:,:) :: vecpair + real(kind=8), allocatable :: vecpair(:,:,:) character(len=20) :: subname = 'packarrays3d' !----------------------------------------------------------------------------