CAD in Civil Engineering - Baustatik-Info-Server

More documents

Recommendations

Info

2.8. LOOPS Page 312.8.3 Quit a Cycle or a LoopIn FORTRAN 66 everything is done using an goto statement, so in this dialect we use goto too to quita cycle or a the entire loop.Listing 2.14: Breaking a 66-Loop1 c234567................................................................2 do 100 i = 1,103 write(*,*)"Begin of a cycle!"45 c for i=3 the cycle should not be executed6 if (i.eq.3) goto 10078 c break the entire loop for all i > 59 if (i.gt.5) goto 1101011 write(*,*)"i=",i12 100 continue13 110 write(*,*)"End of the loop!"14 endWith FORTRAN 90 two very helpful statements came into picture to avoid explicit jumps using goto.• cycle cancels the current cycle and starts the next• exit cancels the entire loopListing 2.15: Breaking an explicit 90-Loop1 program loopescape2 do i = 1,103 write(*,*)"Begin of a cycle!"45 ! for i=3 the cycle should not be executed6 if (i.eq.3) cycle78 ! break the entire loop for all i > 59 if (i.gt.5) exit1011 write(*,*)"i=",i12 end do1314 write(*,*)"End of the loop!"15 end program loopescape7.8.2013
Page 32 Computer Languages for Engineering - SS 132.8.4 Implicit, General Loop without a Control Structure in 90+In Fortran 90 the do ... end do statement can be used without any control elements too, so thebreak condition of the look has to be implemented manually by the usage of an if statement (see section2.9 too). If we compare the listings 2.15 with 2.16, we see, that incrementing the loop counter has to bedone manually as well as it’s initialization. Using an implicit (general) loop we have to be careful withthe break condition, so that we avoid hanging in an endless loop.Listing 2.16: Breaking a general 90-Loop1 program GeneralLoop2 i = 03 do4 i = i+15 write(*,*)"Begin of a cycle!"67 ! for i=3 the cycle should not be executed8 if (i.eq.3) cycle910 ! break the entire loop for all i > 511 if (i.gt.5) exit1213 write(*,*)"i=",i1415 end do1617 write(*,*)"End of the loop!"18 end program GeneralLoopE. Baeck
Page 1: Computer Languages for EngineersBoo
Page 5 and 6: CONTENTSPage v4.2.2 Memory Manager
Page 7 and 8: Page 2 Computer Languages for Engin
Page 10 and 11: 1Development Tools1.1 The Developme
Page 12 and 13: 1.2. SOME HISTORY Page 71.2.2 FORTR
Page 14 and 15: 1.4. SOME FREE FORTRAN TOOLS Page 9
Page 16 and 17: 1.5. THE OPEN WATCOM DEVELOPMENT SU
Page 18 and 19: 1.7. THE G95 COMPILER Page 131.7 Th
Page 20 and 21: 1.8. THE CODE::BLOCKS IDE Page 15Fi
Page 22 and 23: 2FORTRAN BasicsThe description of F
Page 24 and 25: 2.3. CHARACTER SET Page 19Listing 2
Page 26 and 27: 2.5. DATA TYPES, VARIABLES AND CONS
Page 28 and 29: 2.5. DATA TYPES, VARIABLES AND CONS
Page 30 and 31: 2.6. OPERATORS Page 252.6.1 Unary O
Page 32 and 33: 2.7. FILE IO, SCREEN AND KEYBOARD P
Page 34 and 35: 2.8. LOOPS Page 292.7.5 Close a Fil
Page 38 and 39: 2.8. LOOPS Page 332.8.5 Factorial i
Page 40 and 41: 2.9. BRANCHING Page 35Figure 2.3: F
Page 42 and 43: 2.9. BRANCHING Page 3711 c input pa
Page 44 and 45: 2.9. BRANCHING Page 3917 p = 1.d-15
Page 46 and 47: 2.10. SUBROUTINES AND FUNCTIONS Pag
Page 48 and 49: 2.11. ARRAYS Page 432.11.2 Dynamica
Page 50 and 51: 2.11. ARRAYS Page 4575 write(*,*)
Page 52 and 53: 2.11. ARRAYS Page 47187188 ! exampl
Page 54 and 55: 2.12. GLOBAL DATA Page 492.12 Globa
Page 56 and 57: 2.12. GLOBAL DATA Page 5120 nOld =
Page 58 and 59: 3Some Examples3.1 Hello WorldOne fa
Page 60 and 61: 3.4. RELATIVE PRECISION WITH FUNCTI
Page 62 and 63: 3.5. NEWTON’S ALGORITHM TO CALCUL
Page 70 and 71: 3.6. MATRIX PRODUCT WITH 77-MAIN AN
Page 72 and 73: 3.6. MATRIX PRODUCT WITH 77-MAIN AN
Page 74 and 75: 4Linear Algebra, Vectors and Matric
Page 76 and 77: 4.1. HELPER FUNCTIONS Page 71The su
Page 78 and 79: 4.1. HELPER FUNCTIONS Page 734.1.3
Page 80 and 81: 4.1. HELPER FUNCTIONS Page 7535 if
Page 82 and 83: 4.1. HELPER FUNCTIONS Page 77Listin
Page 84 and 85: 4.1. HELPER FUNCTIONS Page 79Theref
Page 86 and 87:
4.1. HELPER FUNCTIONS Page 814.1.6
Page 88 and 89:
4.1. HELPER FUNCTIONS Page 8376 c w
Page 90 and 91:
4.1. HELPER FUNCTIONS Page 854.1.7
Page 92 and 93:
4.1. HELPER FUNCTIONS Page 87Like i
Page 94 and 95:
4.2. GAUSS-LU-ALGORITHM Page 894.2
Page 96 and 97:
4.2. GAUSS-LU-ALGORITHM Page 9147 n
Page 98 and 99:
4.2. GAUSS-LU-ALGORITHM Page 9334 c
Page 100 and 101:
4.2. GAUSS-LU-ALGORITHM Page 954.2.
Page 102 and 103:
4.2. GAUSS-LU-ALGORITHM Page 9785 e
Page 104 and 105:
4.2. GAUSS-LU-ALGORITHM Page 99List
Page 106 and 107:
4.2. GAUSS-LU-ALGORITHM Page 101Fig
Page 108 and 109:
4.2. GAUSS-LU-ALGORITHM Page 103The
Page 110 and 111:
4.2. GAUSS-LU-ALGORITHM Page 105Fig
Page 112:
Part IIC/C++107
Page 115 and 116:
Page 110 Computer Languages for Eng
Page 117 and 118:
Page 119 and 120:
Page 121 and 122:
Page 123 and 124:
Page 125 and 126:
Page 127 and 128:
Page 129 and 130:
Page 131 and 132:
Page 133 and 134:
Page 135 and 136:
Page 137 and 138:
Page 139 and 140:
Page 141 and 142:
Page 143 and 144:
Page 145 and 146:
Page 147 and 148:
Page 149 and 150:
Page 151 and 152:
Page 153 and 154:
Page 155 and 156:
Page 157 and 158:
Page 159 and 160:
Page 161 and 162:
Page 163 and 164:
Page 165 and 166:
Page 167 and 168:
Page 169 and 170:
Page 172 and 173:
Appendix AThe Console’s FriendsIf
Page 174 and 175:
A.1. DIRECTORY COMMANDS Page 169SUB
Page 176 and 177:
A.2. FILE COMMANDS Page 171A.2 File
Page 178 and 179:
Appendix BCode::Blocks’s first Pr
Page 180 and 181:
Page 175Figure B.3: Setup the Proje
Page 182 and 183:
Page 17710. Overwrite the Module So
Page 184 and 185:
Page 179Figure B.10: Select the Con
Page 186 and 187:
Appendix CSome TheoryC.1 Section Pr
Page 188 and 189:
C.1. SECTION PROPERTIES Page 183Thu
Page 190 and 191:
Bibliography[1] Photo: Lawrence Liv
Page 192 and 193:
INDEX Page 187fixed format, 18float
show all

CAD in Civil Engineering - Baustatik-Info-Server

Create successful ePaper yourself

Delete template?

Save as template?