Skip to content
Snippets Groups Projects
Commit 05f36cdb authored by s2006749's avatar s2006749
Browse files

slightly added debug comments

parent cbbbc520
No related branches found
No related tags found
1 merge request!1Adding ellip_utils
...@@ -220,7 +220,7 @@ contains ...@@ -220,7 +220,7 @@ contains
if (radius /= radius) then if (radius /= radius) then
write(*,*) "Got an error in grid check!" write(*,*) "Got an error in grid check!"
write(*,*) "point = ", point write(*,*) "Radius = ", radius, "point = ", point
endif endif
end subroutine end subroutine
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment