Skip to content

Commit

Permalink
Merge pull request ESMCI#400 from serbinsh/patch-1
Browse files Browse the repository at this point in the history
Some AI (area index) fields had units of "none", this changes the units to "m^2/m^2" like other AI units.
  • Loading branch information
ekluzek authored Jun 1, 2018
2 parents c5da327 + 7a4b2f6 commit 3373a9f
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions src/biogeophys/CanopyStateType.F90
Original file line number Diff line number Diff line change
Expand Up @@ -179,22 +179,22 @@ subroutine InitHistory(this, bounds)
ptr_patch=this%esai_patch)

this%tlai_patch(begp:endp) = spval
call hist_addfld1d (fname='TLAI', units='none', &
call hist_addfld1d (fname='TLAI', units='m^2/m^2', &
avgflag='A', long_name='total projected leaf area index', &
ptr_patch=this%tlai_patch)

this%tsai_patch(begp:endp) = spval
call hist_addfld1d (fname='TSAI', units='none', &
call hist_addfld1d (fname='TSAI', units='m^2/m^2', &
avgflag='A', long_name='total projected stem area index', &
ptr_patch=this%tsai_patch)

this%laisun_patch(begp:endp) = spval
call hist_addfld1d (fname='LAISUN', units='none', &
call hist_addfld1d (fname='LAISUN', units='m^2/m^2', &
avgflag='A', long_name='sunlit projected leaf area index', &
ptr_patch=this%laisun_patch, set_urb=0._r8)

this%laisha_patch(begp:endp) = spval
call hist_addfld1d (fname='LAISHA', units='none', &
call hist_addfld1d (fname='LAISHA', units='m^2/m^2', &
avgflag='A', long_name='shaded projected leaf area index', &
ptr_patch=this%laisha_patch, set_urb=0._r8)

Expand Down

0 comments on commit 3373a9f

Please sign in to comment.