100'  NAME--N.W.INS
110'
120'  DESCRIPTION--INSTRUCTIONS FOR USE OF THE NETWORK PROGRAM.
130'
140'  SOURCE--SADEK EID AND PROF. BROWN, THAYER SCHOOL OF ENGINEERING
150'
160'  INSTRUCTIONS--CONTINUE THE LISTING OF THIS PROGRAM
170'
180'
190'  *  *  *  *  *  *  *  MAIN PROGRAM  *  *  *  *  *  *  *  *  *  *  *
200'
210  
220  
230  THIS PROGRAM SOLVES THE FLOW OF WATER THROUGH A NETWORK OF
240 PIPES BY THE "HARDY CROSS" METHOD.
250  
260    IT CAN HANDLE UP TO 25 LOOPS  EACH INCLUDES UP TO 25
270      PIPES, WITH A MAXIMUM OF 200 PIPES IN ALL THE 
280     NETWORK ...... THESE CAN BE INCREASED BY
290     INCREASING THE DIMENSIONS IN THE PROGRAM IF NECESSARY.
300 
310 GIVE NUMBERS TO YOUR LOOPS OF PIPES AND A NUMBER TO EACH PIPE.
320  
330 YOUR DATA STARTS AT LINE NUMBER 10000
340  
350 FIRST YOU FEED IN YOUR DATA FOR:
360  NUMBER OF LOOPS, TOLERANCE FOR THE CORRECTION FACTOR(DELTA).
370  
380  
390  AFTER THE NUMBER OF LOOPS AND THE CORRECTION FACTOR COME
400 YOUR DATA ABOUT THE DIFFERENT LOOPS. THE DATA FOR EACH LOOP
410 ARE GROUPED TOGETHER, I.E. THE DATA FOR ALL THE PIPES
420 IN THE FIRST LOOP ARE FED IN FIRST, THEN THE DATA FOR THE
430 SECOND LOOP , AND SO ON.
440  
450  
460 THE DATA FOR EACH LOOP ARE FED IN IN THE FOLLOWING ORDER:
470  
480 IN THE FIRST LINE OF THE LOOPS' DATA FEED THE NUMBER OF PIPES
490 IN THE LOOP.
500  
510 IN THE NEXT LINES AFTER THAT YOU FEED THE INFORMATION ABOUT
520 EACH PIPE IN THE FOLLOWING ORDER:
530  
540      PP,L,D,C,Q
550  
560   WHERE:  PP = THE PIPE NUMBER
570            L = LENGTH OF THE PIPE IN FEET.
580            D = DIAMETER OF PIPE IN INCHES.
590            C = CONSTANT FOR THE PIPE FOR THE HAZEN WILLIAMS
600                 EQUATION.
610            Q = THE PRELIMINARY ASSUMED FLOW IN THE PIPE
620                 IN MGD.
630  
640       REMEMBER TO INDICATE THE DIRECTION OF THE FLOW IN THE 
650        PIPE W.R.T. THE LOOP BY GIVING THE SIGN TO "Q",
660         E.G.  CLOCK WISE DIRECTION OF FLOW TAKES A
670           A POSITIVE SIGN AND ANTI CLOCK WISE TAKES A NEGATIVE
680           SIGN.
690  
700  
710   
720   EXAMPLE:
730   --------
740  
750  IF WE DENOTE:THE NUMBER OF LOOPS BY "M"
760              THE TOLERANCE FOR CORRECTION OF THE FLOW BY "T"
770              THE NUMBER OF PIPES IN THE LOOP BY "N"
780  
790   THE DATA WILL BE WRITTEN AS FOLLOWS:
800  
810       10000 DATA M,T
820  
830       10100 DATA N                         ...
840       10200 DATA PP,L,D,C,Q         1ST PIPE .
850       10300 DATA PP,L,D,C,Q         2ND PIPE .
860                  .                           .
870                  .                           .   DATA FOR
880                  .                           .    FIRST LOOP
890                  .                           .
900       ***** DATA PP,L,D,C,Q        NTH PIPE...
910 
920       ***** DATA N                        ....
930       ***** DATA PP,L,D,C,Q        1ST PIPE  .   DATA FOR
940       ***** DATA PP,L,D,C,Q        2ND PIPE  .   NEXT LOOP
950                  .                           .
960                  .                        ....
970 
980 
990      ETC. FOR ALL THE LOOPS.
1000 
1010      TYPE "RUN" NEXT AND THE PROBLEM WILL BE SOLVED FOR
1020       YOU IN SECONDS.....ISN'T THAT GREAT ?!
1030 
1040 
1100      END