chunk_226.json•1.4 kB
{
"id": "chunk_226",
"text": "61\n80 pHJT• DIO(J6):RM•DM2(J6)/2 \n190 IF PH1T>.0 14 AND ICER•OTHEN NCA•NCA+l:GOT06 120 \n~2()0 LCA•2\"(A+B-4\"ENR)-8\"(RM+PHln+2.5\"PI\"(RM+.5\"PHin+20\"PHIT \n6\n210 IF NP•3 THEN CV•.07:LCA•(A-CV+Cl-CV)\"2+B-CV+CCV+60\"PHIT \n6\n220 LCA•INT<LCA\"100+ 1)/ 100 \n62\n30 U1•LCA\"PHJTA2\"NCA \n6\n240 A0•AQ+U1\"Pij4\"7850 \n62\n50 DSEM•AO/ A / B/ H \n62\n60 L9•LCA:D9•PHIT:N9•NCA:GOSUB 9320 'Uste par Diametres \n6270 PHIT•PH11\"'1000 \n6280 \nRETURN . \n62\n90 REM Calcul des Ancrages d'Aclers de Poteau en Flexion Composee pour 1 Pieu \n6300 IF NP> 1 THEN 6420 \n6310FORICH•1 TONCH \n6320 IF WELU(IS I ,ICH)< 1.1 THEN 6410 \n6330 EO•ABS(CAR(IS!,ICH)+WVA(ISl.ICH)\"H)/\nPABR(IS1.1CH) \n6340 EO 1• ABS(CBR(IS 1.ICH)+ WVB(IS 1.1CH)\"H)/P ABR(IS 1,ICH) \n6350 \nIF EO <.1\"PAAND E01<.1\"PB THEN 6410 \n6360 U18•PA:IF Ul8>PB THEN U18•PB \n6370 U19• H-.l-{(D(1)-U18)/ 2-.07+ENR) \n6380 \nLPRINT \"Retoumer les Aclers de Poteau en Bas de Semelle et les Aciers de Pieu en Haul de Semelle'",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 226,
"line_start": 7422,
"line_end": 7454,
"has_formulas": false,
"has_tables": false
}
}