chunk_211.json•1.47 kB
{
"id": "chunk_211",
"text": "2600 REM LAP(!) ET LAPmax \n2610 ON NP GOTO 2710,2620.2660.2670 \n2620 OA1-.5·PA·PMB(2)/ (PMB(1)+PMB(2)) \n2630 OA2• .5.PB.PMB( 1 )/(PMB( I)+ PMB(2)) \n2640 l.AP(l)•D1COA1 :l.AP(2)•E1-D1C-OA2 \n2650 GOTO 2680 \n2660 GOSUB 10550:GOTO 2680 ' Caicul de LAP pour 3 Pieux \n2670 GOSUB 10830 'Caicul de LAP pour 4 Pieux \n444 \n2\n680 I.AP•O:FOR 15•1 TO NP \n2690 IF l.AP(I5)>LAP THEN LAP•l.AP(l5) \n2\n700 NEXTI5 \n2710 RETURN \n2720 REM-----------\n2730 REM Angles Tii(l). Forces T(l) et F(l) \n2740 FOR 16• 1 TO NP \n27\n50 TH(I6)• ATN(Z/I.AP<16)) \n2760 NEXT 16 \n277\no IF NP•2 THEN GOSUB 10960:GOTO 2800 'Caicul T(l) et F(l) \n2780 IF NP•3 THEN GOSUB 10680:GOTO 2800 \n27\n90 IF NP• 4 THEN GOSUB 10900 \n2800RETURN \n2810 REM:-----------\n2820 REM Semelle sur 2 Pieux \n2830 GOSUB 3010 'Dimensions et Charges \n2840 U1• PM(l)\"F(l):U2•PM(2)\"F(2) 'El.U \n2850 IF U1<U2 THEN Ul•U2 \n2860 AINFX• U1/SU \n2870 \nU1• PMAS<1tF(l):U2=PMAS(2)\"F(2) 'ELS \n2880 IF U1<U2 THEN UI·U2 \n2890 U3•U1/SLS \n2900 IF U3>AINFX THEN AINFX=U3 \n2910 \nU1•-PMI(l).DlC/.9/D/SU",
"metadata": {
"book_id": 34848,
"title": "BASIC-STRUCTURAL-Henry-Thonier-Tome-2",
"authors": "Unknown",
"project": "basic_structural",
"content_source": "ocr",
"content_length": 756676,
"chunk_index": 211,
"line_start": 6930,
"line_end": 6969,
"has_formulas": false,
"has_tables": false
}
}