chunk_108.json•1.51 kB
{
"id": "chunk_108",
"text": "IZ• 1:El•Dl:E2•D1:GOSUB 7390 \n6030 \nIF LN(JCM)<F1 THEN VERIF$• NVERIF$:RN•F1 :MSUP• O:MMIN• O:GOTO 6860 \n604\n0 IZ• 2:E1• 0:E2-Dl :GOSUB 7390 \n6050 IF LN(ICM)<Fl THEN IPZ·l :GOTO 6180 \n6060 \nJZ• 2:E1•D2:E2·Dl \n6070 IF ELU<l.l AND IPIEU>O AND El>D7 THEN El•D7 \n6080 GOSUB 7390 \n6090 IF LN(ICM)<Fl THEN IPZ•2:GOTO 6180 \n6100 \nREM IF BP>O AND ELU<l.1 THEN IPZ• 3:GOTO 5910 \n6110 \nIZ•4:E2• 0:IPZ=IZ \n6120 E1• (D5-E2tAT6/ (HT-AT6)+D5 \n6130 GOSUB 7 390 · Beton + Aciers Comprimes \n6140 IF LN(ICM)<F1 THEN IZ• 3:JPZ• 3:GOTO 6180 \n6150 \nIZ•4:El•D5:E2•D5:GOSUB 7390 \n6160 \nIF LN(ICM)<F1 THEN IPZ· 4:GOTO 6180 \n6170 \nRN•F1 :MSUP•O:MMIN• O:VERIF$• NVERIF$:GOTO 6860 \n6180 \nREM Cas Pivots 1A. lB. 2. 3 Moment Maximum \n6190 MPRN•F2:KN2- -1 \n6200 REM Recherche par N9<hotomie de Nappliq• Nresist \n6210 ICB-1:NO- O:IZ-IPZ \n6220 \nON IPZ GOTO 6230,6240.6270,6280 \n6230 E2• D1:AD1•Dl:AD2-0:GOTO 6290 \n6240 \nE2•Dl:AD1•0:AD2~D2 \n6250 IF ELU<1.1 AND IPIEU>O AND AD2>D7 THEN AD2•D7 \n6260 GOTO 6290 \n6270 \nAD2•D2\"(l-D(N6)/HT):E1• D2:AD1•Dl :GOTO 6290",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 108,
"line_start": 3491,
"line_end": 3528,
"has_formulas": true,
"has_tables": false
}
}