chunk_116.json•1.51 kB
{
"id": "chunk_116",
"text": "82\n60 H2•.7.F5/E9 \n8270 \nE\n4\n<=H2 THEN F4=E9.E4:GOTO 8410 \n828\noGI- .7·F5 \n8290 \nG3• 1.13.F5 \n8300QQ•E4 \n831\n0 \nFOR 17• 1 TO 18 \n832\n0 \nG2=(Gl+G3)/2 \n8330 G6=G\n2 \n8340 \nGOSUB 8420:Q2•Q6:G6=Gl \n83\n50 GOSUB 8420:Ql=Q6:G6=G3 \n836\no \nGOSUB 8420:Q3=Q6 \n8370 IF (Q0-Ql)\"(QO-Q2)<0 THEN G3•G2 ELSE Gl=G2 \n8380 \nIF ABS(G3-Gl)<PRA TifEN 8400 \n8390 \nNEXT 17 \n8400 F4=(G1 +G3)/2\"SGN(E9) \n8410RETURN \n8420 REM Detormee Acier Q6 pour une Contrainte G6 \n8430 IF BP< 1 mEN 8460 \n8440 Ul=GAMP.G6/ FPEG-.9 \n8450 \nIF Ul<O THEN Q6=G6/E10:GOTO 8490 \n8460 Q6=G6/E10+ 100.(U1)115 \n8470 GOTO 8490 \n8480 \nQ6=G6/E9+.823.(G6/F5-.7)115 \n8490 RETURN \n8500 REM------------------\n8510 REM caracteristiques Mecaniques Brutes \n8520 IF PHIP•O TifEN 8570 \n8530 U 1• PI.PHIP112j 4: U4• PI.PHIPII4j 64 \n8540 Vl-PHIP/2:V2•Vl \n8550 V5=PHIP \n8560 GOTO 8690 \n8570 \nU1•0:U2=0:U3=0:U4=0 \n8580 \nFORI=! TON7 \n8590 U3=U3+C(I) \n8600 Ul• Ul +(A(I)+B(I))\"C(I)/2 \n8610 U2-U2+ A(I)\"C(I)\"(U3-C(I) /2)+(8(1)-A(I) )\"C(I) /2.(U 3-C(I) /3) \n8620 U4= U4 + A(I)\"C(I)\"(U3-C(I)/2)112+ A(l)\"C(l)A3 /I 2",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 116,
"line_start": 3797,
"line_end": 3854,
"has_formulas": false,
"has_tables": false
}
}