chunk_92.json•1.46 kB
{
"id": "chunk_92",
"text": "2220 U1-DP(l)-ENP \n2230 U2-CD2B-E2r<HT-D(1))/ (HT-U1)+E2 \n2240 \nIF U2>E1 THEN E1- U2 \n2250 U2-CD2C-E2rCHT-\nD(1))/ (HT-DP(l))+E2 \n2260 IF U2>E1 THEN E1-U2 \n2270 IF E1-0 AND E2-0 TilEN E2-.00001 \n2280RETURN \n2290REM \n·-----------\n2300 REM: Conversion Lecture Format Ubre \n2310 FOR 1-0 TO 12 \n2320 U(l)-0 \n2330 NEXT! \n2340 n-o \n2350 IF cu--OR cu--THEN 2450 \n2360J-1 \n2370 IF INSm<J.CL$,' \")-J THEN J- J+1:GOTO 2370 \n2380 \nCL$-RIGHT$(CL$.LEN(CL$)-J+ 1):1•INSm(l.CL$,\" \") \n2390 IF 1• 0 THEN MOT$-CL$:GOTO 2410 \n2400 MOT$- LEFT$(CL$,1-1) \n2410 IF \nMOT$-'\" TilEN 2440 \n2420 \nUOI)-V ALCMOT$):11•11 + 1 :CL$- RIGHT$(CL$,LEN(CL$)-LEN(M0T$)) \n2430 GOTO 2350 \n2440 FOR 16-11 TO 12:U(16)-UMY(I6):NEXT 16 \n2450 FOR 16- 0 TO 12 \n2460 UMY(I6J-U(16J \n390 \n24\n70 \nNEXT 16 \n2480RETURN \n2490 REM ·\n------.-. -------\n2500 REM Lecture des Caractenstiques d es Materiaux \n25\n10 IF \nIECR- 2 THEN READ BP \n25\n20 IF \nIECR- 1 THEN INPUT'Verilioation d'une Section en Beton Precontraint: Oui- 1, Non- 0 ';BP \n25\n30 \nIF ELU> 1.1 OR BP>O THEN 2580 \n2540 IF",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 92,
"line_start": 2956,
"line_end": 3004,
"has_formulas": true,
"has_tables": false
}
}