Skip to content

Commit 00f1de0

Browse files
author
Courtney Peverley
committed
fix unit tests - better ddt handling and case insensitivity
1 parent c375260 commit 00f1de0

File tree

2 files changed

+5
-5
lines changed

2 files changed

+5
-5
lines changed

test/unit/python/sample_files/write_init_files/physics_inputs_ddt2.F90

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -143,7 +143,7 @@ subroutine physics_read_data(file, suite_names, timestep, read_initialized_varia
143143

144144
select case (trim(phys_var_stdnames(name_idx)))
145145
case ('potential_temperature')
146-
call read_field(file, 'potential_temperature', input_var_names(:,name_idx), 'lev', timestep, phys_state%theta)
146+
call read_field(file, 'potential_temperature', input_var_names(:,name_idx), 'lev', timestep, phys_state%thermo%theta)
147147

148148
case ('air_pressure_at_sea_level')
149149
call read_field(file, 'air_pressure_at_sea_level', input_var_names(:,name_idx), timestep, phys_state%slp)
@@ -321,8 +321,8 @@ subroutine physics_check_data(file_name, suite_names, timestep, min_difference,
321321

322322
select case (trim(phys_var_stdnames(name_idx)))
323323
case ('potential_temperature')
324-
call check_field(file, input_var_names(:,name_idx), 'lev', timestep, phys_state%theta, 'potential_temperature', min_difference, &
325-
min_relative_value, is_first, diff_found)
324+
call check_field(file, input_var_names(:,name_idx), 'lev', timestep, phys_state%thermo%theta, 'potential_temperature', &
325+
min_difference, min_relative_value, is_first, diff_found)
326326

327327
case ('air_pressure_at_sea_level')
328328
call check_field(file, input_var_names(:,name_idx), timestep, phys_state%slp, 'air_pressure_at_sea_level', min_difference, &

test/unit/python/sample_files/write_init_files/physics_inputs_ddt_array.F90

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -143,7 +143,7 @@ subroutine physics_read_data(file, suite_names, timestep, read_initialized_varia
143143

144144
select case (trim(phys_var_stdnames(name_idx)))
145145
case ('potential_temperature')
146-
call read_field(file, 'potential_temperature', input_var_names(:,name_idx), 'lev', timestep, phys_state%T(:, :, ix_theta))
146+
call read_field(file, 'potential_temperature', input_var_names(:,name_idx), 'lev', timestep, phys_state%t(:, :, ix_theta))
147147

148148
case ('air_pressure_at_sea_level')
149149
call read_field(file, 'air_pressure_at_sea_level', input_var_names(:,name_idx), timestep, phys_state%slp)
@@ -321,7 +321,7 @@ subroutine physics_check_data(file_name, suite_names, timestep, min_difference,
321321

322322
select case (trim(phys_var_stdnames(name_idx)))
323323
case ('potential_temperature')
324-
call check_field(file, input_var_names(:,name_idx), 'lev', timestep, phys_state%T(:, :, ix_theta), 'potential_temperature', &
324+
call check_field(file, input_var_names(:,name_idx), 'lev', timestep, phys_state%t(:, :, ix_theta), 'potential_temperature', &
325325
min_difference, min_relative_value, is_first, diff_found)
326326

327327
case ('air_pressure_at_sea_level')

0 commit comments

Comments
 (0)