From 950b128d17fdabf9e5bc717af47ae439e7430772 Mon Sep 17 00:00:00 2001
From: s2006749 <s2006749@ed.ac.uk>
Date: Mon, 4 Nov 2024 12:02:50 +0000
Subject: [PATCH] added sample rate to body csvs
---
src/xcompact3d.f90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/xcompact3d.f90 b/src/xcompact3d.f90
index b96b537e..96055fa1 100644
--- a/src/xcompact3d.f90
+++ b/src/xcompact3d.f90
@@ -185,7 +185,7 @@ program xcompact3d
enddo
- if (nrank==0) then
+ if ((nrank==0).and.(mod(itime,ilist)==0)) then
do i = 1,nbody
write(11+i ,*) t, position(i,1), position(i,2), position(i,3), orientation(i,1), orientation(i,2), orientation(i,3), orientation(i,4), linearVelocity(i,1), linearVelocity(i,2), linearVelocity(i,3), angularVelocity(i,2), angularVelocity(i,3), angularVelocity(i,4), linearForce(i,1), linearForce(i,2), linearForce(i,3), torque(i,1), torque(i,2), torque(i,3)
flush(11+i)
--
GitLab