-
Notifications
You must be signed in to change notification settings - Fork 0
/
5.5.2 Miscellaneous inverse secant.nb
4986 lines (4856 loc) · 241 KB
/
5.5.2 Miscellaneous inverse secant.nb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 7.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 241794, 4977]
NotebookOptionsPosition[ 234555, 4788]
NotebookOutlinePosition[ 236160, 4840]
CellTagsIndexPosition[ 236117, 4837]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[Cell[TextData[{
StyleBox["Rules for integrands of the form ",
FontFamily->"Arial"],
Cell[BoxData[
RowBox[{"u", " ",
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSech", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"]}]],
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193415004828687`*^9,
3.5193415113404875`*^9}, {3.5193513965602303`*^9,
3.519351397420232*^9}, {3.5194037839416766`*^9, 3.5194037847117205`*^9},
3.52105258275843*^9, 3.5210531741726685`*^9, {3.521057461672199*^9,
3.5210574760242243`*^9}, {3.521059881564049*^9, 3.521059886088057*^9}, {
3.5213902158895197`*^9, 3.521390217543123*^9}, {3.521390827878595*^9,
3.521390829376197*^9}, {3.5214688792561245`*^9, 3.521468879443325*^9}, {
3.523320201951167*^9, 3.523320202247567*^9}, {3.5288596764894824`*^9,
3.5288596768094826`*^9}, {3.529196266260353*^9,
3.5291962665099535`*^9}, {3.5291997050223927`*^9,
3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9,
3.529285215443486*^9}, {3.5295115356999426`*^9,
3.5295115433443794`*^9}, {3.529521412127842*^9, 3.529521414647986*^9}, {
3.529529429975619*^9, 3.529529432955224*^9}, 3.5340074894011116`*^9,
3.5415537711400824`*^9, {3.5415538454742126`*^9, 3.54155384951462*^9}, {
3.5417297197063265`*^9, 3.5417297252443366`*^9}, {3.546297494083555*^9,
3.5462974982435613`*^9}, {3.5462989134855423`*^9,
3.5462989153655453`*^9}, 3.548544146508506*^9, 3.5488738855784535`*^9, {
3.5505953688729563`*^9, 3.5505953726861744`*^9}, {3.550619508681926*^9,
3.5506195174954305`*^9}, {3.551326301250945*^9, 3.551326301841979*^9}, {
3.552150760656293*^9, 3.552150761436294*^9}, 3.5521509768882723`*^9, {
3.5521510341403728`*^9, 3.5521510486171985`*^9}, {3.5521511118909097`*^9,
3.5521511159313164`*^9}, 3.55215165895267*^9, 3.552151705315952*^9,
3.553532182175474*^9, {3.553559669357978*^9, 3.553559705888029*^9}, {
3.553560225618757*^9, 3.55356022752876*^9}, {3.5536175751912155`*^9,
3.5536175847212286`*^9}, 3.5860254133948617`*^9, 3.5861106634510365`*^9},
FontWeight->"Bold"]
}], "None"]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.4965234353062396`*^9, {3.5193214825316973`*^9, 3.5193214852617016`*^9}, {
3.523316399894187*^9, 3.5233164032341914`*^9}, {3.523318350558202*^9,
3.5233183516382036`*^9}, {3.536542725780803*^9, 3.536542725780803*^9}, {
3.5367764878952584`*^9, 3.5367764886452594`*^9}, {3.544322815209103*^9,
3.5443228192963104`*^9}, {3.5450662624913826`*^9, 3.545066292141424*^9}, {
3.545066402271579*^9, 3.5450664054415827`*^9}, {3.5450834884295015`*^9,
3.5450834895895033`*^9}, {3.5454961263762493`*^9,
3.5454961321462574`*^9}, {3.5454963863166127`*^9,
3.5454964580867133`*^9}, {3.545497046127537*^9, 3.545497046127537*^9}, {
3.5454971130676303`*^9, 3.545497136257663*^9}, 3.545610399977621*^9, {
3.546040778592962*^9, 3.546040778592962*^9}, {3.5461052065706367`*^9,
3.5461052249474688`*^9}, {3.546191339879622*^9, 3.5461913430596266`*^9}, {
3.5462141824067917`*^9, 3.5462142145768366`*^9}, {3.5462145455473003`*^9,
3.5462145601073203`*^9}, {3.5463149785974817`*^9,
3.5463149794195285`*^9}, {3.5488738437683954`*^9,
3.5488738699084315`*^9}, {3.5488890647645535`*^9, 3.548889080804576*^9}, {
3.5505951583099127`*^9, 3.5505951620351257`*^9}, {3.5758457803910656`*^9,
3.5758457938510847`*^9}, {3.5758458780912023`*^9,
3.5758458797312045`*^9}, {3.5758460250714083`*^9, 3.575846028691413*^9}, {
3.5758461031815176`*^9, 3.575846103681518*^9}, {3.5758463018517957`*^9,
3.5758463042917986`*^9}, {3.5758464155019546`*^9, 3.575846417191957*^9}, {
3.5758465224621043`*^9, 3.5758465297321143`*^9}, {3.586110883301344*^9,
3.5861109115613837`*^9}, {3.7163358960331335`*^9,
3.7163358960331335`*^9}, {3.7164161960094957`*^9,
3.7164161960094957`*^9}, {3.720227914856542*^9, 3.720227914856542*^9}, {
3.7203791987005405`*^9, 3.7203791987005405`*^9}, {3.721437034579689*^9,
3.721437034579689*^9}},
TextAlignment->Center,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{Cell[TextData[StyleBox["1.",
FontFamily->"Arial"]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193415004828687`*^9, 3.5193415113404875`*^9}, {
3.5193513965602303`*^9, 3.519351397420232*^9}, {3.5194037839416766`*^9,
3.5194037847117205`*^9}, 3.52105258275843*^9, 3.5210531741726685`*^9, {
3.521057461672199*^9, 3.5210574760242243`*^9}, {3.521059881564049*^9,
3.521059886088057*^9}, {3.5213902158895197`*^9, 3.521390217543123*^9}, {
3.521390827878595*^9, 3.521390829376197*^9}, {3.5214688792561245`*^9,
3.521468879443325*^9}, {3.523320201951167*^9, 3.523320202247567*^9}, {
3.5288596764894824`*^9, 3.5288596768094826`*^9}, {3.529196266260353*^9,
3.5291962665099535`*^9}, {3.5291997050223927`*^9,
3.5291997052563934`*^9}, {3.529201346457276*^9, 3.529201347252877*^9}, {
3.529285041073242*^9, 3.5292850412632427`*^9}, {3.529285215443486*^9,
3.529285215443486*^9}, {3.5295115356999426`*^9, 3.5295115433443794`*^9}, {
3.529521412127842*^9, 3.529521414647986*^9}, {3.529529429975619*^9,
3.529529432955224*^9}, 3.5340074894011116`*^9, 3.5415537711400824`*^9, {
3.5415538454742126`*^9, 3.54155384951462*^9}, {3.5417297197063265`*^9,
3.5417297252443366`*^9}, {3.546297494083555*^9, 3.5462974982435613`*^9}, {
3.5462989134855423`*^9, 3.5462989153655453`*^9}, 3.548544146508506*^9,
3.5488738855784535`*^9, {3.5505953688729563`*^9, 3.5505953726861744`*^9}, {
3.550619508681926*^9, 3.5506195174954305`*^9}, {3.551326301250945*^9,
3.551326301841979*^9}, {3.552150760656293*^9, 3.552150761436294*^9},
3.5521509768882723`*^9, {3.5521510341403728`*^9, 3.5521510486171985`*^9}, {
3.5521511118909097`*^9, 3.5521511159313164`*^9}, 3.55215165895267*^9,
3.552151705315952*^9, 3.553532182175474*^9, {3.553559669357978*^9,
3.5535596696079783`*^9}, {3.5535605644192314`*^9,
3.5535605652692327`*^9}, {3.5535610430699015`*^9, 3.5535610432399015`*^9},
3.5535614789405117`*^9, {3.5535616244807153`*^9, 3.5535616246407156`*^9}, {
3.5548523491989403`*^9, 3.5548523662029705`*^9}, 3.5548704576963353`*^9,
3.5549147309224463`*^9, {3.5854219518256783`*^9, 3.5854219520908785`*^9},
3.5859668596091146`*^9, {3.585967151232035*^9, 3.5859671555920415`*^9},
3.5861106684310436`*^9, 3.7202279406400166`*^9, {3.7203791861228213`*^9,
3.720379206276974*^9}, {3.7214370205898886`*^9, 3.7214370448162746`*^9},
3.7215350110523224`*^9},
FontSize->12,
FontWeight->"Bold"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t",
RowBox[{Cell[TextData[StyleBox["1:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9},
3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9,
3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9,
3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9,
3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9,
3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9},
3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9,
3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9,
3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9,
3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9,
3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9,
3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9,
3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9,
3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9},
3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9,
3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9},
3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9,
3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9},
3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9},
3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9,
3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9,
3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9,
3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9,
3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9},
3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9,
3.5508025179152374`*^9}, {3.5508029261175857`*^9,
3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9},
3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9,
3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
3.5535597570381007`*^9, 3.553559765608113*^9}, {3.5535598797782726`*^9,
3.553559883728278*^9}, 3.553560246298786*^9, 3.5536423545523815`*^9, {
3.5536429072031555`*^9, 3.553642907683156*^9}, 3.553650466313738*^9, {
3.5536508995343447`*^9, 3.5536509019143476`*^9}, {3.5536515754352913`*^9,
3.5536515785252953`*^9}, {3.5536519326657915`*^9, 3.5536519370057974`*^9},
3.553892196991847*^9, 3.721535246817807*^9, {3.7215355639759474`*^9,
3.721535589943433*^9}},
FontSize->12,
FontWeight->"Bold"],
Cell["Reference: G&R 2.821.2, CRC 445, A&S 4.4.62", "Subsubsection",
CellChangeTimes->{
3.479686820458373*^9, {3.490657960122612*^9, 3.49065796095366*^9},
3.4940010628073196`*^9, 3.4941723607787027`*^9, 3.4941724567488375`*^9,
3.494172696119172*^9, 3.4950807812494097`*^9, 3.4951361632971964`*^9,
3.495145391254423*^9, 3.495146210535063*^9, {3.5536521378660784`*^9,
3.553652139576081*^9}}],
Cell["Reference: G&R 2.821.1, CRC 446, A&S 4.4.61", "Subsubsection",
CellChangeTimes->{
3.479686820458373*^9, {3.490657960122612*^9, 3.49065796095366*^9},
3.4940010628073196`*^9, 3.4941723607787027`*^9, 3.4941724567488375`*^9,
3.494172696119172*^9, 3.4950807812494097`*^9, 3.4951361632971964`*^9,
3.495145391254423*^9, {3.553652145286089*^9, 3.5536521475160923`*^9}}],
Cell["\<\
Derivation: Integration by parts\
\>", "Subsubsection",
CellChangeTimes->{
3.4941724567488375`*^9, {3.7215355910544963`*^9, 3.721535612223707*^9}}],
Cell["Rule:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9},
3.4941724084687696`*^9, 3.4941724567488375`*^9, 3.494172783029294*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"\[Integral]",
RowBox[{
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox[
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], ")"}], " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}], "d"]}]}]}]}], "-",
RowBox[{"\[Integral]",
RowBox[{
FractionBox["1",
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], ")"}], " ",
SqrtBox[
RowBox[{"1", "-",
FractionBox["1",
SuperscriptBox[
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], ")"}], "2"]]}]]}]],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579732027807`*^9, 3.479658002474872*^9}, {
3.4796580599975853`*^9, 3.4796580609489536`*^9}, {3.479658295195784*^9,
3.47965829684816*^9}, 3.4796611938939075`*^9, 3.4796613924794593`*^9, {
3.479661443342597*^9, 3.479661446647349*^9}, {3.479661576554146*^9,
3.479661589302477*^9}, 3.479661847553824*^9, {3.4796622294729967`*^9,
3.4796622450654173`*^9}, {3.479686720424531*^9, 3.4796867204345455`*^9}, {
3.4796874646646957`*^9, 3.4796874745589232`*^9}, {3.492826573513727*^9,
3.492826578630536*^9}, {3.4928267070863624`*^9, 3.492826707460763*^9},
3.4928267903497095`*^9, {3.492829799151373*^9, 3.4928299617216005`*^9}, {
3.4940972077187414`*^9, 3.4940972347887793`*^9}, {3.49409966398218*^9,
3.494099664952181*^9}, {3.4940997156722527`*^9, 3.494099716112253*^9},
3.4941724567488375`*^9, {3.4941727384192314`*^9, 3.494172760679263*^9}, {
3.495078733546543*^9, 3.495078733546543*^9}, {3.4950807901794224`*^9,
3.4950807944994287`*^9}, {3.4951361077071185`*^9, 3.4951361077171183`*^9},
3.495136231147291*^9, {3.495145058771039*^9, 3.495145058771039*^9}, {
3.4951454273216867`*^9, 3.4951454329688964`*^9}, {3.495146022289532*^9,
3.495146022289532*^9}, 3.4951462291302958`*^9, {3.553651941005803*^9,
3.5536520497059546`*^9}, 3.5536521015960274`*^9, 3.5536521993961644`*^9, {
3.553652342716365*^9, 3.5536523493063745`*^9}, 3.553883631249855*^9, {
3.553892244741914*^9, 3.5538922892619762`*^9}, {3.553892359582075*^9,
3.5538923611320767`*^9}, {3.721535568498206*^9, 3.72153559688983*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}, 3.4941724567488375`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{"ArcSec", "[",
RowBox[{"c_", "+",
RowBox[{"d_.", "*", "x_"}]}], "]"}], ",", "x_Symbol"}], "]"}], " ", ":=",
"\n", " ",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "*",
RowBox[{
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], "]"}], "/", "d"}]}], " ", "-", " ",
"\[IndentingNewLine]", " ",
RowBox[{"Int", "[",
RowBox[{
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"1", "-",
RowBox[{"1", "/",
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "^", "2"}]}]}], "]"}]}],
")"}]}], ",", "x"}], "]"}]}], " ", "/;", "\n",
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"c", ",", "d"}], "}"}], ",", "x"}], "]"}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9,
3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
3.495078733546543*^9, 3.495078733546543*^9}, 3.4950807641093855`*^9, {
3.4951361077271185`*^9, 3.4951361077271185`*^9}, 3.4951361778072166`*^9, {
3.495145058771039*^9, 3.495145058771039*^9}, 3.4951453809584045`*^9, {
3.495146022289532*^9, 3.495146022289532*^9}, 3.495146222406684*^9, {
3.5536505014537873`*^9, 3.553650505363793*^9}, {3.5536522144861856`*^9,
3.5536522610962505`*^9}, 3.5538836835399284`*^9, {3.5538923163020144`*^9,
3.5538923297720327`*^9}, 3.553892402812135*^9, {3.7215355750255795`*^9,
3.7215356025691547`*^9}},
Background->GrayLevel[0.85]],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{"ArcCsc", "[",
RowBox[{"c_", "+",
RowBox[{"d_.", "*", "x_"}]}], "]"}], ",", "x_Symbol"}], "]"}], " ", ":=",
"\n", " ",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "*",
RowBox[{
RowBox[{"ArcCsc", "[",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], "]"}], "/", "d"}]}], " ", "+", " ",
"\[IndentingNewLine]", " ",
RowBox[{"Int", "[",
RowBox[{
RowBox[{"1", "/",
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "*",
RowBox[{"Sqrt", "[",
RowBox[{"1", "-",
RowBox[{"1", "/",
RowBox[{
RowBox[{"(",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}], ")"}], "^", "2"}]}]}], "]"}]}],
")"}]}], ",", "x"}], "]"}]}], " ", "/;", "\n",
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"c", ",", "d"}], "}"}], ",", "x"}], "]"}]}]}]], "Code",
CellChangeTimes->{{3.494097279728842*^9, 3.494097309778884*^9}, {
3.494099665582182*^9, 3.4940996672021847`*^9}, {3.4940997193022575`*^9,
3.494099719662258*^9}, 3.4941724567488375`*^9, 3.494172717389202*^9, {
3.495078733546543*^9, 3.495078733546543*^9}, 3.4950807641093855`*^9, {
3.4951361077271185`*^9, 3.4951361077271185`*^9}, 3.4951361778072166`*^9, {
3.495145058771039*^9, 3.495145058771039*^9}, 3.4951453809584045`*^9, {
3.495146022289532*^9, 3.495146022289532*^9}, 3.495146222406684*^9, {
3.5536505014537873`*^9, 3.553650505363793*^9}, {3.5536522144861856`*^9,
3.553652284186283*^9}, 3.5536523202663336`*^9, 3.5538836874699335`*^9, {
3.5538923188020177`*^9, 3.5538923344920397`*^9}, {3.5538924086721435`*^9,
3.5538924230321636`*^9}, {3.7215355782977667`*^9, 3.7215356083374853`*^9}},
Background->GrayLevel[0.85]],
Cell["", "Subsubsection",
CellDingbat->None,
CellChangeTimes->{3.4796643211106243`*^9, 3.4941724567488375`*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t",
RowBox[{Cell[TextData[StyleBox["2:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{"p", "\[Element]",
SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]],
"None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9},
3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9,
3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9,
3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9,
3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9,
3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9},
3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9,
3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9,
3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9,
3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9,
3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9,
3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9,
3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9,
3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9},
3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9,
3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9},
3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9,
3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9},
3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9},
3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9,
3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9,
3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9,
3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9,
3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9},
3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9,
3.5508025179152374`*^9}, {3.5508029261175857`*^9,
3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9},
3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9,
3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
3.5535606916294093`*^9, 3.553560715209442*^9}, {3.553560906999711*^9,
3.553560912889719*^9}, {3.5535610183798666`*^9, 3.5535610197098684`*^9}, {
3.553561508580553*^9, 3.553561525080576*^9}, {3.553561837431013*^9,
3.5535618536710362`*^9}, {3.5535619201511292`*^9,
3.5535619523911743`*^9}, {3.5535620174212656`*^9,
3.5535620246412754`*^9}, {3.5535620731313434`*^9, 3.553562091691369*^9}, {
3.5548437612135344`*^9, 3.554843779231566*^9}, {3.554845668486864*^9,
3.554845668486864*^9}, 3.554846587957676*^9, {3.554850324510604*^9,
3.554850326273407*^9}, {3.5548521325369625`*^9, 3.554852149989793*^9}, {
3.554855215956929*^9, 3.554855217206931*^9}, 3.554870463309656*^9, {
3.554870541980156*^9, 3.554870546187397*^9}, {3.55487079642971*^9,
3.5548707967357273`*^9}, 3.5549147684524984`*^9, {3.555012522055829*^9,
3.555012545235862*^9}, {3.585340556527484*^9, 3.585340566437498*^9},
3.5853741424798603`*^9, 3.585374309025753*^9, 3.585966860109115*^9, {
3.5859671075469723`*^9, 3.5859671131919804`*^9}, 3.5861106684510436`*^9,
3.720227949242509*^9, {3.72037940446731*^9, 3.7203794071014605`*^9}, {
3.7214375569915695`*^9, 3.7214375675301723`*^9}, 3.7215350206578712`*^9},
FontSize->12,
FontWeight->"Bold"],
Cell["Derivation: Integration by substitution", "Subsubsection",
CellChangeTimes->{{3.5548453965647893`*^9, 3.554845399419594*^9}, {
3.5548705769061537`*^9, 3.554870577589193*^9}, {3.5853741684071054`*^9,
3.5853741703103094`*^9}}],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{"p", "\[Element]",
SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.48070534977779*^9, {3.4928296953212276`*^9, 3.492829707041244*^9},
3.4941724084687696`*^9, 3.4941724567488375`*^9, {3.4941737492506466`*^9,
3.4941737506706486`*^9}, {3.494173966810951*^9, 3.494174007671008*^9}, {
3.4941741326011834`*^9, 3.4941741425911975`*^9}, {3.4941767936905165`*^9,
3.494176809630539*^9}, {3.4941773316412697`*^9, 3.494177333751273*^9}, {
3.4941891756608777`*^9, 3.494189178765283*^9}, {3.4942004775317707`*^9,
3.494200477881771*^9}, {3.554843813298024*^9, 3.554843813298024*^9}, {
3.554845673744074*^9, 3.554845673744074*^9}, {3.554870754078287*^9,
3.554870754078287*^9}, {3.555012525615834*^9, 3.555012525615834*^9}, {
3.585340571397505*^9, 3.585340571397505*^9}, 3.5853742369692264`*^9, {
3.5859671872870874`*^9, 3.5859671961246*^9}, {3.720379409344589*^9,
3.720379409344589*^9}}],
Cell[BoxData[
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
FractionBox["1", "d"]}]}], " ",
RowBox[{"Subst", "[",
RowBox[{
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[", "x", "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]", "x"}]}]}], ",", "x", ",",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}]}], "]"}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{{3.4796579734230976`*^9, 3.4796580026851745`*^9}, {
3.479658101347043*^9, 3.479658102348483*^9}, {3.4796582237129965`*^9,
3.4796582279090304`*^9}, {3.4796611944647284`*^9, 3.4796612203719807`*^9},
3.4796613933206687`*^9, {3.4796614761798143`*^9, 3.4796614777420607`*^9},
3.4796618658000607`*^9, {3.4796619856624146`*^9, 3.4796619866938972`*^9}, {
3.4796645712002354`*^9, 3.4796645805536847`*^9}, 3.4796646283424015`*^9, {
3.4796867206148047`*^9, 3.4796867206148047`*^9}, {3.479687667676613*^9,
3.479687667926973*^9}, 3.480705232098576*^9, {3.49400087421271*^9,
3.49400087421371*^9}, {3.494022456770984*^9, 3.4940224580430565`*^9}, {
3.494179204577314*^9, 3.4941792454181857`*^9}, {3.5548438228296413`*^9,
3.5548438799881415`*^9}, {3.5548439151370025`*^9, 3.554843915449003*^9}, {
3.5548454415728674`*^9, 3.5548454423996687`*^9}, {3.554845575046702*^9,
3.554845575826703*^9}, 3.554845643328821*^9, {3.5548464738746758`*^9,
3.5548465413759937`*^9}, {3.5548466459273777`*^9, 3.5548466842878447`*^9},
3.5548705598041754`*^9, 3.585340240067041*^9, 3.585362906443381*^9, {
3.5853741744131165`*^9, 3.5853742167515907`*^9}, {3.5859668608241167`*^9,
3.585966861304117*^9}, {3.5861106684610434`*^9, 3.5861106684610434`*^9}, {
3.7203794121797514`*^9, 3.720379414244869*^9}, {3.7214375682992163`*^9,
3.721437568778243*^9}, {3.7215350213709126`*^9, 3.7215350218269386`*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a_.", "+",
RowBox[{"b_.", "*",
RowBox[{"ArcSec", "[",
RowBox[{"c_", "+",
RowBox[{"d_.", "*", "x_"}]}], "]"}]}]}], ")"}], "^", "p_."}], ",",
"x_Symbol"}], "]"}], " ", ":=", "\n", " ",
RowBox[{
RowBox[{
RowBox[{"1", "/", "d"}], "*",
RowBox[{"Subst", "[",
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", "*",
RowBox[{"ArcSec", "[", "x", "]"}]}]}], ")"}], "^", "p"}], ",",
"x"}], "]"}], ",", "x", ",",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}]}], "]"}]}], " ", "/;", "\n",
RowBox[{
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",", "x"}], "]"}],
" ", "&&", " ",
RowBox[{"IGtQ", "[",
RowBox[{"p", ",", "0"}], "]"}]}]}]}]], "Code",
CellChangeTimes->{{3.49400087422171*^9, 3.4940008742237105`*^9}, {
3.494022461285242*^9, 3.4940224616042604`*^9}, 3.4941791634400415`*^9,
3.494179261657814*^9, {3.4943677210722713`*^9, 3.494367728102281*^9}, {
3.5534032187143383`*^9, 3.5534032241043453`*^9}, {3.5548439697526984`*^9,
3.5548439881139307`*^9}, {3.554844018487184*^9, 3.5548440289704027`*^9},
3.5548456756940775`*^9, {3.5548457527426124`*^9, 3.5548457557534175`*^9},
3.5548468489617343`*^9, {3.554846905060232*^9, 3.554846930753477*^9}, {
3.5548706448400393`*^9, 3.5548706515384226`*^9}, {3.5548707559643955`*^9,
3.5548707665480003`*^9}, 3.5548708080363736`*^9, {3.5550125288858385`*^9,
3.5550125515858707`*^9}, 3.585339948616633*^9, {3.5853405751775103`*^9,
3.5853405757375107`*^9}, 3.5853624205827007`*^9, 3.5853629142433915`*^9, {
3.585374269401683*^9, 3.585374276780496*^9}, 3.585422249536601*^9, {
3.585966861944118*^9, 3.585966862344118*^9}, {3.585967161917051*^9,
3.5859671735720673`*^9}, {3.5861106684710436`*^9, 3.586110668481044*^9},
3.7152875229787645`*^9, {3.7203794161209764`*^9, 3.720379419118148*^9}, {
3.721437569395279*^9, 3.7214375717874155`*^9}, {3.7215350225129776`*^9,
3.7215350229310017`*^9}},
Background->GrayLevel[0.85]],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a_.", "+",
RowBox[{"b_.", "*",
RowBox[{"ArcCsc", "[",
RowBox[{"c_", "+",
RowBox[{"d_.", "*", "x_"}]}], "]"}]}]}], ")"}], "^", "p_."}], ",",
"x_Symbol"}], "]"}], " ", ":=", "\n", " ",
RowBox[{
RowBox[{
RowBox[{"1", "/", "d"}], "*",
RowBox[{"Subst", "[",
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", "*",
RowBox[{"ArcCsc", "[", "x", "]"}]}]}], ")"}], "^", "p"}], ",",
"x"}], "]"}], ",", "x", ",",
RowBox[{"c", "+",
RowBox[{"d", "*", "x"}]}]}], "]"}]}], " ", "/;", "\n",
RowBox[{
RowBox[{"FreeQ", "[",
RowBox[{
RowBox[{"{",
RowBox[{"a", ",", "b", ",", "c", ",", "d"}], "}"}], ",", "x"}], "]"}],
" ", "&&", " ",
RowBox[{"IGtQ", "[",
RowBox[{"p", ",", "0"}], "]"}]}]}]}]], "Code",
CellChangeTimes->{{3.49400087422171*^9, 3.4940008742237105`*^9}, {
3.494022461285242*^9, 3.4940224616042604`*^9}, 3.4941791634400415`*^9,
3.494179261657814*^9, {3.4943677210722713`*^9, 3.494367728102281*^9}, {
3.5534032187143383`*^9, 3.5534032241043453`*^9}, {3.5548439697526984`*^9,
3.5548439881139307`*^9}, {3.554844018487184*^9, 3.5548440289704027`*^9},
3.5548456756940775`*^9, {3.5548457527426124`*^9, 3.5548457557534175`*^9},
3.5548468489617343`*^9, {3.554846905060232*^9, 3.554846930753477*^9}, {
3.5548706448400393`*^9, 3.5548706515384226`*^9}, {3.5548707559643955`*^9,
3.5548707665480003`*^9}, 3.5548708080363736`*^9, {3.5550125288858385`*^9,
3.5550125515858707`*^9}, 3.585339948616633*^9, {3.5853405751775103`*^9,
3.5853405757375107`*^9}, 3.5853624205827007`*^9, 3.5853629142433915`*^9, {
3.585374269401683*^9, 3.5853742856257114`*^9}, 3.5854222509718037`*^9, {
3.5859669116716895`*^9, 3.58596691216169*^9}, {3.5859671764570713`*^9,
3.585967181657079*^9}, {3.5861107031010923`*^9, 3.586110703111092*^9},
3.7152875229943647`*^9, {3.720379420942252*^9, 3.720379424638464*^9}, {
3.721437576027658*^9, 3.7214375869962854`*^9}, {3.72153502360104*^9,
3.72153502429908*^9}},
Background->GrayLevel[0.85]],
Cell["", "Subsubsection",
CellDingbat->None,
CellChangeTimes->{3.4796643211106243`*^9}]
}, Closed]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"\t",
RowBox[{Cell[TextData[StyleBox["U:",
FontFamily->"Arial",
FontColor->RGBColor[1, 0, 0]]], "None"], " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]", "x"}], " ",
StyleBox["when",
FontFamily->"Arial",
FontWeight->"Plain"],
StyleBox[" ",
FontFamily->"Arial",
FontWeight->"Plain"], Cell[TextData[Cell[BoxData[
RowBox[{"p", "\[NotElement]",
SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]]],
"None"]}]}]}]}]], "Subsubtitle",
CellDingbat->None,
CellChangeTimes->{
3.477935275784027*^9, {3.477935350060832*^9, 3.477935352384173*^9}, {
3.477935393803731*^9, 3.477935400102789*^9}, {3.477935515378547*^9,
3.47793552034569*^9}, 3.478120029940968*^9, {3.479318860690858*^9,
3.47931886615872*^9}, {3.4794185033278093`*^9, 3.479418503918659*^9},
3.4795122294117584`*^9, {3.479615913307893*^9, 3.4796159352794867`*^9},
3.4796160386581373`*^9, 3.4796867204045024`*^9, {3.4928025699585147`*^9,
3.492802570130115*^9}, 3.492822274480175*^9, 3.492825822242408*^9, {
3.4940970615585365`*^9, 3.494097062168537*^9}, {3.496441349250718*^9,
3.496441349830719*^9}, 3.4964414848609076`*^9, 3.496521708137803*^9, {
3.4965218981240697`*^9, 3.49652189838407*^9}, 3.4965229070755*^9,
3.519247079685614*^9, {3.5193208582062006`*^9, 3.5193208612170057`*^9},
3.5193325694253187`*^9, {3.5193422443984776`*^9, 3.5193422447260776`*^9},
3.5193424488212357`*^9, {3.5193434708254333`*^9, 3.519343473103037*^9}, {
3.5193435097631016`*^9, 3.51934353169674*^9}, {3.519345739319023*^9,
3.519345739599823*^9}, 3.5193462601259375`*^9, {3.5193475061060295`*^9,
3.5193475233908596`*^9}, {3.519351391880224*^9, 3.5193513931402254`*^9}, {
3.519403773021052*^9, 3.5194037798564425`*^9}, 3.5194106793250647`*^9, {
3.519537578341393*^9, 3.5195375792305946`*^9}, {3.5195376277778797`*^9,
3.51953767927357*^9}, {3.5197586260636144`*^9, 3.5197586260636144`*^9}, {
3.51978053295651*^9, 3.519780542862528*^9}, {3.5197806526087203`*^9,
3.5197806657595434`*^9}, {3.5197807490168896`*^9, 3.5197807642581167`*^9},
3.5197809004619555`*^9, {3.519782653514635*^9, 3.5197826623286505`*^9}, {
3.5200207810164795`*^9, 3.520020785046485*^9}, {3.5213126833374643`*^9,
3.5213126833374643`*^9}, {3.521328235411002*^9, 3.521328235411002*^9}, {
3.523315567893022*^9, 3.523315567893022*^9}, {3.5233157569332867`*^9,
3.5233157613032923`*^9}, {3.5323023198133526`*^9, 3.532302355723403*^9}, {
3.5323026417638035`*^9, 3.5323026417638035`*^9}, {3.5323026980138817`*^9,
3.5323026980138817`*^9}, {3.532636287104328*^9, 3.532636287104328*^9}, {
3.5330803686035347`*^9, 3.533080368863535*^9}, {3.533248909289961*^9,
3.5332489110299635`*^9}, {3.534962469565694*^9, 3.5349624910757236`*^9}, {
3.5349625224057674`*^9, 3.534962522655768*^9}, {3.534965265519608*^9,
3.534965265519608*^9}, {3.5349668288168063`*^9, 3.5349668292668066`*^9}, {
3.5349747358481646`*^9, 3.5349747358481646`*^9}, {3.534975457949176*^9,
3.534975457949176*^9}, {3.5368633963532934`*^9, 3.536863396571694*^9}, {
3.541644322511304*^9, 3.5416443577513533`*^9}, {3.5416458269234104`*^9,
3.541645839633428*^9}, {3.5416460312236967`*^9, 3.541646031483697*^9},
3.541646227783972*^9, {3.541647080335165*^9, 3.5416471077052035`*^9}, {
3.541648997607849*^9, 3.5416489978278494`*^9}, 3.541649088407976*^9, {
3.5417848711596775`*^9, 3.541784902429721*^9}, {3.541786145331461*^9,
3.5417861455914617`*^9}, {3.5417870037166634`*^9, 3.5417870039366636`*^9},
3.5462979620242105`*^9, {3.546298264094633*^9, 3.546298265344635*^9}, {
3.546299000235664*^9, 3.546299001505666*^9}, {3.546315119909564*^9,
3.5463151267659564`*^9}, {3.547227356319705*^9, 3.547227356319705*^9},
3.547918559331044*^9, {3.547918610170952*^9, 3.5479186304411116`*^9},
3.548537755517557*^9, 3.5485441629685287`*^9, 3.5485517520154133`*^9, {
3.5488740727887154`*^9, 3.5488740727887154`*^9}, {3.548874206618903*^9,
3.548874206808903*^9}, 3.548877100795455*^9, 3.550596464087599*^9, {
3.5505965767870445`*^9, 3.5505965767870445`*^9}, 3.5505966202465305`*^9, {
3.5506039138305197`*^9, 3.55060391400453*^9}, {3.5506040039986773`*^9,
3.550604005776779*^9}, {3.5506178888272758`*^9, 3.5506178900273447`*^9}, {
3.550770598144562*^9, 3.550770659629079*^9}, {3.5507707252908344`*^9,
3.5507707474461017`*^9}, 3.5507880023630266`*^9, {3.5508017696214375`*^9,
3.5508017788269644`*^9}, {3.5508018116158395`*^9, 3.5508018116158395`*^9},
3.5508018976437597`*^9, {3.5508021384015307`*^9, 3.550802155115487*^9}, {
3.5508022151019173`*^9, 3.5508022151019173`*^9}, {3.550802487106476*^9,
3.5508025179152374`*^9}, {3.5508029261175857`*^9,
3.5508029342300496`*^9}, {3.5521511708590136`*^9, 3.5521511712334137`*^9},
3.552151666269083*^9, {3.5535324250863676`*^9, 3.553532441643315*^9}, {
3.553532476791325*^9, 3.553532477502366*^9}, {3.5535325810722895`*^9,
3.5535325810722895`*^9}, {3.553534924419321*^9, 3.5535349316017323`*^9}, {
3.5535597570381007`*^9, 3.553559765608113*^9}, {3.553559900728302*^9,
3.55355990606831*^9}, 3.553560247968788*^9, {3.553560284118839*^9,
3.553560284268839*^9}, 3.553617750921461*^9, {3.5536177847415085`*^9,
3.553617790541517*^9}, 3.553618024341844*^9, 3.5536194761638765`*^9, {
3.553619522793942*^9, 3.553619534763959*^9}, {3.553620017114634*^9,
3.553620058754692*^9}, {3.553620107854761*^9, 3.553620107854761*^9}, {
3.5536201760248566`*^9, 3.553620176454857*^9}, {3.5536202411749477`*^9,
3.553620244394952*^9}, 3.5536208500158*^9, {3.5536209236859035`*^9,
3.5536209236859035`*^9}, {3.553621329336471*^9, 3.553621329526471*^9},
3.553622842418589*^9, 3.553623031478854*^9, {3.5541351824384127`*^9,
3.554135207637854*^9}, {3.554135501657794*^9, 3.554135501860594*^9}, {
3.5541401948572173`*^9, 3.554140195075618*^9}, {3.5541402752753587`*^9,
3.554140280594968*^9}, 3.5541623849245358`*^9, {3.5544855401492753`*^9,
3.5544855441492805`*^9}, {3.555811642936221*^9, 3.555811643346221*^9},
3.555814044809583*^9, 3.55586319799642*^9, {3.5558634529632673`*^9,
3.555863453540468*^9}, {3.555873211355882*^9, 3.5558732180658913`*^9}, {
3.5559585212360563`*^9, 3.555958557616107*^9}, {3.555962790172033*^9,
3.555962814752067*^9}, 3.556298486290805*^9, 3.585967214764627*^9,
3.5861106684910436`*^9, {3.5864566891342793`*^9, 3.5864566891342793`*^9}, {
3.7192063805965543`*^9, 3.719206380986576*^9}, 3.720227951514639*^9, {
3.7203794266785803`*^9, 3.7203794266795807`*^9}, 3.720379465146781*^9,
3.7214376051453238`*^9, 3.721535026626213*^9},
FontSize->12,
FontWeight->"Bold"],
Cell[TextData[{
"Rule: If ",
Cell[BoxData[
RowBox[{"p", "\[NotElement]",
SuperscriptBox["\[DoubleStruckCapitalZ]", "+"]}]]],
", then"
}], "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9}, {
3.4807032170510798`*^9, 3.480703219724925*^9}, {3.480703363181205*^9,
3.480703382168507*^9}, 3.480703460921749*^9, {3.480705327535808*^9,
3.480705327856269*^9}, {3.492923482510395*^9, 3.4929235301528788`*^9}, {
3.492923560276532*^9, 3.4929235623513355`*^9}, {3.4929245188358154`*^9,
3.4929245675391006`*^9}, {3.4929828355013185`*^9, 3.492982837903723*^9}, {
3.493165951941674*^9, 3.493165958321683*^9}, 3.4931660117517576`*^9, {
3.493252219687742*^9, 3.493252219687742*^9}, {3.4935813186420355`*^9,
3.493581344402072*^9}, {3.4940220183729095`*^9, 3.4940220212800756`*^9}, {
3.553620890665857*^9, 3.553620890665857*^9}, {3.554135223683772*^9,
3.554135223683772*^9}, {3.55414034438348*^9, 3.5541403446642804`*^9}, {
3.554485541739278*^9, 3.554485541739278*^9}, {3.555873277095974*^9,
3.555873277095974*^9}, {3.555958583216143*^9, 3.555958583216143*^9}, {
3.555962845912111*^9, 3.555962845912111*^9}, {3.7203794288427043`*^9,
3.7203794288427043`*^9}}],
Cell[BoxData[
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]",
RowBox[{"x", " ", "\[LongRightArrow]", " ",
RowBox[{"\[Integral]",
RowBox[{
SuperscriptBox[
RowBox[{"(",
RowBox[{"a", "+",
RowBox[{"b", " ",
RowBox[{"ArcSec", "[",
RowBox[{"c", "+",
RowBox[{"d", " ", "x"}]}], "]"}]}]}], ")"}], "p"],
RowBox[{"\[DifferentialD]", "x"}]}]}]}]}]}]}]], "Subsubtitle",
CellChangeTimes->{{3.493166154681958*^9, 3.4931662030820255`*^9},
3.4931666207326107`*^9, {3.4932522463481894`*^9, 3.49325228099585*^9}, {
3.4933158052693357`*^9, 3.4933158328693743`*^9}, {3.4933190308138514`*^9,
3.493319134053996*^9}, {3.4933192438441496`*^9, 3.4933192445541506`*^9}, {
3.4933193363142796`*^9, 3.4933193414042864`*^9}, {3.493412534339759*^9,
3.493412536469762*^9}, {3.493789994101406*^9, 3.493790017041438*^9}, {
3.4937903432618947`*^9, 3.4937903499119043`*^9}, {3.493791019842842*^9,
3.4937910517128863`*^9}, 3.493791106992964*^9, 3.49379132604327*^9, {
3.4937915274235525`*^9, 3.493791535933564*^9}, {3.4937916827437696`*^9,
3.4937916869037757`*^9}, {3.494000871747569*^9, 3.4940008717505693`*^9}, {
3.554134918375309*^9, 3.554134979953831*^9}, {3.5541351124444094`*^9,
3.5541351206638794`*^9}, 3.554140366644719*^9, {3.554485491439207*^9,
3.554485492939209*^9}, {3.5558636303979793`*^9, 3.555863635826789*^9}, {
3.555866903741579*^9, 3.5558669058296986`*^9}, {3.555958592676156*^9,
3.5559585942461586`*^9}, {3.555962805112054*^9, 3.555962807082056*^9}, {
3.556298487010806*^9, 3.556298487510807*^9}, {3.5859673112422667`*^9,
3.5859673133272696`*^9}, {3.5861106685010433`*^9,
3.5861106685110435`*^9}, {3.720379431811874*^9, 3.720379433821989*^9}, {
3.721437605801361*^9, 3.721437606378394*^9}, {3.721535028586325*^9,
3.721535029002349*^9}},
TextAlignment->Center,
FontSize->12,
FontWeight->"Bold"],
Cell["Program code:", "Subsubsection",
CellDingbat->"\[FilledSmallSquare]",
CellChangeTimes->{{3.4794189093216*^9, 3.479418932274605*^9}, {
3.479418981395237*^9, 3.4794189822564754`*^9}, {3.4794192068193808`*^9,
3.4794192077607346`*^9}, 3.479420089138093*^9, {3.479420130978256*^9,
3.4794201410627565`*^9}, {3.479420560345656*^9, 3.479420578171288*^9}, {
3.479420683943381*^9, 3.4794206847645617`*^9}, {3.4794210347678413`*^9,
3.4794210503903055`*^9}, 3.4803613662913427`*^9, {3.480361406058525*^9,
3.48036141974821*^9}, {3.4803614672865667`*^9, 3.480361474717252*^9},
3.4807050675119123`*^9, {3.492804314166378*^9, 3.4928043441496305`*^9}, {
3.4928044532166224`*^9, 3.492804453513023*^9}, {3.492805162266266*^9,
3.492805165713872*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"Int", "[",
RowBox[{
RowBox[{