Skip to content
Snippets Groups Projects
Commit 5ab0a159 authored by Lionel GUEZ's avatar Lionel GUEZ
Browse files

Add title lines to `outside_points;csv`

parent e2f6931a
No related branches found
No related tags found
No related merge requests found
......@@ -195,6 +195,8 @@ program examine_eddy
call new_unit(unit)
open(unit, file = "outside_points.csv", status = "replace", action = "write")
write(unit, fmt = *) '"degrees east" "degrees north"'
write(unit, fmt = *) "longitude latitude"
do i = 1, n1 + n2
write(unit, fmt = *) outside_points(:, i) * rad_to_deg
......
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