Origin for each line in Hypergeometry_and_MeijerG.red from check-in 5f892713c3:

5f892713c3 2021-03-03 trnsz@pobox.c: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 trnsz@pobox.c: %  HYPERGEOMETRY
5f892713c3 2021-03-03 trnsz@pobox.c: %       &
5f892713c3 2021-03-03 trnsz@pobox.c: %    MEIJERG
5f892713c3 2021-03-03 trnsz@pobox.c: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Specify blue for echoed input
5f892713c3 2021-03-03 trnsz@pobox.c: color("Blue");
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Turn on fancy output
5f892713c3 2021-03-03 trnsz@pobox.c: fancy_output;
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Turn input echo on
5f892713c3 2021-03-03 trnsz@pobox.c: on echo;
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Load special functions 2
5f892713c3 2021-03-03 trnsz@pobox.c: load_package specfn2$
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Load generalized hypergeometric package
5f892713c3 2021-03-03 trnsz@pobox.c: load_package ghyper$
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Hypergeometric function
5f892713c3 2021-03-03 trnsz@pobox.c: hypergeometric({1/2,1},{2},z);
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Load meijerg package
5f892713c3 2021-03-03 trnsz@pobox.c: load_package meijerg$
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % MeijerG function
5f892713c3 2021-03-03 trnsz@pobox.c: MeijerG({{}},{{5/4},1},x^2/2);
5f892713c3 2021-03-03 trnsz@pobox.c: 
5f892713c3 2021-03-03 trnsz@pobox.c: % Turn off echo
5f892713c3 2021-03-03 trnsz@pobox.c: off echo;

iCAS Bundled REDUCE Scripts
Homepage | GitHub Mirror | SourceHut Mirror | NotABug Mirror | Chisel Mirror | Chisel RSS ]