chunk_44.json•1.01 kB
{
"id": "chunk_44",
"text": "2880 M = 1/6000*KA*W1*LF*Z^3 \n2885 D = Z/H*(T1-T2) + T2 \n2887 D1 = (D-3.5) \n2890 IF (D1^2-2.61*M*12/(12*FC))<0 THEN \n2895 ELSE 2905 \n \n2895 PRINT “Depth of stress rectangular block \nis imaginary not possible review given \ndata of sub routine no two” \n \n2900 STOP \n2905 A = D1- SQR(D1^2-2.61*12/(12*FC)) \n2910 AS = 12*M/(0.90*FY*(D1-A/2)) \n2920 P = AS/(12*D1) \n2930 PN = 0.2/FY \n2940 IF P>=PN THEN 2960 \n2950 IF P<PN THEN 2980 \n2960 AS1 = AS \n2970 GOTO 2990 \n2980 AS1 = 12*PN*D1 \n2990 AS1 = AS1 \n3000 RETURN \n3010 END \n \n \n \n\n275",
"metadata": {
"book_id": 34880,
"title": "BASIC-STRUCTURAL-388457483-Retaining-Wall-Design-Analytical-and-Computer-Methods-By-Ben-David-CE",
"authors": "Ben David",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 39295,
"chunk_index": 44,
"line_start": 1731,
"line_end": 1762,
"has_formulas": false,
"has_tables": false
}
}