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