chunk_9.json•1.5 kB
{
"id": "chunk_9",
"text": "NEXT I \nRETURN \nREM *************************************************** \n8000 REM *** Subroutine to calculate span shears and moments \nFOR I = 1 TO NumberOfSpan \nREM ***** Calculation of span shears and moments due to end moments \nRL = (ML(I) + MR(I)) / Length(I) \nFOR K = 1 TO 11: VS(I, K) = RL: NEXT K \nFOR K = 1 TO 21: MS(I, K) = -ML(I) + RL * Length(I) * (K - 1) / 20: NEXT K \nFOR J = 1 TO NumberOfLoads(I) \nIF NumberOfLoads(I) = 0 THEN 8300 \nW = WD(I, J): A = LoadStart(I, J): C = LoadCover(I, J): L = Length(I) \nS = L - A - C / 2 \nRL = W * S / L: RR = W - RL \nREM ********************* Span shears at 10th intervals \nFOR K = 1 TO 11 \nZ = (K - 1) * L / 10 \nIF Z <= A THEN VK = RL: GOTO 8180 IF Z > A + C THEN VK = -RR: GOTO 8180 \nZ1 = Z - A \nVK = RL - W * Z1 / C \n8180 VS(I, K) = VS(I, K) + VK \nNEXT K \nREM ******************** Span moments at 20th intervals \nFOR K = 1 TO 21 \nZ = (K - 1) * L / 20 \n\nIF Z <= A THEN MK = RL * Z: GOTO 8270 IF Z >= A + C THEN MK = RR * (L - Z): \nGOTO 8270 \nZ1 = Z - A: WZ = W * Z1 / C",
"metadata": {
"book_id": 34887,
"title": "BASIC-STRUCTURAL-227171226-Casio-Fx-880p-Continuous-Beam-Analysis-Qbasic-Freebasic-Structural-Analysis-Civil-Engineering",
"authors": "user",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 11261,
"chunk_index": 9,
"line_start": 223,
"line_end": 251,
"has_formulas": false,
"has_tables": false
}
}