chunk_31.json•1.52 kB
{
"id": "chunk_31",
"text": "670 REM Let FU actual factor of safety for \nsliding must not exceed 1.5 as per code \nrequirement. \n \n680 FU = SFH/P2H 2.2448 \n700 IF FU<1.5 THEN 720 \n710 IF FU>=1.5 THEN 740 720 \n720 PRINT “Failure of retaining wall by sliding \nrevise either dimension of slab L1,L2,TS or \nmaterial strength specification” \n \n *** REM Have to start at this point line no \n95 \n \n95 INPUT”Nc,Nq,Ny,Ic,Iq,Dc,Dq,Dy”: \nNc,Nq,Ny,Ic,Iq,Dc,Dq,Dy \nNc = 35.5, Nq = \n23.2, Ny = 20.8, Ic \n=0.42, Iq = 0.44, \nDc = 1.19, Dq = \n1.13,Dy = 1.00, Iy \n= 0.30796 \n100 INPUT”L1,L2”:l1,L2 9.5,3 \n105 K3 = B1*3.141516/180 \n120 K3 = 0.0174533*B1 \n130 K4 = 0.0174533*B2 .5585056.0593 \n135 IF (COS(K3)^2 – COS(K4)^2<0 THEN 137 \nELSE 138 \n \n138 STOP \n230 KA = COS(K3)*(COS(K3)–K1)/(COS(K3)+K1) 0.2943727 \n\n263 \n \n240 PA = 0.5*W1*H^2*KA/1000 11.42778 \n250 PAH = PA*COS(K30 11.254169 \n260 VC = 0.0537587*FC^.5 0.09311 \n270 T1 = PAH*LF/(12*VC)+3.5 21.63 \n280 T2 = T1-H*SB 15.13 \n290 REM Compute overturning and sliding \nstability of wall \n \n300 HO = L1*TAN(K3) 1.675",
"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": 31,
"line_start": 1239,
"line_end": 1282,
"has_formulas": false,
"has_tables": false
}
}