From a5a0ab3d73492b9c6bd4cf462e9b467f65c390df Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=E2=80=9Cgspetro-NOAA=E2=80=9D?= Date: Tue, 14 Mar 2023 13:55:49 +0000 Subject: [PATCH 1/8] generate html docs --- CMakeLists.txt | 2 +- tests/compile_upp.sh | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/CMakeLists.txt b/CMakeLists.txt index 5874d98ac..cf851666e 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -18,7 +18,7 @@ option(BUILD_WITH_WRFIO "Build NCEPpost with WRF-IO library" OFF) option(BUILD_WITH_IFI "Build NCEPpost with In-Flight Icing (IFI) library if present" OFF) option(REQUIRE_IFI "Abort if libIFI is not found ; enables BUILD_WITH_IFI=ON" OFF) option(BUILD_WITH_GTG "Build NCEPpost with NCAR/GTG" OFF) -option(ENABLE_DOCS "Enable generation of doxygen-based documentation." OFF) +option(ENABLE_DOCS "Enable generation of doxygen-based documentation." ON) if(NOT CMAKE_BUILD_TYPE MATCHES "^(Debug|Release|RelWithDebInfo|MinSizeRel)$") message(STATUS "Setting build type to 'Release' as none was specified.") diff --git a/tests/compile_upp.sh b/tests/compile_upp.sh index 9e36cd47f..2e4d3e8bb 100755 --- a/tests/compile_upp.sh +++ b/tests/compile_upp.sh @@ -98,7 +98,7 @@ rm -rf build install mkdir build && cd build cmake $cmake_opts ../.. make -j6 $verbose_opt -make install +make doc rm -rf $PATHTR/exec && mkdir $PATHTR/exec cp $PATHTR/tests/install/bin/upp.x $PATHTR/exec/. From 23b580ba618de704a3f6fe0c275778aa499005ad Mon Sep 17 00:00:00 2001 From: gspetro Date: Wed, 15 Mar 2023 20:01:17 -0400 Subject: [PATCH 2/8] fix warnings on GFSPOSTSIG.F --- sorc/ncep_post.fd/GFSPOSTSIG.F | 105 ++++++++++++++++++++++++++++++--- 1 file changed, 97 insertions(+), 8 deletions(-) diff --git a/sorc/ncep_post.fd/GFSPOSTSIG.F b/sorc/ncep_post.fd/GFSPOSTSIG.F index 5ca911777..96bd69849 100644 --- a/sorc/ncep_post.fd/GFSPOSTSIG.F +++ b/sorc/ncep_post.fd/GFSPOSTSIG.F @@ -31,8 +31,50 @@ !> 1 = specific humidity (kg/kg) !> 2 = Ozone mixing ratio (kg/kg) !> 3 = cloud condensate mixing ratio (kg/kg) -!> . -!> . +!> atomic oxyge, oxygen etc +!> +!> +!> @param[out] iret Integer return code. +!> +!> ### Program History Log +!> Date | Programmer | Comments +!> -----|------------|--------- +!> 1999-10-18 | Mark Iredell | Initial +!> 2013-04-19 | Jun Wang | Add option to get tmp and ps(in pascal) from enthalpy and ps(cb) option +!> 2013-05-06 | Shrinivas Moorthi | Initialize midea to 0 +!> 2013-05-07 | Shrinivas Moorthi | Remove mo3, mct, midea and define io3, ict etc correctly and get correct cloud condensate. +!> 2013-08-02 | Shrinivas Moorthi | Rewrote the whole routine to read the sigma file differently and to read all tracers. Added sptezj for two 2d fields +!> 2014-02-20 | Shrinivas Moorthi | Modified conversion from spectral to grid taking advantage of threding in SP library. This really speeds up the code. Also threaded loop for Temperature from Tv +!> +!> @author Mark Iredell np23 @date 1999-10-18 + +! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +!> rtsig() reads and transforms sigma file. +!> +!> @param[out] lusig integer(sigio_intkind) sigma file unit number. +!> @param[out] head type(sigio_head) sigma file header. +!> @param[out] k1 integer first model level to return. +!> @param[out] k2 integer last model level to return. +!> @param[out] kgds integer (200) GDS to which to transform. +!> @param[out] ijo integer dimension of output fields. +!> @param[out] levs integer number of total vertical levels. +!> @param[out] ntrac integer number of output tracers. +!> @param[out] jcap integer number of waves. +!> @param[out] lnt2 integer (jcap+1)*(jcap+2). +!> @param[in] me integer +!> @param[out] h real (ijo) surface orography (m). +!> @param[out] p real (ijo) surface pressure (Pa). +!> @param[out] px real (ijo) log surface pressure x-gradient (1/m). +!> @param[out] py real (ijo) log surface pressure y-gradient (1/m). +!> @param[out] t real (ijo,k1:k2) temperature (K). +!> @param[out] u real (ijo,k1:k2) x-component wind (m/s). +!> @param[out] v real (ijo,k1:k2) y-component wind (m/s). +!> @param[out] d real (ijo,k1:k2) wind divergence (1/s). +!> @param[out] trc real (ijo,k1:k2,ntrac) tracers. +!>
+!>                                   1 = specific humidity (kg/kg)
+!>                                   2 = Ozone mixing ratio (kg/kg)
+!>                                   3 = cloud condensate mixing ratio (kg/kg)
 !>                                       atomic oxyge, oxygen etc
 !>
 !>
@@ -321,6 +363,7 @@ subroutine modstuff(km,idvc,idsl,nvcoord,vcoord,ps,psx,psy,d,u,v,& !> @param[out] pi real (km+1) interface pressure (Pa). !> @param[out] pm real (km) mid-layer pressure (Pa). !> @param[out] om real (km) vertical velocity (Pa/s). +!> @param[in] me integer !> !> ### Program History Log !> Date | Programmer | Comments @@ -414,26 +457,36 @@ subroutine modstuff2(im,ix,km,idvc,idsl,nvcoord,vcoord,ps,psx,psy,d,u,v,& !> @param[in] nc integer first dimension (nc>=(jcap+1)*(jcap+2)). !> @param[in] km integer number of levels. !> @param[in] ntrac integer number of tracers. +!> @param[in] idvc integer !> @param[in] idvm integer mass variable id. +!> @param[in] idsl integer type of sigma structure (1 for phillips or 2 for mean). +!> @param[in] nvcoord integer number of vertical coordinates. +!> @param[in] vcoord real (km+1,nvcoord) vertical coordinates. +!> @param[in] cpi real ____________________. !> @param[in] idrt integer data representation type. !> @param[in] lonb integer number of longitudes. !> @param[in] latb integer number of latitudes. !> @param[in] ijl integer horizontal dimension. +!> @param[in] ijn integer ____________________. !> @param[in] j1 integer first latitude. !> @param[in] j2 integer last latitude. !> @param[in] jc integer number of cpus. +!> @param[in] chgq0 integer ____________________. !> @param[in] szs real (nc) orography. !> @param[in] sps real (nc) log surface pressure. !> @param[in] st real (nc,levs) virtual temperature. !> @param[in] sd real (nc,levs) divergence. !> @param[in] sz real (nc,levs) vorticity. !> @param[in] sq real (nc,levs*ntrac) tracers. -!> @param[out] zs real (ijl) orography. -!> @param[out] ps real (ijl) surface pressure. -!> @param[out] t real (ijl,km) temperature. -!> @param[out] u real (ijl,km) zonal wind. -!> @param[out] v real (ijl,km) meridional wind. -!> @param[out] q real (ijl,km*ntrac) tracers. +!> @param[inout] gfszs real (ijn) +!> @param[inout] gfsps real (ijn) +!> @param[inout] gfsp real (ijn, km) +!> @param[inout] gfsdp real (ijn, km) +!> @param[inout] gfst real (ijn, km) +!> @param[inout] gfsu real (ijn, km) +!> @param[inout] gfsv real (ijn, km) +!> @param[inout] gfsq real (ijn, km*ntrac) +!> @param[inout] gfsw real (ijn, km) !> !> ### Program History Log !> Date | Programmer | Comments @@ -606,6 +659,42 @@ subroutine trssc(jcap,nc,km,ntrac,idvc,idvm,idsl,nvcoord,vcoord, & return end !----------------------------------------------------------------------- +!> getomega() computes omega. +!> +!> @param[in] jcap integer spectral truncation. +!> @param[in] nc integer first dimension (nc>=(jcap+1)*(jcap+2)). +!> @param[in] km integer number of levels. +!> @param[in] idvc integer vertical coordinate id (1 for sigma and 2 for hybrid). +!> @param[in] idvm integer mass variable id. +!> @param[in] idrt integer data representation type. +!> @param[in] idsl integer type of sigma structure (1 for phillips or 2 for mean). +!> @param[in] nvcoord integer number of vertical coordinates. +!> @param[in] vcoord real (km+1,nvcoord) vertical coordinates. +!> @param[in] lonb number of longitudes. +!> @param[in] latb number of latitudes. +!> @param[in] j1 integer first latitude. +!> @param[in] j2 integer last latitude. +!> @param[in] jc integer number of cpus. +!> @param[in] ijn _____________. +!> @param[in] sd real (nc,km) _____________. +!> @param[in] sps real (nc) log surface pressure. +!> @param[in] psi real (ijn) interface surface pressure. +!> @param[in] ti real (ijn,km) interface temperature. +!> @param[in] ui real (ijn,km) interface x-component wind. +!> @param[in] vi real (ijn,km) interface y-component wind. +!> @param[out] wi real (ijn,km) _____________. +!> @param[out] pm real (ijn,km) mid-layer pressure (Pa). +!> @param[out] pd real (ijn,km) _____________. +!> +!> ### Program History Log +!> Date | Programmer | Comments +!> -----|------------|--------- +!> 1999-10-18 | Mark Iredell | Initial +!> 2013-04-19 | Jun Wang | Add option to get pi by using 8 byte real computation +!> 2013-08-13 | Shrinivas Moorthi | Modified to include im points and thread +!> +!> @author Mark Iredell np23 @date 1999-10-18 + subroutine getomega(jcap,nc,km,idvc,idvm,idrt,idsl,nvcoord,vcoord, & lonb,latb,ijn,j1,j2,jc,sd,sps,psi,ti,ui,vi,wi,pm,pd) !!!!! From 76961c058d97f78b7e6c03672d205a21243c4237 Mon Sep 17 00:00:00 2001 From: gspetro Date: Wed, 15 Mar 2023 20:18:22 -0400 Subject: [PATCH 3/8] fix formatting --- sorc/ncep_post.fd/GFSPOSTSIG.F | 39 +++++++++++++--------------------- 1 file changed, 15 insertions(+), 24 deletions(-) diff --git a/sorc/ncep_post.fd/GFSPOSTSIG.F b/sorc/ncep_post.fd/GFSPOSTSIG.F index 96bd69849..99d8a60ab 100644 --- a/sorc/ncep_post.fd/GFSPOSTSIG.F +++ b/sorc/ncep_post.fd/GFSPOSTSIG.F @@ -459,19 +459,19 @@ subroutine modstuff2(im,ix,km,idvc,idsl,nvcoord,vcoord,ps,psx,psy,d,u,v,& !> @param[in] ntrac integer number of tracers. !> @param[in] idvc integer !> @param[in] idvm integer mass variable id. -!> @param[in] idsl integer type of sigma structure (1 for phillips or 2 for mean). +!> @param[in] idsl integer !> @param[in] nvcoord integer number of vertical coordinates. !> @param[in] vcoord real (km+1,nvcoord) vertical coordinates. -!> @param[in] cpi real ____________________. +!> @param[in] cpi real !> @param[in] idrt integer data representation type. !> @param[in] lonb integer number of longitudes. !> @param[in] latb integer number of latitudes. !> @param[in] ijl integer horizontal dimension. -!> @param[in] ijn integer ____________________. +!> @param[in] ijn integer !> @param[in] j1 integer first latitude. !> @param[in] j2 integer last latitude. !> @param[in] jc integer number of cpus. -!> @param[in] chgq0 integer ____________________. +!> @param[in] chgq0 integer !> @param[in] szs real (nc) orography. !> @param[in] sps real (nc) log surface pressure. !> @param[in] st real (nc,levs) virtual temperature. @@ -664,37 +664,28 @@ subroutine trssc(jcap,nc,km,ntrac,idvc,idvm,idsl,nvcoord,vcoord, & !> @param[in] jcap integer spectral truncation. !> @param[in] nc integer first dimension (nc>=(jcap+1)*(jcap+2)). !> @param[in] km integer number of levels. -!> @param[in] idvc integer vertical coordinate id (1 for sigma and 2 for hybrid). +!> @param[in] idvc integer !> @param[in] idvm integer mass variable id. !> @param[in] idrt integer data representation type. -!> @param[in] idsl integer type of sigma structure (1 for phillips or 2 for mean). +!> @param[in] idsl integer !> @param[in] nvcoord integer number of vertical coordinates. !> @param[in] vcoord real (km+1,nvcoord) vertical coordinates. !> @param[in] lonb number of longitudes. !> @param[in] latb number of latitudes. +!> @param[in] ijn !> @param[in] j1 integer first latitude. !> @param[in] j2 integer last latitude. !> @param[in] jc integer number of cpus. -!> @param[in] ijn _____________. -!> @param[in] sd real (nc,km) _____________. +!> @param[in] sd real (nc,km) divergence. !> @param[in] sps real (nc) log surface pressure. -!> @param[in] psi real (ijn) interface surface pressure. -!> @param[in] ti real (ijn,km) interface temperature. -!> @param[in] ui real (ijn,km) interface x-component wind. -!> @param[in] vi real (ijn,km) interface y-component wind. -!> @param[out] wi real (ijn,km) _____________. -!> @param[out] pm real (ijn,km) mid-layer pressure (Pa). -!> @param[out] pd real (ijn,km) _____________. -!> -!> ### Program History Log -!> Date | Programmer | Comments -!> -----|------------|--------- -!> 1999-10-18 | Mark Iredell | Initial -!> 2013-04-19 | Jun Wang | Add option to get pi by using 8 byte real computation -!> 2013-08-13 | Shrinivas Moorthi | Modified to include im points and thread +!> @param[in] psi real (ijn) +!> @param[in] ti real (ijn,km) +!> @param[in] ui real (ijn,km) +!> @param[in] vi real (ijn,km) +!> @param[out] wi real (ijn,km) +!> @param[out] pm real (ijn,km) +!> @param[out] pd real (ijn,km) !> -!> @author Mark Iredell np23 @date 1999-10-18 - subroutine getomega(jcap,nc,km,idvc,idvm,idrt,idsl,nvcoord,vcoord, & lonb,latb,ijn,j1,j2,jc,sd,sps,psi,ti,ui,vi,wi,pm,pd) !!!!! From 0c26a60752d68d247d78b39c311326f859de4fea Mon Sep 17 00:00:00 2001 From: gspetro Date: Wed, 15 Mar 2023 20:22:32 -0400 Subject: [PATCH 4/8] add data types for 3 vars --- sorc/ncep_post.fd/GFSPOSTSIG.F | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/sorc/ncep_post.fd/GFSPOSTSIG.F b/sorc/ncep_post.fd/GFSPOSTSIG.F index 99d8a60ab..507fe02cd 100644 --- a/sorc/ncep_post.fd/GFSPOSTSIG.F +++ b/sorc/ncep_post.fd/GFSPOSTSIG.F @@ -670,9 +670,9 @@ subroutine trssc(jcap,nc,km,ntrac,idvc,idvm,idsl,nvcoord,vcoord, & !> @param[in] idsl integer !> @param[in] nvcoord integer number of vertical coordinates. !> @param[in] vcoord real (km+1,nvcoord) vertical coordinates. -!> @param[in] lonb number of longitudes. -!> @param[in] latb number of latitudes. -!> @param[in] ijn +!> @param[in] lonb integer number of longitudes. +!> @param[in] latb integer number of latitudes. +!> @param[in] ijn integer !> @param[in] j1 integer first latitude. !> @param[in] j2 integer last latitude. !> @param[in] jc integer number of cpus. From f8ad9b33f5017f13c691b0d2899565aed9134b1f Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 31 Mar 2023 10:40:55 -0400 Subject: [PATCH 5/8] update ZENSUN.f --- sorc/ncep_post.fd/ZENSUN.f | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/sorc/ncep_post.fd/ZENSUN.f b/sorc/ncep_post.fd/ZENSUN.f index 4c46415b6..1d9461f20 100644 --- a/sorc/ncep_post.fd/ZENSUN.f +++ b/sorc/ncep_post.fd/ZENSUN.f @@ -45,12 +45,13 @@ !> This data is characterized by 74 points. !> !> -!> @param[in] day Julian day (positive scalar or vector), (spring equinox = 80), (summer solstice= 171), (fall equinox = 266), (winter solstice= 356). -!> @param[in] time Universal Time in hours (scalar or vector). -!> @param[in] lat Geographic latitude of point on earth's surface (degrees). -!> @param[in] lon Geographic longitude of point on earth's surface (degrees). -!> @param[out] sun_zenith - solar zenith angle. -!> @param[out] sun_azimuth - solar azimuth angle. +!> @param[in] day integer Julian day (positive scalar or vector), (spring equinox = 80), (summer solstice= 171), (fall equinox = 266), (winter solstice= 356). +!> @param[in] time real Universal Time in hours (scalar or vector). +!> @param[in] lat real Geographic latitude of point on earth's surface (degrees). +!> @param[in] lon real Geographic longitude of point on earth's surface (degrees). +!> @param[in] pi real The mathematical constant pi. +!> @param[out] sun_zenith real Solar zenith angle. +!> @param[out] sun_azimuth real Solar azimuth angle. !> !> ### Program history log: !> Date | Programmer | Comments From 4413734479d3e9759f6cd65f907d57481387a2c9 Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 31 Mar 2023 17:08:31 -0400 Subject: [PATCH 6/8] fix file warnings for OTLIFT.f, OTLFT.f, NGMFLD.f, and MSFPS.f --- sorc/ncep_post.fd/MSFPS.f | 10 ++++++++++ sorc/ncep_post.fd/NGMFLD.f | 15 ++++++++++++++- sorc/ncep_post.fd/OTLFT.f | 16 ++++++++++++++++ sorc/ncep_post.fd/OTLIFT.f | 12 ++++++++++++ 4 files changed, 52 insertions(+), 1 deletion(-) diff --git a/sorc/ncep_post.fd/MSFPS.f b/sorc/ncep_post.fd/MSFPS.f index 14aa915d4..f010d19fb 100644 --- a/sorc/ncep_post.fd/MSFPS.f +++ b/sorc/ncep_post.fd/MSFPS.f @@ -13,6 +13,16 @@ !> 2006-11-01 | Rozumalski | Swiped from WRF si package !> !> @author Rozumalski @date 2006-11-01 + +! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +!> msfps() computes the map scale factor for a polar stereographic grid at a give latitude. +!> +!> This subroutine computes the map scale factor for a polar stereographic grid at a give latitude. +!> +!> @param[in] LAT Latitude at which map factor is valid. +!> @param[in] TRUELAT1 TRUELAT 1. +!> @param[out] MSF Map scale factor. + SUBROUTINE MSFPS(LAT,TRUELAT1,MSF) diff --git a/sorc/ncep_post.fd/NGMFLD.f b/sorc/ncep_post.fd/NGMFLD.f index 2d7052e35..171f44a3f 100644 --- a/sorc/ncep_post.fd/NGMFLD.f +++ b/sorc/ncep_post.fd/NGMFLD.f @@ -4,7 +4,7 @@ !> This routine computes a handful of NGM layer mean !> fields. This is done to provide a fully complete !> ETA NGM look-alike output file. -!> ### The sigma (layer) fields computed bu this routine are tabulated below. +!> ### The sigma (layer) fields computed by this routine are tabulated below. !> Sigma (layer) | Field(s) | !> --------------|----------| !> 0.47191 - 1.00000 | RH | @@ -43,6 +43,19 @@ !> 2021-09-30 | JESSE MENG | 2D DECOMPOSITION !> !> @author Russ Treadon W/NP2 @date 1992-12-22 + +!- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +!> ngmfld() computes layer mean NGM fields +!> +!> This routine computes a handful of NGM layer mean +!> fields. +!> +!> @param[out] RH4710 Sigma layer 0.47-1.00 mean relative humidity. +!> @param[out] RH4796 Sigma layer 0.47-0.96 mean relative humidity. +!> @param[out] RH1847 Sigma layer 0.18-0.47 mean relative humidity. +!> @param[out] RH8498 Sigma layer 0.84-0.98 mean relative humidity. +!> @param[out] QM8510 Sigma layer 0.85-1.00 mean moisture convergence. + SUBROUTINE NGMFLD(RH4710,RH4796,RH1847,RH8498,QM8510) ! diff --git a/sorc/ncep_post.fd/OTLFT.f b/sorc/ncep_post.fd/OTLFT.f index e43485aea..38c4825d0 100644 --- a/sorc/ncep_post.fd/OTLFT.f +++ b/sorc/ncep_post.fd/OTLFT.f @@ -25,6 +25,22 @@ !> 2021-09-30 | JESSE MENG | 2D DECOMPOSITION !> !> @author Russ Treadon W/NP2 @date 1993-03-10 + +! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +!> otlft() computes lifted index. +!> +!> This routine computes lifts a parcel specified by the +!> passed pressure, temperature, and specific humidity to +!> 500mb and then computes a lifted index. This lifted +!> lifted index is the difference between the lifted +!> parcel's temperature at 500mb and the ambient 500mb +!> temperature. +!> +!> @param[in] PBND Parcel pressure. +!> @param[in] TBND Parcel temperature. +!> @param[in] QBND Parcel specific humidity. +!> @param[out] SLINDX Lifted index. + SUBROUTINE OTLFT(PBND,TBND,QBND,SLINDX) ! diff --git a/sorc/ncep_post.fd/OTLIFT.f b/sorc/ncep_post.fd/OTLIFT.f index 2270113da..af90c8b61 100644 --- a/sorc/ncep_post.fd/OTLIFT.f +++ b/sorc/ncep_post.fd/OTLIFT.f @@ -23,6 +23,18 @@ !> 2021-09-30 | JESSE MENG | 2D DECOMPOSITION !> !> @author Russ Treadon W/NP2 @date 1993-03-10 + +! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +!> otlift() computes SFC to 500mb lifted index. +!> +!> This routine computes a surface to 500mb lifted index. +!> The lifted parcel is from the first atmpspheric ETA +!> layer (ie, the ETA layer closest to the model ground). +!> The lifted index is the difference between this parcel's +!> temperature at 500mb and the ambient 500mb temperature. +!> +!> @param[out] SLINDX lifted index. + SUBROUTINE OTLIFT(SLINDX) ! From ca6b4114545e196a17d529e34b3bc9e9e485f20c Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 31 Mar 2023 23:05:36 -0400 Subject: [PATCH 7/8] revert accidental changes to compile_upp.sh --- CMakeLists.txt | 2 +- tests/compile_upp.sh | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/CMakeLists.txt b/CMakeLists.txt index cf851666e..5874d98ac 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -18,7 +18,7 @@ option(BUILD_WITH_WRFIO "Build NCEPpost with WRF-IO library" OFF) option(BUILD_WITH_IFI "Build NCEPpost with In-Flight Icing (IFI) library if present" OFF) option(REQUIRE_IFI "Abort if libIFI is not found ; enables BUILD_WITH_IFI=ON" OFF) option(BUILD_WITH_GTG "Build NCEPpost with NCAR/GTG" OFF) -option(ENABLE_DOCS "Enable generation of doxygen-based documentation." ON) +option(ENABLE_DOCS "Enable generation of doxygen-based documentation." OFF) if(NOT CMAKE_BUILD_TYPE MATCHES "^(Debug|Release|RelWithDebInfo|MinSizeRel)$") message(STATUS "Setting build type to 'Release' as none was specified.") diff --git a/tests/compile_upp.sh b/tests/compile_upp.sh index 2e4d3e8bb..9e36cd47f 100755 --- a/tests/compile_upp.sh +++ b/tests/compile_upp.sh @@ -98,7 +98,7 @@ rm -rf build install mkdir build && cd build cmake $cmake_opts ../.. make -j6 $verbose_opt -make doc +make install rm -rf $PATHTR/exec && mkdir $PATHTR/exec cp $PATHTR/tests/install/bin/upp.x $PATHTR/exec/. From 084e43de8aec69f169c720c60b5a13553973e812 Mon Sep 17 00:00:00 2001 From: gspetro Date: Fri, 31 Mar 2023 23:13:12 -0400 Subject: [PATCH 8/8] edit typos --- sorc/ncep_post.fd/OTLFT.f | 8 ++++---- sorc/ncep_post.fd/OTLIFT.f | 4 ++-- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/sorc/ncep_post.fd/OTLFT.f b/sorc/ncep_post.fd/OTLFT.f index 38c4825d0..ee691f9cd 100644 --- a/sorc/ncep_post.fd/OTLFT.f +++ b/sorc/ncep_post.fd/OTLFT.f @@ -1,9 +1,9 @@ !> @file !> @brief otlft() computes lifted index. !> -!> This routine computes lifts a parcel specified by the +!> This routine lifts a parcel specified by the !> passed pressure, temperature, and specific humidity to -!> 500mb and then computes a lifted index. This lifted +!> 500mb and then computes a lifted index. This !> lifted index is the difference between the lifted !> parcel's temperature at 500mb and the ambient 500mb !> temperature. @@ -29,9 +29,9 @@ ! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - !> otlft() computes lifted index. !> -!> This routine computes lifts a parcel specified by the +!> This routine lifts a parcel specified by the !> passed pressure, temperature, and specific humidity to -!> 500mb and then computes a lifted index. This lifted +!> 500mb and then computes a lifted index. This !> lifted index is the difference between the lifted !> parcel's temperature at 500mb and the ambient 500mb !> temperature. diff --git a/sorc/ncep_post.fd/OTLIFT.f b/sorc/ncep_post.fd/OTLIFT.f index af90c8b61..7a2ae6774 100644 --- a/sorc/ncep_post.fd/OTLIFT.f +++ b/sorc/ncep_post.fd/OTLIFT.f @@ -2,7 +2,7 @@ !> @brief otlift() computes SFC to 500mb lifted index. !> !> This routine computes a surface to 500mb lifted index. -!> The lifted parcel is from the first atmpspheric ETA +!> The lifted parcel is from the first atmospheric ETA !> layer (ie, the ETA layer closest to the model ground). !> The lifted index is the difference between this parcel's !> temperature at 500mb and the ambient 500mb temperature. @@ -28,7 +28,7 @@ !> otlift() computes SFC to 500mb lifted index. !> !> This routine computes a surface to 500mb lifted index. -!> The lifted parcel is from the first atmpspheric ETA +!> The lifted parcel is from the first atmospheric ETA !> layer (ie, the ETA layer closest to the model ground). !> The lifted index is the difference between this parcel's !> temperature at 500mb and the ambient 500mb temperature.