chunk_227.json•1.44 kB
{
"id": "chunk_227",
"text": "IF 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' \n6390 LPRINT USING\"si Ia Longueur de Scellement Droit Necessalre est Superieure a IIIIU mm\";U!9\"1000 \n6400LPRINT \n6410 \nNEXT ICH \n6420RE'I1JRN \n6430REM--------------------\n6440 REM Calcul des Aclers Semelle: Phi. Longueur, Crochet (PHlmm.ILB,IRET) \n6450 Nl• INT(4\"Bl +.8):N2•1NT(!O\"B1 +.8) \n6460 XLAM•5:1P1•2:IP2· 8 \n6470 AMA•IOOO \n6480AC•ASI \n6490 \nIF NBIN>O THEN N!•NBIN:N2•NBIN \n6500 FOR Il•Nl TO N2 \n6510 FOR 12•IP1 TO IP2 \n6520 U1•Il\"Pl\"DIO(I2)A2j4 \n6530 IF Ul<AC/TOL THEN 6560 \n6540 IF Ul>AMA THEN 6570 \n6550 AMA•Ul:NBARI•Il:PHI•DIO(I2):RM•DMI(l 2)/ 2:GOTO 6570 \n6560 NEXT 12 \n6570 NEXT II \n6580 IF AMA<990 THEN 6660 \n6590 U2•N2\"DIO(IP2)A2/ 4\"PI\"l0000 \n6600 \nIF IP2< 10 THEN 6650 \n6610 LPRINT USING\"Section U#.U crn2/ m Impossible a Satisfaire\";AC\"lOOOO",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 227,
"line_start": 7450,
"line_end": 7480,
"has_formulas": false,
"has_tables": false
}
}