Skip to content

Commit

Permalink
Removed redunant restart variables
Browse files Browse the repository at this point in the history
With the restructuring performed by @billsacks in PR ESCOMP#1276 the restart variables for the o3_coefficients becomes redundant
  • Loading branch information
sunnivin authored May 26, 2021
1 parent 12a7fe6 commit 9f4bd68
Showing 1 changed file with 1 addition and 16 deletions.
17 changes: 1 addition & 16 deletions src/biogeophys/OzoneMod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -326,22 +326,7 @@ subroutine Restart(this, bounds, ncid, flag)
dim1name='pft', &
long_name='ozone uptake for sunlit leaves', units='mmol m^-3', &
readvar=readvar, interpinic_flag='interp', data=this%o3uptakesun_patch)

if (this%stress_method == stress_method_falk) then
!
call restartvar(ncid=ncid, flag=flag, varname='o3coefjmaxsun', xtype=ncd_double, &
dim1name='pft', &
long_name='ozone coefficient for max. electron transport rate for sunlit leaves', units='unitless', &
readvar=readvar, interpinic_flag='interp', data=this%o3coefjmaxsun_patch)

call restartvar(ncid=ncid, flag=flag, varname='o3coefjmaxsha', xtype=ncd_double, &
dim1name='pft', &
long_name='ozone coefficient for max. electron transport rate for shaded leaves', units='unitless', &
readvar=readvar, interpinic_flag='interp', data=this%o3coefjmaxsha_patch)
!
end if



end subroutine Restart

! ========================================================================
Expand Down

0 comments on commit 9f4bd68

Please sign in to comment.