WSPC06660

• File Number: 8283.100
• Description: Colorado River Computer Models - Colorado River Simulation System - Reclamation - CORSIM
• State: CO
• Basin: Colorado Mainstem
• Water Division: 5
• Date: 8/12/1994
• Author: Ray R Bennett
• Title: CRSM Porting
• Water Supply Pro - Doc Type: Report/Study

001143

CRSM PORTING SUMMARY

This memorandum describes the porting of the CRSM program provided by Bruce
Williams of the USBR Lower Region on December 21,1993 (stored under the file name
CRSMLR.BUR) to a Personal Computer (PC). The model was ported to a Dell
486/MXV PC using the LAHEY F77L-EM/32 FORTRAN compiler Revision C, January
1992. Because the ported model was revised to adhere to ANSI standard FORTRAN, no
problems are expected to port the model to another machine such as the Silicon Graphics
Incorporated (SGJ) currently being used by CRDSS. Preliminary tests indicate the SGJ
machine will produce similar results to the PC and USBR's Cyber.

Prior to January 24, 1993, a version of CRSM provided by Dennis O'Conner of the
USBR in Denver on December 18, 1993 (stored under file name CRSM91.BUR) was
also ported. However, revisions subsequent to January 24, 1994 have only been
performed to the model provided by the Lower Region which is reported to be the
Official Version based on conversations with Bruce Williams of the Lower Region and
Brad Vickres of the Upper Region.

To assist in this porting activity, previous efforts by the Denver Water Board (DWB) and
Colorado State University (CSU) were consulted. The DWB work by Mike Lewellen
was particularly helpful, although all porting activities described herein were made to the
USBR Official Version directly.

Following were the major changes required during the porting:

. The original Lower Region model was renamed and saved as CRSMLR.BUR.
The ported program was broken into 53 separate subroutines (Attachment 1)
using the FORTRAN utility CUTSUB.FOR. Note, functions were also broken
out as separate subroutines to assist in implementing a revision control procedure
on a work station version of CRSM.. Of the original subroutines provided one,
CREATIS.FOR is associated with the CYBER's intrinsic mass storage and was
deleted from the ported version. Two new subroutines were added;
RANF38.FOR and OPENCR.FOR. RANF38.FOR was provided by the USBR
Denver and added to replicate the CYBER's internal random number generator.
OPENCR.FOR was added to simplify the editing and renaming of input files and
their storage properties.

. Input and output file names were revised. Attachment 2 presents the data file
and naming convention adopted for the Lower Region's ported model.
Attachment 3 presents the flow of input and output files. Note the file numbering
was maintained to correspond to the BUREAU'S file numbering convention,
except file 5 was renumbered to be 55 to assist in porting to a workstation.. Also
path designations (e.g. CRSSIDAT/*.*) are used for some input files. Attachment

2