Skip to content

Commit 671a236

Browse files
committed
Minor change in aspect ratio script
1 parent faf7060 commit 671a236

2 files changed

Lines changed: 4 additions & 3 deletions

File tree

src/Readme.beta_notes

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -9,7 +9,7 @@ This beta notes are divided into 5 part:
99

1010
Github versions:
1111

12-
- `8e0b1477`: removed/renamed vclose_surf_frac as vclose_surf_frac0. If vclose_surf_frac0<0, needs vclose.gr3 (depth in [0,1]);
12+
- `8e0b1477` (30 Sept 2025): removed/renamed vclose_surf_frac as vclose_surf_frac0. If vclose_surf_frac0<0, needs vclose.gr3 (depth in [0,1]);
1313

1414
Tag stofs3d-atl.v3.1.0 (from v5.14): Sept 17, 2025
1515
- `b3644238` (21 Aug 2025): added istemp as on/off and removed stemp_thick; restored soil_thick.gr3;
@@ -640,6 +640,7 @@ git versions:
640640
159. `1e2b181209` (21 Aug 2025): merged with shallow_T, quad_init (fixed a bug in quad_int() c/o Jose O.)
641641
160. `6c2ef8f3` (25 Aug 2025): updated WWM nc outputs to use OR(NF90_NETCDF4,NF90_CLOBBER) (as in hydro)
642642
161. `b2c4d490`: changed soil conductivity in a cell from min to mean;
643+
162. `8f61b12e` (10 Oct 2025): fixed a bug (uninit'ed var) in fix_bad_quads.f90
643644

644645
================================================================================================
645646
(D) Auto-test history:

src/Utility/Pre-Processing/eq_diameter_aspect_ratio.f90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
! Compute equivalent diameter/radius of a tri-quad grid, and dx/dz (aspect ratio; dx is eq. diameter)
22
! Input: hgrid.gr3 (projection)
3-
! Output: fort.12 (*.prop format, eq. radius) and asrat.gr3 (aspect ratio for h>5m; -9999 otherwise)
3+
! Output: fort.12 (*.prop format, eq. radius) and asrat.gr3 (aspect ratio for h>5m; 9999 otherwise. A.R.<1 indicates problem)
44
! ifx -Bstatic -O3 -o eq_diameter_aspect_ratio eq_diameter_aspect_ratio.f90
55
!
66
! Below is matlab code for plotting histogram for radii
@@ -78,7 +78,7 @@
7878
write(13,*); write(13,*)ne,np
7979
do i=1,np
8080
if(dp(i)<=5.) then
81-
ar=-9999.
81+
ar=9999.
8282
else
8383
ar=rad_node(i)*2/dp(i)
8484
endif

0 commit comments

Comments
 (0)