Line 71 is likely wrong, too, you likely meant: do k=grd%zs,grd%ze
On 18 January 2018 at 21:59, Lisandro Dalcin <[email protected]> wrote: > On 18 January 2018 at 18:56, Aurelien Ponte <[email protected]> wrote: >> The code is found here: >> https://github.com/apatlpo/qgsolver/tree/fwrapping/qgsolver > > Your code is not valid Fortran, you cannot use brackets [] for > indexing in lines 80-90, you have to use parentheses (). > > -- > Lisandro Dalcin > ============ > Research Scientist > Computer, Electrical and Mathematical Sciences & Engineering (CEMSE) > Extreme Computing Research Center (ECRC) > King Abdullah University of Science and Technology (KAUST) > http://ecrc.kaust.edu.sa/ > > 4700 King Abdullah University of Science and Technology > al-Khawarizmi Bldg (Bldg 1), Office # 0109 > Thuwal 23955-6900, Kingdom of Saudi Arabia > http://www.kaust.edu.sa > > Office Phone: +966 12 808-0459 -- Lisandro Dalcin ============ Research Scientist Computer, Electrical and Mathematical Sciences & Engineering (CEMSE) Extreme Computing Research Center (ECRC) King Abdullah University of Science and Technology (KAUST) http://ecrc.kaust.edu.sa/ 4700 King Abdullah University of Science and Technology al-Khawarizmi Bldg (Bldg 1), Office # 0109 Thuwal 23955-6900, Kingdom of Saudi Arabia http://www.kaust.edu.sa Office Phone: +966 12 808-0459
