Custom Query (964 matches)
Results (697 - 699 of 964)
Ticket | Owner | Reporter | Resolution | Summary |
---|---|---|---|---|
#664 | Fixed | Bug in get_3dfldr.F | ||
Description |
There is a sign error in get_3dfldr.F where it checks if data that has a cycle_length needs to be read. Lines 149-154 say the following: IF (Liocycle) THEN Trec=MOD(Trec,Nrec)-1 IF (Trec.le.0) Trec=Nrec-Trec ELSE Trec=Trec-1 END IF
The issue is with
|
|||
#665 | Fixed | Improvements to fennel.h | ||
Description |
Attached is a lightly modified version of fennel.h with the following improvements, mostly minor, but a significant bug fix:
|
|||
#666 | Fixed | west sum for nesting not defined | ||
Description |
I thought we had taken care of this, but it is not corrected in the main repository. This is only for the error checking, and will not change results since this is the diagnostic quantities for debugging mass and volume conservation. But can you update this for nesting.F:
EastSum=WestSum+BRY_CONTACT(ieast,cr)%Mflux(Jbf) to EastSum=EastSum+BRY_CONTACT(ieast,cr)%Mflux(Jbf)
MFratio=REFINED(cr)%DU_avg2(1,m,tnew)/WestSum to MFratio=REFINED(cr)%DU_avg2(1,m,tnew)/EastSum
IF (EastSum.ne.0) THEN to IF (SouthSum.ne.0) THEN
m=BRY_CONTACT(isouth,cr)%C2Bindex(Ibf) ! pick last one to m=BRY_CONTACT(inorth,cr)%C2Bindex(Ibf) ! pick last one
IF (EastSum.ne.0) THEN MFratio=REFINED(cr)%DV_avg2(1,m,tnew)/SouthSum to IF (NorthSum.ne.0) THEN MFratio=REFINED(cr)%DV_avg2(1,m,tnew)/NorthSum |