chunk_628.json•1.48 kB
{
"id": "chunk_628",
"text": "3440 XK1•XK(l):XK2•XK(2):L•LY \n3450 FOR 1•1 TO NX 'No de Colonne \n3460 Xl•Xl(l) \n3470 FOR J1-1 TO NY ·No de Ligne de Charges \n3480 J3•(J1-1)'NX+l \n3490 Q-P(J3)-B(J3) \n3500 X2•LG(NX+J1) \n3510 J2-l \n3520 X1•0:GOSUB 3590 \n3530 J2•NX+J2 \n3540 X1-LY:GOSUB 3590 \n3550 NEXT J1 \n3560NEXTI \n3570RETURN \n3580REM---\n3590 GOSUB 3140 \n3600 \nVA(J2)•VA(J2)+V \n3610 CA(J2)•CA(J2)+C \n3620 RA(J2)•RA(J2)+R \n3630 RETURN \n669 \n\n3MOREM-----------------------\n3650REM \n3660 \nIF NREG-0 TiffiN 3750 \n3670 \nUX-LX/(NX+l):UY-LY/(NY+l) \n3680 FOR 1-1 TO NX \n3690 LG(I)-ux·I:XI(l)-XIX:XE(I)-UX \n3700NEXTI \n3710FORI-NX+l TONX+NY \n3720 LG(I)-(1-NX)\"UY :XI(!)-XIY :XE(I)-UY \n3730NEXTI \n3740 GOTO 3930 \n3750 \nIF 1£1'-2 TiffiN READ Ill :GOTO 3780 \n3760 INPU'J'\"Ecartement(m) \net lnertie(m4) de i a j : i.j.e.I-·:cL$ \n3770GOSUB 1360:111-U(O)l) \n3780 \nIF 111-0 TiffiN 3850 \n3790 \nIF IET-21HEN READ 122,XE.XI:GOTO 3810 \n3800 122-U(l):XE-U(2):XI-U(3) \n3810 FOR 1-111 TO 122 \n3820 XE(I)-XE:XI(l)-XI \n3830NEXT I \n3840 GOTO 3750 \n3850 \nLG(l)-XE(l) \n3860 FOR 1- 2 TO NX",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 628,
"line_start": 22344,
"line_end": 22396,
"has_formulas": true,
"has_tables": false
}
}