Skip to content

Commit

Permalink
Merge pull request ESCOMP#2391 from jedwards4b/clm5.1.dev142/cray17fix
Browse files Browse the repository at this point in the history
fix for cray compiler format issue
  • Loading branch information
samsrabin authored Mar 14, 2024
2 parents fb556df + 1352326 commit ebdb103
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion src/biogeochem/CropType.F90
Original file line number Diff line number Diff line change
Expand Up @@ -352,7 +352,9 @@ subroutine InitHistory(this, bounds)
ptr_patch=this%sowing_reason_perharv_patch, default='inactive')

this%harvest_reason_thisyr_patch(begp:endp,:) = spval
call hist_addfld2d (fname='HARVEST_REASON_PERHARV', units='1 = mature; 2 = max season length; 3 = incorrect Dec. 31 sowing; 4 = sowing today; 5 = sowing tomorrow; 6 = tomorrow == idop; 7 = killed by cold temperature during vernalization', type2d='mxharvests', &
call hist_addfld2d (fname='HARVEST_REASON_PERHARV', units='1 = mature; 2 = max season length; 3 = incorrect Dec. 31 '// &
'sowing; 4 = sowing today; 5 = sowing tomorrow; 6 = tomorrow == idop; 7 = killed by cold temperature during vernalization', &
type2d='mxharvests', &
avgflag='I', long_name='Reason for each crop harvest; should only be output annually', &
ptr_patch=this%harvest_reason_thisyr_patch, default='inactive')

Expand Down

0 comments on commit ebdb103

Please sign in to comment.