| line |
true |
false |
branch |
|
353
|
26 |
2 |
for (I=0; I<13; I++) { |
|
365
|
0 |
2 |
if (fabs(TSPAN) > 36525.0) *jstat=101; |
|
374
|
6 |
2 |
for (I=0; I<3; I++) { |
|
384
|
668 |
2 |
while (FB*TLEFT > 0.0) { |
|
387
|
666 |
2 |
if (FIRST) { |
|
391
|
1998 |
666 |
for (I=0; I<3; I++) { |
|
398
|
666 |
0 |
if (W != 0.0) { |
|
399
|
666 |
0 |
TS = DMIN(TSMAX,DMAX(TSMIN,TSC/W)); |
|
|
649 |
17 |
TS = DMIN(TSMAX,DMAX(TSMIN,TSC/W)); |
|
|
649 |
0 |
TS = DMIN(TSMAX,DMAX(TSMIN,TSC/W)); |
|
408
|
2 |
666 |
if (fabs(TS) > fabs(TLEFT)) TS=TLEFT; |
|
415
|
666 |
2 |
if (FIRST || fabs(T-TPEL)-AGEPEL >= TINY) { |
|
|
20 |
646 |
if (FIRST || fabs(T-TPEL)-AGEPEL >= TINY) { |
|
421
|
176 |
22 |
for (NP=1; NP<=8; NP++) { |
|
425
|
0 |
176 |
if (J == 1) { |
|
427
|
176 |
0 |
} else if (J != 0) { |
|
433
|
176 |
0 |
if (J != 0) goto ABORT; |
|
438
|
666 |
2 |
if (FIRST || fabs(T-TPMO)-AGEPMO >= TINY) { |
|
|
174 |
492 |
if (FIRST || fabs(T-TPMO)-AGEPMO >= TINY) { |
|
444
|
1408 |
176 |
for (NP=1; NP<=8; NP++) { |
|
448
|
1408 |
0 |
if (J != 0) goto ABORT; |
|
451
|
4224 |
1408 |
for (J=3; J<6; J++) { |
|
457
|
4224 |
1408 |
for (I=0; I<3; I++) { |
|
471
|
668 |
0 |
if (J != 0) goto ABORT; |
|
475
|
2004 |
668 |
for (I=0; I<3; I++) { |
|
484
|
2004 |
668 |
for (I=0; I<3; I++) { |
|
491
|
2004 |
668 |
for (I=0; I<3; I++) { |
|
506
|
6012 |
668 |
for (NP=1; NP<10; NP++) { |
|
509
|
5344 |
668 |
if (NP <= 8) { |
|
513
|
16032 |
5344 |
for (J=3; J<6; J++) { |
|
525
|
16032 |
5344 |
for (I=0; I<3; I++) { |
|
529
|
15 |
653 |
} else if (NE) { |
|
533
|
15 |
0 |
if (NP == 9) { |
|
537
|
45 |
15 |
for (I=0; I<3; I++) { |
|
547
|
0 |
0 |
for (I=0; I<3; I++) { |
|
554
|
5359 |
653 |
if (NP <= 8 || NE) { |
|
558
|
16077 |
5359 |
for (I=0; I<3; I++) { |
|
567
|
16077 |
5359 |
for (I=0; I<3; I++) { |
|
575
|
668 |
4691 |
if (NP == 3 && R < RNE) NE = 1; |
|
|
15 |
653 |
if (NP == 3 && R < RNE) NE = 1; |
|
578
|
5344 |
15 |
if ( ! (NE && NP == 3) ) { |
|
581
|
0 |
5344 |
if (R < COINC) { |
|
589
|
16032 |
5344 |
for (I=0; I<3; I++) { |
|
599
|
2004 |
668 |
for (I=0; I<3; I++) { |
|
611
|
648 |
20 |
if (fabs(RTN) >= AGEBEL || FB*TLEFT <= 0.0) { |
|
|
2 |
646 |
if (fabs(RTN) >= AGEBEL || FB*TLEFT <= 0.0) { |
|
619
|
22 |
0 |
if (J != 0) goto ABORT; |
|
622
|
66 |
22 |
for (I=0; I<3; I++) { |
|
633
|
22 |
0 |
if (J != 0) goto ABORT; |
|
644
|
26 |
2 |
for (I=0; I<13; I++) { |