Laserfiche WebLink
<br />8. USE ON VARIOUS COMPUTING SYSTEMS <br /> <br />Only one version of the program is supplied by The Hydrologic <br /> <br />Engineering Center. It is intended that the program will be usable <br /> <br />with little or no change on most medium to large computing systems. <br /> <br />a). Systems operating with a word-size equal to or smaller <br />than 32 bits for real (floating point) numbers (e.g.. <br />IBM) may encounter some difficulty due to inadequate <br />word precision. If so. it may be necessary to <br />specify certain variables DOUBLE PRECISION. The <br />required changes are included at the beginning of <br />each subprogram in the form of comment cards as <br />shown below: <br /> <br />C THE FOLLnwTNG CARD s~ouLn RE ACTIVATED FOR IBM USIRS <br />C DOUBLE PRECISION CWSFL.TFM~T~~P,wSFL,X,XC~SE,xwSEL.Y <br /> <br />The changes may be activiated by removing the C in <br />the first column of the DOUBLE PRECISION card. <br /> <br />b). Code in subprograms DONE and SUMPO uses end of file <br />checks. The form READ(IO.1000.END=2000)X,Y.Z is <br />used to allow transfer to appropriate code when the <br />end of file is encountered. Some users may require <br />alternative end of file checks to be made. An <br />alternate end of file check is included ascOllll1lln1; <br />cards as shown below: <br /> <br />C USER HHUULD ADAPT THE FULLQ~ING STATE~ENT9 UFPENoIN~uh <br />C END.Of-FILE CUNT~uL AVAILAALE ON HIS/HEW CO"puTtR SYSTtM. <br />RtAD(I7,~ql~,END=~4~S) lAUF~ <br />CREADII7,54IS) AUF~ <br />C 1~(EOF(I711 ~425,S4Z0.5q~5 <br /> <br />The alternate file check may be activiated by removing <br />the C from the first columns of the second READ state- <br />ment and from the IF statement that follows. The <br />first READ statement should then be converted to a <br />comment card by adding a C to the first column. <br /> <br />27 <br />