Laserfiche WebLink
<br />IJ:iij46 <br />Task 1.14(b) - Consumptive Use Prototype Development <br /> <br />System Consumptive Uses and Losses Repott, it is in the public domain and the source <br />code has been obtained and reviewed. Since the USBR uses this program and the code <br />is in the public domain *i~ 1~l..Ullllll"llJ~J tl'dt this program ~selected for use with <br />CROSS. The following work has been done so far: ~ <br /> <br />1. Reformatted the XCONS2 fortran program and prepared it for integration into the <br />consumptive use model. Began formulating a list of definitions for variables used <br />in the program that will be included as comments within the program and in the <br />users' manual. Began composing comments for sections ofXCONS2 and modified <br />the organization of the program extensively to make the program modular. <br /> <br />2. All the variables for XCONS2 have been defined and a common block format has <br />been implemented. At this time the model has been modified, but the input and <br />output are still identical to the original USBR program. At incremental steps, the <br />fortran program was tested to insure the same results could be obtained as in the <br />original XCONS2 program. This modified program will replicate the original and <br />be an option for the user in the CD interface. <br /> <br />3. The model now is being modified;' Incluoing modifications to the methodology. <br />The changes are being tracked with RCS. This modified version will also be an <br />option for the user in the CD interface. <br /> <br />?O <br /> <br />~ <br />~ <br /> <br />2.5.3 Incorporate Subroutines from 5MB <br /> <br />1. Evaluated the 5MB program from Wheeler and Associates to determine what <br />routines would be required to incorporate the Penman Monteith equations into <br />CROSS. <br /> <br />2. Renegotiated the 5MB source code release agreement to not requir~tten ? <br />permission to release modified versions of the routines identified i@~ <br /> <br />3. Development has begun to include the input and output data that will be required <br />by the Penman Monteith grass and alfalfa reference crop equations. <br /> <br />2.6 CU Methods for Stock Ponds <br /> <br />2.6.1 Develop Methodology <br /> <br />Stock pond consumptive use is an estimate of water loss through evaporation from <br />stock ponds. It is estimated based mainly on free water surface (FWS) evaporation and <br />the surface area of the pond. Precipitation or salvage value will considered to obtain the <br />net water loss from the stock ponds. ? \l~ r <br /> <br />2.6.2 Develop and Implement Subroutine <br /> <br />The methodology for estimating consumptive use of stock ponds is implemented in a <br />FORTRAN subroutine. The subroutine can be called by a main program to compute for <br />the consumptive use for any number of ponds of a given area for any period of time <br />(daily, biweekly, monthly, yearly, etc.). <br /> <br />The equation that is used is: <br /> <br />cu = sa · (ff' ep - cf' rf) --- for all stock ponds <br /> <br />where cu = consumptive use (L3) <br /> <br />7/13/94 - Draft of Task Memorandum <br /> <br />10 <br /> <br />IDS Group, CSU <br />