Berekening knikkracht van kolommen met continu veranderende doorsnede en aan beide uiteinden scharnierend bevestigd

Berekening knikkracht van kolommen met continu

veranderende doorsnede en aan beide uiteinden scharnierend

bevestigd

Citation for published version (APA):

Janssen, J. D. (1962). Berekening knikkracht van kolommen met continu veranderende doorsnede en aan beide uiteinden scharnierend bevestigd. (DCT rapporten; Vol. 1962.015). Technische Hogeschool Eindhoven.

Document status and date: Gepubliceerd: 01/01/1962

Document Version:

Uitgevers PDF, ook bekend als Version of Record

Please check the document version of this publication:

• A submitted manuscript is the version of the article upon submission and before peer-review. There can be important differences between the submitted version and the official published version of record. People interested in the research are advised to contact the author for the final version of the publication, or visit the DOI to the publisher's website.

• The final author version and the galley proof are versions of the publication after peer review.

• The final published version features the final layout of the paper including the volume, issue and page numbers.

Link to publication

General rights

Copyright and moral rights for the publications made accessible in the public portal are retained by the authors and/or other copyright owners and it is a condition of accessing publications that users recognise and abide by the legal requirements associated with these rights. • Users may download and print one copy of any publication from the public portal for the purpose of private study or research. • You may not further distribute the material or use it for any profit-making activity or commercial gain

• You may freely distribute the URL identifying the publication in the public portal.

If the publication is distributed under the terms of Article 25fa of the Dutch Copyright Act, indicated by the “Taverne” license above, please follow below link for the End User Agreement:

www.tue.nl/taverne

Take down policy

If you believe that this document breaches copyright please contact us at:

openaccess@tue.nl

providing details and we will investigate your claim.

I

-I

-

a

a

a

a

a-

O

a

O

\ ,..

- z -

1

2.

&&=-=

A--

a

_{a - *} a a c

-

a

-r-

-L

a

II

B

B

I)

B

B

I)

a

a

q

a

a

D

a

a

a-

-

‘ I -10

-

. i

-

- e I

-

_e b P I - & / P e

8

D

a

P Y

- -

e

/I

e':

-/3

-

1 2

3

5

&O0 7 10

1 1

'1c

1 -

18

C FCRTi3AI.I ?ROGR. VOOR EER, VAN KN I i( V A N KOL0MMEN (

175

P ) e

FORMAT I $ FORMAT

i 4

,i8.8d FORMAT

I

Ei&.8,El<+.8) ACCEPT1,NS FORMAT E I

k

o 8 22 24 26

28

30

32

34

35

44

I

ACCEPT 1

,

N

D I MENS I ONFACT { 200), FS 1 ( 200)

,

W( 200)

,

F ( 200) y R ( 200 ) Z ( ZOO), D 1 FF ( 200 )

FN=N M=N-7 J=N

-

2 H=l .O/FN P I

=3.

i 41 5926 DOTi=l ,N F I = l FACT ( i )=( F

1

-i .O )/F I GOTO

(50,55,60,65)

,

NS DO1 1 i = 1 ,N F i = i W( I )=Si N(P i *F 1 /FN)

"1

O.OE+bO NT=O DO1

4i=1

,N AA=O. O NTE L=O F( I )=-W(

1

)/PSI ( I ) o01 5 i = t ,M D ~ F F ( I ) = O . O =H**2*F(l)+AA*DIFF(l) I)PFACT( I)*R( I - ~ ) + A A * D I F F ( I ) D022K=1 M I =N-K

z(

I)=FACT( li-i

)*(z(

1-t-1

)-R(

I

1)

I F( SENSESWI TCHI

)24,28

TYPE 1

,

NTE L TYPE2, Z ( N ) DO 26 I = l , M TYPE 100 , Z ( I ) , D i F F ( I ) TYPE 2,Z(N) PAUSE i + i

)+z(

i e ) NTE L=NTE Li-1

TEL=O.O OND=O

o

.GOTO I

6

TYPE3,NT,FMU PAUSE NT=NTtl DO 42 I = l , N GO TO 12 D0521=1 ,N

w(i)=z(

1 )

' $ 3

-

52 PCt ( I jf'

.c

G û Ti: :3 ACCEPT 2,HA DO

57

I = i , N r i = í GO TO 10 ACCEPT 2,HA ACCEPT 2,HB ACCEPT 2,A F i = l

57

ACCFFT !,NE r-

57

P S I ( I)=((-HP.+I .O)*FI/FN+HA)**NE 60 ACCEPT i ,NE DO

63

I = I , N f F ( F I F N - A ) ~ ~ ,6i ,62

61 PSI ( I )=(wA+(-HA+~ .o)*FI/(FN*A))**NE

62 P S I ( I

i =

HB+( i .o-HB)*( i ,o-FI/FN)/( I .O-A) )**NE

63

CONTINUE

65

ACCEPT i ,NE _ _ _ - G e - 7 0 g? I - . _ GO TO 10 ACCEPT 2,HA ACCEPT 2,A DO

67

I=l,N F I = l

PSI ( I ) = (

1

.O+(HA-1 .O)*(FI/FN-A)**2/A**2)**NE GO TO 10

E ND

260000300004 360000000300

1620 FGRTRAN PREYCESSOR 9/30/61 MGD 11/27/61

ENTER SOURCE PRGGRAM, PUSH START

a8300 C 08300

1

FORMAT( I

08322

2 FCRMAT(Efi.8)

08344 3

FCRMAT(l4

E18,8)

88372 100 FORMAT(E1&,8,E18,8) 08400

4

ACCEPT1,NS

O8424

5

ACCEPT1,N Ö

844 8

o8448

FN=N

OWk96

b b N - 1

O85

44

J=N-2

88592

H=l .O/FM

ö

86

4

o

08676 DG71=1,N

ÖB688

FI=l

of3736

7

FACT l ) = ( F ! - l .O)/FI

OR940

10 DC111=1,N

08352

F I = l

O

900 O 1 1

09144

NT=O O9180 12 DGi4I=l,N

O9192

14

F ( I ) = 4 d ( I ) / P S I ( I )

093

60 AASO. O

09396

NTEL=O

o

q43

2 DClSI=l,M

09444

15

D I F F ( l ) = O , O O9540

16 R(l)=H"*2*F(l)CAA"DlFF(l)

O

96

48

DC181=2,M Ö966û

18

R ( I ) = H ~ ~ * 2 ~ F ( I ) ~ F A C T ~ l ) ~ ~ ~ ( I ~ l ) + A A ~ ~ D I F F ( I )

09972

Z (N)=O. O 1 70032 D022K=l,M

7

o o

44

70032 22 Z ( I)=FACT(

l+l)*(Z(l+l)-R(l))

'TO2

84

TO304 2 4 TYPE1 ,NTEL

io328

TYPEZ,Z(N)

70376

D@

26 I=^P,M

7 0 3 8 8

26 TYPE 100 , Z ( I ) , D I F F ( I ) 7 0 5 0 8 TYPE

2,Z(N)

70556 PAUSE 70568 IF(SENSESWITCH2)5,30

10588

28

IF(AA)34,30,34

5û64k

30 ûI,FF( l ) ~ C , O ~ ; Z ( 1 ) - 4 , O + : Z ( 2 ) + 2 ( 3 ) 10764

70932

I 71

136

111rc8 32

71508

AA=I.0/12,0 T1556 NTE L=NTE L+ 1 I

71

604

11612

34

TEL=O.O

11

648 ONû=O. O

71

684

DCP361=1,M 71696

TI

I Ut0

36

CND=CND+Z( I )'):%/PSI I 1

FORTRAN PRCGR, VGGR BER,. VAN KNIK VAN KCLCMMEN ( 1 7 5 P I ,

û I MENS I ENFACT(20û) PS

I

(200) ,W( 2001, F ( 200) ,R( 200),Z(200),

D

I FF ( ~ ~ ~ ) P I

=;3

, 14I5926 I

88856

G 6 - E

i

5Os55,60,65),NS

W ( I )

=S

I

M

(

P

I ;vF

I

/FN ) +íl O , OE+-40 I =NUK I F (SENSE SW I TCH 1 ) 24,2

8

D 1 FF (

2)

=-h

O*Z ( 1 ) +Z

(2)J;6

e

0-4

, 09;Z (

3 )

+Z (

4)

D i F F ( N-1 ) =Z (N-3 )-4,O*Z( N-2

195.

O-kZ

(N-1

) DO32 I

=3,

J

D I F F (

i)=L(

l-Z)-4,0*Z( I-1)+tieO+:Z( i)-4,û*Z( 1+4)+Z(í+2)

GGTG 1

6

,206

44

y N T , FMU

$210&

blie@

121

16

NT=NT+

1

52

164

DO

42

I = l , N

72176

42

W(l>=Z(l)

12296

G O

T C

12

I

-

12304

50

DC521=l,N

12316

52

P S I ( I ) = I , O

7241

2

GC T G

10

721t20

55

ACCEPT

1

,NE

121t

Lt

4

ACCEPT 2,HA

72468

DG

57

I=l,N

1211

80

FI=l

12528 57

i2696

GO

T C 10

72704 60

ACCEPT 1,NE

12728

ACCEPT 2,HA

72752

ACCEPT

2,HB

72776

ACCEPT 2,A i2800 DO

63

I=1,N

52812

FI=l

12860

I F ( F

I

/FN-A)61,61y62

T2940

61

P S I ( I)=(HA+(-HA+l .O> 73108 I

GO

T@

63

13116 62

P S l ( l ) = ( H B + ( 1 , O - H S ) ~

'13332 63

CCNTINUE

1 3 3 6 8

GC

TO 10

13376

6 5 ACCEPT 1,NE

T3li.O

O ACCEPT 2,HA

i3112

4

ACCEPT 2,A

73448

DC

67

I=1,N

"13460

F1=1

7 3 5 û 8

67

P S I ( I ) = ( l , O - t - ( H A - l . O )

13760

GO

TO 10

73768

END

PRO(; SWl ON FOR SYNRGL TABLE,

59999

S I N PS

1

( I ) = ( (-HA+l .O);kFI

59959

ATAN

59949

ATANF

59939

EXP

59929

E X P F

59919

LOG

29909

LCGF

59899

SQRT

59889

SQRTF

$9879

ABS

59869

ABSF

59859

boo1

29779

0004

9749

N

9739

F A C T

57749

57739

P S I

55739

w

53739

F

51739

R

q9739

z

- 17719 R I F F EK7ùQ /FN+MA)**NE * ( F I /FN-A)*9<2/A PUSH START

" t 3 / L Y M

725719

ÖooT

w 5 7 9

H

45709

000

45699

J

q5689

0002

45669

~ O O O O O O O Ö l

65659

P I

45649 2141592661

45639

0007

&5629

I

ris619

Ei

G5609

O 0 1

45599

Ö050

55589 0055

&5579

0060

45569

8065

55559

O010

2?5549

oor1

G5539

5000000042

45523

NT

q5519

ÖOOO

q5509

0012

rs5499

0014

65489

AA

Zi5479

0 0 0 0 0 0 0 0 ~ ~

q5469

N T E L

65459

0015

45449

00

16

55439

O018

%429

002

q5Lt.19

0022

&51t09

K

55399 0024

45389

0028

55379

0026

&5369 0030

45359 O034

45349

-0000000ö1

45329

~ O O O O O O O Ö l

55319 0032

&5309

T200ûOOOo2

55299

T E L 45289 OND

F5279 0036

q5269

FMU

55259 0044

55249 o042

55239

8052

215229

NE

ris219

HA

55209

0057

q5199

HB

q5189

A

215179

8063

551.69

Ö061

65159 0062

G5149

Ö04

55139 006

q5129

0067

%119 005

65339

2

000000001 - -

.

SW

1

OFF TG IGNCRE

SUBRCUTINES,

PUSH START

1

m

i

D

8

D

B

II

O

a

O

O

31

a

31

li

IJ

O

O

-

23-

NE- ) = i

I

fe

ip,

! ?

c

m

i

- 2 y -

, 6

h

d

_k.

- 2 f -

1

II

O

D

8

T 4

-

-B

P-

B-

a

B

II

II

-

32

T g s t r e s ~ 2 tatlvl

N 5 * i f T&trlJ?LPW A? Lu; y f s y f Rc**ocJ

4-00

1

N s 5 +O05

$

4

3

.20000000E-00 .31415926E+Ol .10000000E+01

.

2OOOOOOOE-t.O1 ~-50000000~-00 .30000000E+01 .~400OOOOOE+01 .50000000E+01

.

10000000E+01 1000000OE+Q1 .10000000E+01 10000000E+01 10000000E+01 .58*778524E+41

-

95 i 05650E+41

-

,30000000E+01 .95105655E+41

-

~+0000000E+O 1 .58778535E+41

-

0 50000000E+01 o oOOQOO0OE-99 -*58778524E+41 -.95 105650E+4l

-

5

877

8535E-f-4 1 .50000000E+01

.

OOOOOOOOE-99 .66666666E-O0

.

750000OOE-O0 8OOOOOOOE-O0 a 100QOOOOE+01 ~2OOOOOOOE+01 O -e95105655E+41

-.

OOûoûOûOE-gg .OOOOOOOOE~gg

.

OOOOOOOOE-99 O c ooooooooE-gg

.

OoooooawE-gg

-.235114lOE+40

-

o Lt9797965E-1-40

-.

7

124090SE-1-40

.

OOOOOOOOE-99 4 -,76942093E+40

.

OOOOOOOOE-g9

4

3 - 2

1

061553674E+40

99595928E+40

a 99595926E+40 .61553665E+40 e61553665Ea40 o oooo0ooo~-9g O

.

OOOOOOOOE-99 99595926E+40 . 0 0 0 0 0 0 0 0 E - ~ ~ 99595928E-f-40 00000OOOE-~g *

6

1553674E-t.40 .0000OûOûE-9~ * ooooooooE-gg R n Q n r ~ Q n c ~ 2 n

6

1E-f-40

vs

*$$i

1

$!#

1

E

-&O

-

68 973 2

7

4Ei-40

-.74492989E+40

_.

OOOOOOOOE-99

4

3

2 1

.595 943

91

Ei-40

96425745E-f-40

96k25739E-f-40

05

Y

5

943

8 SE +&O 1

.

OOOOOOOOE-99

.-f;

95 94385 E+-40

.96425/39E-f-40

+

96425745E-f-40

59 5943 9

1

E.t-40

.00000000E-99

86947

l5OE-t.

9

14068301

E+

2

O

.

86947

1

OOE+39

1406833OE-f-40

83333333E-01

-

22

7 8685

1

E+4O

w.48263328E-1-40

-i

69O45454Ei-40

-.74570946Et40

,000000OûE-99

2

s

3

2

1

.59656757E+40

.96526658E+40

96526652Ei-40

.59656750E+40

.5

965675OEi-40

+

96526652Et40

96526658E4-40

o

5

965 6757

E.t.40 2 0 O O OU O O O E-

9 9

,00000000E-99

3

.OUOOO000E-99

.

tp

9

65

47 65

E

-1-4

O

.

96523439Ec40

e

9652344OE-1-40

5

965 47 7OE+4O

e

OoOOOOûOE-99

-

33-

.89805580E+39

14530864E+40

14530830E4-40

e

89805 800E-f-3 9

.86947 1SOE-t-39

a

14068330E-f-40

.

86947

1

üOE+3

9

e 1

406830

1 E+&O

.87035100Ei-39

14082580Ei-40

.

87

03 5200E-1-3 9

.?4082560Ei-40

e83333333E-01

_I-

-

* o y w 3 z 3 u t c 4 u -,74568544E+40 .00000000E-99

4

.59654835E+40

-

3

.96523545E+40 2 .96523539E+40 1 .59654825E+40 ,00000000E-99 .00000000E-99 ;35064226E+81 .35586981E+80

.12686356E-f-82

12875491E.f.81

.21866291E+82

.22192285E+81

.25372714E-f-82

257

50984E.f.8 1 99832824E-O0 O * 99832824E-00

1

99934080E-O0 2 99934081 E-00

3

99934077E-00 154~64700007 f v c r v d v r q i n g rd’ar> Z i . I y J f 9 2 6

49

O 8 40 O d.r, J . l Y , S f Z

.

1

+O01 -1-005 .50000000Ec01

-

4

3

.20000000E-00

3

1

415927E-t-01 .10000000E-f-û1 .20000000E~O

1

.50000000~-00 .3OOOOOOOE+01 ~t00OOOOOE~01

.

00000000E-99 .66666666E-00 ~7~000OOOE-00 ‘ ,50000000~+01 .10000000E+01 íOOOOOOOE+01 u 10000000E-t-0

1

.10000000E+O

1

.1OOOOOOOE+01 .1OOOOOOOE+O1 .58778526E+41

-

~2OOOOOOOE+01 .9510565OE+41

-

.30000000E+01 ,95?05652E+41

-

.40000000E+OI .58778519E+41 -3 .~0000000E+ül 80000000E-00

-.

1

h400000E+35

-.

587

78526E+4 1 - o

95

105650E-f-41

-

95

1

û5652E-t-41

-*58778519E+41

..

14400000E+35

O

,, OOOOOOOOE-gg

i

.00000000E-99

,

OOOOOÓOOE-99

.ûOOOOOOOE-g9

.OOOOOOOûE-99

.OOOOOOOOE-99

,

00000000E-~9

o

OûOOOOOOE-g9

,oQooooooE-gg

e

97,885 800E+3 8

.930963QûE+38

791 92600E+38

95753700UE+38

.30248000E+38

1

.59561521

E+O

3 I

3 13345ET40

I

.00000000E-99

O

.99989285E-00

1

,99995924E-00

2

099995931E-00

.OOOOOOOOE-99

o OOOOOOOOE-99 ,00000000E-99 . 0 0 0 0 0 0 0 0 E ~ 9 9 ~00000000E-99 o OOOOOOOOE--g9 ~ O O O O O O O O E - 9 9 .OOOOOOOOE-gg .û000OOOOE-~g

.

OOOOOOOOE-99 .000000OOE-gg

:ooooooooE-gg

*

oooooooo€-gg

p

0 0 0 0 0 0 0 0 E ~ g g .OOOOOOOOE-gg OOOOOOOOE-99

.

OOOOOOOOE-~9 OOOOOOOOE-99

.

OOOOOOOOE-99 *00000000E-gg ;OOOOOOOOE-99 .00000000E-99 ~000O0000E-yg - _._ -- - . .._ ~ i !

1 I .00000000~-99

J9495695El-3

9

.15850128E-t-40 I .23652965€+40 .31309974E+40 .38773948E+40 .45998868E+40 .52940190E+40 .59555117E+40 .65802866E+40

.7

16449

1 S E 4 0 .77045257€+40 D81970L;85E-t-40 .90277861E-1-40 .9360859

1

EI-40 e 96362 193E-t-40

9852

i

696E-i-40

1000737 8E-t-41

.

1 O 1321 22E4-41

. m o e 8 8 8 ~ + 4 1

e 9852

í 7

17E1-40 .96362227E+40 .93608625E+40 .90277893E+40 86390567E40 81 9706 14E-i-40 * 77045285E+40

CT

164494SE1-40 .65802890E+40

5

9555

13 8Et-40 .529kO210E+40

.

45998887E-1-40 38773965Ea40 .23

652

97

8E+40

15850137E+40

7

9 4 9 5 7 4 8 E ~

9

.

ooooaooo~-g9

86390536E+40

.

10100887E-t-41 .10007379E+41 e

3

13 O999OE-t-40 h , 3 U l O U û O U E + ~ ~ ,60300000E+3S 11 980000E+36 14720000E+36 o 17440000E+36

.'za1

10000~-i-36 -901 00000E+35 22520ûOOE+3 6 5û20000E-t-3

6

7

190000E+36 9'29200000E+36 11 20000E+36 27 4QOOOE-i-3

6

4210000E-i-36 5610000E+36 6600000E1-36 760000ûE-1-16 8000000€+36

83

00000E.t.36 8800000€+i6 8 2 8 m m - 6 8060000E-1-36

754OOûOE-f-36

6600000E-1-36 5670000E-i-36

41

40000,E+36 27 50000E+?6 113000OE+36 91 9OOOOE-i-36

.

24960000E1-36 .226OOOOOE+36 +

~~~~~~~~~~36

14690000E+?6 833200ûOE+35 603 00000E-t-35

7

2OOOOOEI36 a201 00000E-t-36 e 11 8700OOE-t-36 30300000E+35

-m

O - 0 O 00 O00 O0 E-99

7

9505793E+3 9 .39783568E+39

-.

1 1

9

1

0543E-t.40 .15852142E+40 19769298E+40 .23

65

5

97

2E+40 *. 52

94692

OE-t.40 .56298208E+40

5

9562688E-t.40 .62735327E+40

.65x(I

1233E-1-40 .68785662E+40

.7

1654028E.t-40 .7Lk41191OE+40

.77

055

O5

4E+40 .79579384E+40

.

81

98 1009EdtQ

.

n4256224E-t-40 .R6401522E+4b0 8841

35

96E-t.40 P0289342E~40 .92 025868Et.40 <I a36204g7E+40 ^.95070770E+40 .96374450E+40 .97529529E+40 .98534224E+40 o 993 8699 1 E-t.40 .10008651E+41 .10063170E+41 .l0102173E+41 u 1 O 125599E*41 e 1 O

13341

2E+4 1 ,10125600E+4.1

.

1

O 1 02 1 75E -t.Li. 1 .10063173E+41

.

10008654Et.41 o 99387038E+40

.

*8534280E+40

.

9752 95 87Et.40 * 96374507E+40 .33620550E+40 92025~20E+40 .90289392E+40

8841

3645Et-40 e 86Lt01570E+40 e 84256269E+40 .81%1052E+40 .7?579425E+40 e 77055093E+40 *74411948E+40

7

1654065E-t.40

6

87

856

97

€+40

.65811266E+40 .62735359E+40 3956271 8E+40 .56298236E+40 a 95070825E+40 c 3 af, L n I, L C L I, n

.

OOOOOOOOE-99 .00000000E-~g .00000000E-99 .00000000E-9~ OOOOOOOOE-99 .00000000E-99 .00000000E-~g o 00000000€~-9g * ä W "

n

r q nn " W . # W " L (10 n L

5

cj OOOOOOOOE-99 .OOOOOOOOE~-99 .00000000E-~9 .00000000~-~9

.

oooooooo~-gg

.

OOOOOOOOE-99 .00000000E--(39

.

OOOOOOOOE-pg .OOOOOOOOE*-~~

.

OOOOOOOOE-99 o OOOOOOOOE--~g .OOOOOOOOE-g~

.

OOOOOOOOE-99 a 00000OOOE~~9 0 0 0 00 0 0 00 E-99 e 00000000E-~99 a OOOOOOOOE-99

.

OOOOOOOOE~*~~

,

O O O O O O O O E ~ - 9 ~ .00000000E-gg

.

OOOOOOOOE-*g~

.

OOOOOOOOE-*gg * OOOOOOOOE-99 o 0 0 00 00 OOE-$19 o 00000000E-~g o OOOOOOOOE-99 .OOOOOOOOE-*99 o OOOOOOOOE-99

.

O O 00 O O O0 E-*

9

e) .00000000E-99 i .00000000E-99 o OOOOOOOOE-99 0

ooooooooE-~g

~0000000OE-~9

.

OOOOOOOOE-99 0 00000000E-Qg OOOOOOOOE-99 .00000000E-99 .00000000E-gg o 00000OOOE-~9 e00000Q00E-99 00000000E-99 a OOOOOOOOE-99 .00000000E-~9

.

O O O O O O û O E - ~ ~

.

OOOOOOOOE-99

.

OOOOOOOOE-99 OOOOOOOOE-99 .00000000E-~g

.

O O O O O O O O E - ~ ~ .00000000E-99 o

OoooooooE-gg

OO00000OE-p9 0 0 0 0 0 0 0 0 0 ~ - 9 ~ nnnnnfianr nri

.

o

000 00 0 0 ~ ~ ~ 9 9 .oooooooo~-9p

-

i a -

“ 1

.

OOOOOOOOE-99 .3V78594E+39

7

9495853Ec39 11 909054E+40

.

158501 6OE-t-40 .19766826E+40 .23653014E+40 O . 81310041E-t-40

3

5

069073 E-t-40 i

3

877

403 1 E 4 0 ,4241 9203E-E.40 Jt5998967E+40 * rt9507803E+40 e 52 940303Et-40 .56291172E+40 .59555245E+40 ,62727488E-t-40

.

6580301 0E-1-40

6

8777

068E-1-40

*7

1645077E+hO .74402614E+40

*77

045428E+Lt0 .79569443E+40 .81970766E+40

.

84245695E+40 86390723E+40

-.

88402541E+40 9027 805 0E-t-40 .92014356E+40 I o

~3 6

O

87 8 3

E-t-40 .95058872E+40

.

96362387E640 ,97517319E-t-40 .i9852 1 887E-t-40 .10007397E+41 e 10061909E+41

.

1 o1 00906E+41 o 10124328E+41

.

I O 132 1 39E4-4 1

.

1 O 124328E-i-41 o i o1 0 0 9 0 6 E ~ 4 1 .10061909E+Lkl

.

10007397EC41

99374546E+kO

e

9852

1 899E-t.40 .97517335E-t-40

.

96362k02E+40 9505

8885E-t-ho

936087 92E+40 .92014362E+40 o 9027 8052Et-40 .88402540E-t-40 ,, 863907 1 8E-t-40 e 84245687E-t-40 ,81970755E-t-40

.7

9569430E+40 J70454.i 4E3.40 .74402601E+kO

.7

1645064E-t-40 .68777056E+40

65

802998E-t.40 6272747 6E+40

..

5

95

5

5

2

3

3E-i-40 ;27502731E+40 P 99374547E-t-40 1 0000000E-t-34 1 gOOOOOOE+34 o 27 0000OOE+34 0390000ûOE+34 52 OQOOOOE+3

4

.55OOOOOOE+34 e

67

000000E-i-34 e 6800ûOOOE+34 85000000E-i-34 e 86OOOOOQE+34 0

1

O200000E+2j .1000û000E+35 11 8000ûOE+35 o 11 800000EC35 13700000E+35 o 14300000E735 o 14200000E+35 o 14800000E635 o 16000000E+35 e 16400000E-i.3S 17~k00000Ec35 .16900000E+3t; o 17’400000E+35 o 18200000E+35 18600000E+35 .19200000E+35 .20800000E+~5 *21700000E+35 .2 100OOOOE+~35 .2200OOOOE+35 .2190OOOOE+35 2 1400000E+35 .23100000E+35 .i 22000000E+35 .23OOOOOOE+35 e 25000000EC35 .25OOOOOOE+35 .240000OOE~35 24000000E+35 2 4000000E+3

5

.24000000E+35 .25 800000E+3S

.

26700000E+35 e 22700000E+35 225 0000OE+3

5

o 22 O0 0OOOE.t-3

5

.22000000E-t-35 .21200000E+35 2 1000000E-t-3S .20900000E+35 y 20200000E+35 o 18500000E+35 .178OOOOOE+35

.

185OOOOOE+35

.

17700000E+35

.

15900008E+35 .14800000E+35 .14600000€+35 o 136OOOOOE+35

- - -

e22000000E+35 o 20000000E+35 .2 1500000~4-35 e 19300000€+35 16600000E+35

i

i

- y 3

-

260000300005

310000300002

360000000300

ENTER

SUBROUTINES, PUSH START

1620

FGRTRAN SUBREJUTI

NES

FOR AUTO. D I VI DE

LCAD DATA /Y$= 4-00

1

4-005 Ns

a

Lt.

90

8 42

Lt

1-010

N Z I O

o

99934079E-00

1

a

99934076E-lIo

2

.99934078€-00

o

.99995928E-O0

1 *

99995937E40

2 e

99995932E-00

4-020 /vs*

o

99999763E-00

1 e

9999973OE-00

2 0

99999737E-00

O

99999373E-00

1

99999948E-00

" 2

.99999937E-00

a

99999955E-00

I

9999995

1

E-00

0 e

99999881 E-00

1 . e

99999307E-00

2

.99999881€-00

o

.99999770E-00

1

e

99999848E-00

+O30

/v=

$0 4-040 d.7 Y O +O60 N Ü 60 4-080 ivz @o

-

9 9 -

i r I 1 i

-

$5-

-

i j

i

t -

i

I

f

_c

-....___-...-I______ 4908LbOO +O02 NJ 4-040 N +O02 NE 7 . .

1

OOOOOOOE+00 Ml9 O 17591032E-oo I

.

17349421E-00 2 .î7331822€-00

3

17330477E-00

4

.17330388E-00

5

.17330381E-00

4

90 842

4

+oho

4 - 0 -1-002 +~20000000E+00 I) .26517856E-00 1 .26341775€-00 2 .26329833E-00

3

.26329123€-00

+o

40 4-002 +.~t0000000E+00 O .43&90k20E*-OO 2 43790456E-00

3

43

7

9007 2

E-

O O -t-OLcQ 4-002, +.600ûOQOOE~OO O .6 1765 068E-O0 1 i 6 1

7

2

4

1 6 3 € 4 0 2 .61721485E-00 3 .61721366E~-OO

4

.61721396E-00 1 e

437

96459E-00 4-040 TO02 +.800000OOE+00 O .80444676E*-OO 1 .80434512E-00 2 RO433962E-00

3

a 00434034E-00 0.1 6 3 0 , 4 3 8 o. J I B

-99

-

i

i

f

i

i

t

i

c.

i

0 *

OoooooOoE-gg

.5706609OE'E40 10270404E+41 0 -

13399177E+41

.15127297E+41 15627297E-t-41 .15127298E+41 .13399178E+41

.57

10270405E+41 066 1 O

1

E 4 0

.

O O O O O O O O E ~ ~ ~

.

OüOOOOOOE-99 1 3 6 1 13745E-i-40

.4

O

15

O81

EI-41

.

13282456Wtl

.

OOOOOOOOE-99

.

OOOOOO0OE-99

,

OOOOOûOOE-99 ,OOOOoOOûE-~g ,O0000000E-~g

ooooooooE-gg

.OOooooOo€-gg

.

OOOOOûOOE-99 .ûOû00000E-99 .85060GOOE+39

.

OOOOOOOOE-99 OOOOOOOOE-99 .O00000OOE-99 , OOOOOOOOE-~9

.

O O O O O O O OE-99 .OOOOOOOOE-99 .00000000E-99 e OOOOOOOOE-g9 .OOOOOOOOE-99 __.."_---- - --a.-- +o02 1-.100000OOE+00 +.~1OOOOOOOE+OO NB +.50000000~r00 44 O

.

OOOOOOOOE-Q9

.10608916E+41

,17276288Ecltl ,2'1165848E+Ltl .23

5

802 68E-i-41 .23080269E+41 .17276290E+41

.

OOOOOOOOE-99 .00OOOOOOE-99

.

1028045

1

E-t-41 .17044799E+41 3 1 nn 1 ~ 1 , 7 E + ! ; ? 22962394€+41 o 2

3

49692 9E-t.4 1 .22962325E+41 ,210012 9E-t-41 17O44801€+41 .10280453E+41 .0500OOOOE-99

.

O~OOO~OOE-99 .230a0268~1-~1 .21165849E+4l .10608917E+41

1

I ) L. I uu I &-TI L. 2

.

4

03

15

90QE+1tl .17042295E+41 .20999571E+41 .2 2 96 1

3

82E-t-41 "23491 WEI-41 .2099957 2E-t.41

.

170&!297E+41 .3031~908E+41 OOOOOOOOE-99

.

OûOOOOOOE-99

.

17045524E+41

-

,, Lt6752OOOEM

8

.2

099g55 4E+4 1 - * 2 1

01

91

O0E-i-39 .22960928E+41

-.

1

91

O 1

6OOE-k-9

.23491964E+41

..,,

i

7

448&OOE+3

9

22960930E+41 -.19102100EC39 .20999557E+41 2 1020000E+3 9 .17045528E+k1 46752000E+%3 o 10309790€+41 e 44099240E-1-40 .0000OOOOE-99 a 2296 7382E.t-41 7 i I0309787E+41 440992 1 OE+hO

302 ,100OOOOOE-f-00

*-I

000000OE-t-00 ,50000000E-t-00 ,

UOOOOOOOE-99

,5865

1875E-t.40

10647034€+41

l

14443495E+41

I

17410901€+41

19683854E+41

21

372422E-141

2

2

5

672

05

E&

1

23

34398?E+41

23767168Ei-41

23892168E+41

23767 î68E-i.41

23343990E-t-41

22567207E~41

2

1372424E-1-41

19683857E+41

17410904E+41

14443490Ec41

10647037~411

5865 1896~4-40

ooooooooE-gg

o

1 .00000000E-9~

.

OOOOOOOOE-99

,0000000OE-99

.

OOOOOOOOE-~9

*

ooooooooE-g9

OOOOOOOOE-99

*00000000€-9g

,ooooooooE-9g

;00000000E-99 ~OOOOOOOOE-99 .0000000QE-99

,OüûOOOûOE-99

.00000000E-99

,00000000E-99

* OOOOOOOOE-99

OO~OOOOOE-g9

.ooOoooooE-gg

,08000080E-99

.

OOOOOOOOE-9P 3

300ûOOOE+OQ

~000000E+OO 3QOOOOOE+OQ 3

.35lû’j’499E-00

I

* 3

4942744E-OO

b e

3493

5

168E-00

u

34934676E-00

+O19

4-002

+.

10000OOOE1-00 +.1OOOOOOBE+00 -f-,50000000E+00 - 0 .61 53435OE-t-40

.

1 1 IO4573E-t-41 o 14982324E-t-41 e 1

7

966948E3.41

.

2020?85 9E-t-41 .21833527E+41 e 22

938

15 0E-t-41

.

23607209E-t-41 .2391 1407E-t-41 .2?91 l407E-t-41 .23607209E+41 ' .22938150€+41 .21833527E+41 .20209860E+41 17966948E-t-41 14982324E-t-41

1 1

10&73E1-41 * 61534355E-t-40 00000000~-9g 1 1 O1

5

1 1 ~E-I-41 OO00000OE-~g

.

OOOOOOOOE-99 1 .60532405E+40 e

133

12070E-t-40 14907888E4-41

-.

2 8846OOOE+3

8

a 17905127E-t-41

-

.

2 8S3 gOOOE-t.3

8

2 O 1

5

8242 E-t-4 1

-.

22268000E-t-3

8

.21790257E+41

--.

167

11

000EI-38 .22901 836E+41

-.

1276Y~lOQE+38

-2357

67

87

E-t-4 1

-.

10041000E+38 .23886041E4-41 -.60@9dOOE+38 23 886041 E641 -,6û6~6OOûE-t-38 23576788E-f-41

-.

10043OQûE-t-38 .22901838E-t-41

-.

12768000E-t-38 2

17

9026 0E-t-4 1

-.

16722000E+38 2 O I

5

8244Et.4 I

-

.

22258ûOOE+38 .17905 129Et.41

-.

289430OOE-t-3

8

.14907889E+41 -.288445OOE+38 .60532417E+40

133

12 1 OOE-I-40

.5

1350OOOE+3

8

.11015119€+41

.5

134800OE+38 .O00OOOOOE-99 O

1

2 .35061282E-00

2-

.

35060939E-OO

a 352

183

O 1 E-O0 a3506093 8E-00

.

OOOOOOOOE-99 .00OOOOOOE-gg + OOOOOOOOE-99 .00000000E-99 ,,000000OOE-99 ;00000000E-99 ;00000000E-99 OOOOOOOOE-99 .00OOOOOOE-99 OOOOOOOOE-?g

.

00OOOOOOE-99 .00000000E-99

.

OOOOOOOOE-99 .OOOOOOOOE-99

.

OOOOOOOOE-99

.

0OOOOOOOE-99 .0000000OE-99 O O00000

0e-99

, . i

I

1

i

i

i

'1

t

-1

3

Q0000E-t-00 00000E-t-00

94475423E-OU

.94474628E-00

i.

94474634E-00

\

d . 2.

3.

9-

d-.

I $=-

I