From 5ab0a159bc3e182929207cb1917e23c10c65df72 Mon Sep 17 00:00:00 2001
From: Lionel GUEZ <guez@lmd.ens.fr>
Date: Wed, 14 Jun 2023 14:22:24 +0200
Subject: [PATCH] Add title lines to `outside_points;csv`
---
Inst_eddies/Tests/examine_eddy.f90 | 2 ++
1 file changed, 2 insertions(+)
diff --git a/Inst_eddies/Tests/examine_eddy.f90 b/Inst_eddies/Tests/examine_eddy.f90
index f3828361..aa4ec170 100644
--- a/Inst_eddies/Tests/examine_eddy.f90
+++ b/Inst_eddies/Tests/examine_eddy.f90
@@ -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
--
GitLab