search

ivan-pi / pdecheb

Chebyshev Polynomial Software for Elliptic-Parabolic Systems of PDEs
2 stars 0 forks source link

Out of bounds access in CHINTR #2

Closed ivan-pi closed 1 year ago

ivan-pi commented 1 year ago

See run: https://github.com/ivan-pi/pdecheb/actions/runs/4349430829

When runtime checks are turned on with -fcheck=all, we get an out of bounds access at the following line:

https://github.com/ivan-pi/pdecheb/blob/f4294351471375835c79cbfbe508eb8e2f1b39b0/pdecheb/chintr.f#L95

At line 95 of file /home/runner/work/pdecheb/pdecheb/pdecheb/chintr.f
 TEST PROBLEM 1
 ***********
 POLY OF DEGREE =   2 NO OF ELEMENTS =   20
Fortran runtime error: Index '0' of dimension 1 of array 'xp' below lower bound of 1

Error termination. Backtrace:
#0  0x7faf8482dad0 in ???
#1  0x7faf8482e649 in ???
#2  0x7faf8482ec46 in ???
#3  0x55d0fb8a71ae in chintr_
    at /home/runner/work/pdecheb/pdecheb/pdecheb/chintr.f:95
#4  0x55d0fb8a5297 in pdechb_
    at /home/runner/work/pdecheb/pdecheb/pdecheb/pdechb.f:67
#5  0x55d0fb8adc18 in ddastp_
    at /home/runner/work/pdecheb/pdecheb/ddassl.f:2417
#6  0x55d0fb8b1a67 in ddassl_
    at /home/runner/work/pdecheb/pdecheb/ddassl.f:[13](https://github.com/ivan-pi/pdecheb/actions/runs/4349430829/jobs/7599092007#step:7:14)[22](https://github.com/ivan-pi/pdecheb/actions/runs/4349430829/jobs/7599092007#step:7:23)
#7  0x55d0fb89f676 in MAIN__
    at /home/runner/work/pdecheb/pdecheb/examples/example1.f:55
#8  0x55d0fb89faba in main
    at /home/runner/work/pdecheb/pdecheb/examples/example1.f:78
Error: Process completed with exit code 2.