chunk_89.json•1.46 kB
{
"id": "chunk_89",
"text": "1340 REM Colcul des Moments Resistants Maxi et Mini en Classe 1 et 2 \n1350 \nX•VlBH:SX•SAD:GOSUB 1510:MSUP•MK \n!360 X • V1BH-DP(NP)-ENP \n13 70 IF X >O TI-I£N 1400 \n1380 SX• SATG:GOSUB 1510 \n1390 \nIF MK<MSUP TIIEN MSUP•MK \n1\n400 X • V1BH-HT:SX•SAT:GOSUB 1510 \n1410 IF MK<MSUP TIIEN MSUP•MK \n1420 X •VlBH-HT:SX•SAD:GOSUB 1510:MMIN•MK \n1430 X • V1BH-DP(l)+ENP1 \n1440 \nIF X <O TIIEN 1470 \n1450 SX• SATG:GOSUB 1510 \n1460 IF MK>MMIN TIIEN MMIN•MK \n1470 X •VlBH:SX• SAT:GOSUB 1510 \n1480 IF MK>MMIN TIIEN MMIN•MK \n1490 GOSUB 6770 'Ecriture des Resultats \n1500RETURN \n1510REM------------\n1520 REM Pour x donne et Sigma donne en BP \n1530 FOR IP- 1 TO NP:DEP(IP)• O:NEXT IP \n1540 GOSUB 1650 ' Somme des Pj \n1550 FOR IKT• l TO 5 \n1560 GOSUB 1740 'Somme des Delta Pj \n1570 FOR IP·1 TO NP \n1580 SGI=PJj SECH+(PEJ+MGP)\"(V 1BH-DP(IP))/ lNERH \n1590 \nMK~(SX-PJD/SECH)\"!NERH/X-PEJD \n1600 SSI=PJDj SECH+(PEJD+MK)\"(V1BH-DP(IP))j lNERH \n1610 DEP(IP)• -EQU\"(SSI-SG!)\" AP(IP) \n1620 \nNEXTIP \n1630 NEXT IKT \n1640RETURN \n1650REM",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 89,
"line_start": 2843,
"line_end": 2880,
"has_formulas": false,
"has_tables": false
}
}