First one is just typo.
"itrcer" at line 33
Code: Select all
integer :: i, ifield, igrid, itrcer, itrc, ng, nline, status
Code: Select all
integer :: i, ifield, igrid, itracer, itrc, ng, nline, status
This should be replaced by "END IF" to match "IF" at line 373.
Thank you.
Hajoon