chunk_659.json•1.51 kB
{
"id": "chunk_659",
"text": "1710 Ul$•LEFT$(PROF$(!), I) \n1720 U2$•RIGHT$(PROF$(1).N6-l) \n1730 FOR \n12•1 TO NFT \n1740 If CODE•! THEN MRD•ZZI(l2)/ZZH(12)'2\"U3\"SE:VRD• ZZB(l2)'ZZH(I2)'COV\"SE\"U3 \nI 750 If CODE•2 THEN MRD•.2\"STA(I2)'SE\"U4/GAMA:VRD•AV(I2)'SE/GAMA/SQR(3)'U3 \n1760 \nFRD•L(l)\"U3/FL1 \n1770 IF Ul$•'1' OR Ul$•'H\" THEN 1880 \n1780 IFMRD<MMAXTHEN 1890 \n1790 \nIF VRD<VMAX THEN 1890 \n1800 \nIf ABS(FMAX)/ZZI(I2)/E>FRD THEN 1890 \n1810 \nIF Ul$•\"<' AND ZZH(I2)>VAL(U2$)/U3 THEN 1690 \n1620 \nIf Ul$•\">' AND ZZH(l2)<VAL(U2$)/U3 THEN 1890 \n1630 \nIF Ul$•'P' AND ZZH(l2)<>HPREC THEN 1890 \n1840 \nPPC•ZZS(!2)'9.81\"7.85 \n1850 IF PPC>PPMIN THEN 1690 \n1860 NORE•I2:PPMIN•PPC \n1870 GOTO 1890 \nI 880 IF PROF$(l)•NOPR$(!2) THEN PPC• ZZS(I2)'9.81 '7.65: NORE•I2:GOTO 1920 \n1690 NEXTI2 \n~~If NORE•O THEN LPRINT USING\"Aucun Profile ne Convient pour\\ \\\";NOM$(l):LPRINT'Completer Ia \nLisle par des Profiles Reconstitues\":STOP \n1910 PPC•PPMIN \n1920 RETURN \n1930 REM-----\n1940 REM Resuitats \n1950 vr-ABS<RG<I)) \n1960 If VT<ABS(RD(I)) THEN VT•ABS(JID(I)) \n1970 \nIF CODE•2 THEN 2010",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 659,
"line_start": 23368,
"line_end": 23404,
"has_formulas": true,
"has_tables": false
}
}