From 6ebbf1115af0faa02a1dfc85cd4ba1b9bad94fdb Mon Sep 17 00:00:00 2001
From: Antoine Cyril David Hoffmann <ahoffman@spcpc606.epfl.ch>
Date: Wed, 23 Jun 2021 09:27:57 +0200
Subject: [PATCH] Added hd coeff in the params writing
---
src/model_mod.F90 | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/src/model_mod.F90 b/src/model_mod.F90
index 4c9e298c..83f6caba 100644
--- a/src/model_mod.F90
+++ b/src/model_mod.F90
@@ -97,10 +97,11 @@ CONTAINS
INTEGER, INTENT(in) :: fidres
CHARACTER(len=256), INTENT(in) :: str
CALL attach(fidres, TRIM(str), "CO", CO)
- CALL attach(fidres, TRIM(str), "CLOS", CLOS)
+ CALL attach(fidres, TRIM(str), "CLOS", CLOS)
CALL attach(fidres, TRIM(str), "KERN", KERN)
CALL attach(fidres, TRIM(str), "NON_LIN", NON_LIN)
CALL attach(fidres, TRIM(str), "nu", nu)
+ CALL attach(fidres, TRIM(str), "mu", mu)
CALL attach(fidres, TRIM(str), "tau_e", tau_e)
CALL attach(fidres, TRIM(str), "tau_i", tau_i)
CALL attach(fidres, TRIM(str), "sigma_e", sigma_e)
--
GitLab