From c2cdf4ba201543adb7031eaf4b12fe20a56e149d Mon Sep 17 00:00:00 2001
From: Dom Heinzeller <dom.heinzeller@icloud.com>
Date: Sat, 27 Apr 2024 15:14:06 -0600
Subject: [PATCH] Set cdata%thrd_cnt in driver/fvGFS/atmosphere.F90

---
 driver/fvGFS/atmosphere.F90 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/driver/fvGFS/atmosphere.F90 b/driver/fvGFS/atmosphere.F90
index db9c42ab3..6d9a2f225 100644
--- a/driver/fvGFS/atmosphere.F90
+++ b/driver/fvGFS/atmosphere.F90
@@ -493,6 +493,7 @@ subroutine atmosphere_init (Time_init, Time, Time_step, Grid_box, area)
    ! and thread number are not used; set to safe values
    cdata%blk_no = 1
    cdata%thrd_no = 1
+   cdata%thrd_cnt = 1
 
    ! Create shared data type for fast and slow physics, one for each thread
 #ifdef OPENMP