5f892713c3 2021-03-03 1: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 2: % HYPERGEOMETRY
5f892713c3 2021-03-03 3: % &
5f892713c3 2021-03-03 4: % MEIJERG
5f892713c3 2021-03-03 5: %%%%%%%%%%%%%%%%%%%%%
5f892713c3 2021-03-03 6:
5f892713c3 2021-03-03 7: % Specify blue for echoed input
5f892713c3 2021-03-03 8: color("Blue");
5f892713c3 2021-03-03 9:
5f892713c3 2021-03-03 10: % Turn on fancy output
5f892713c3 2021-03-03 11: fancy_output;
5f892713c3 2021-03-03 12:
5f892713c3 2021-03-03 13: % Turn input echo on
5f892713c3 2021-03-03 14: on echo;
5f892713c3 2021-03-03 15:
5f892713c3 2021-03-03 16: % Load special functions 2
5f892713c3 2021-03-03 17: load_package specfn2$
5f892713c3 2021-03-03 18:
5f892713c3 2021-03-03 19: % Load generalized hypergeometric package
5f892713c3 2021-03-03 20: load_package ghyper$
5f892713c3 2021-03-03 21:
5f892713c3 2021-03-03 22: % Hypergeometric function
5f892713c3 2021-03-03 23: hypergeometric({1/2,1},{2},z);
5f892713c3 2021-03-03 24:
5f892713c3 2021-03-03 25: % Load meijerg package
5f892713c3 2021-03-03 26: load_package meijerg$
5f892713c3 2021-03-03 27:
5f892713c3 2021-03-03 28: % MeijerG function
5f892713c3 2021-03-03 29: MeijerG({{}},{{5/4},1},x^2/2);
5f892713c3 2021-03-03 30:
5f892713c3 2021-03-03 31: % Turn off echo
5f892713c3 2021-03-03 32: off echo;