From 505f58ca07891688798899e106a7d3895368838c Mon Sep 17 00:00:00 2001
From: Uwe Schulzweida <uwe.schulzweida@mpimet.mpg.de>
Date: Mon, 9 Jul 2018 11:23:57 +0200
Subject: [PATCH] Remove unused variable len.

---
 src/fieldccplx.cc | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/fieldccplx.cc b/src/fieldccplx.cc
index 5b5d8814d..044561d40 100644
--- a/src/fieldccplx.cc
+++ b/src/fieldccplx.cc
@@ -30,7 +30,6 @@ farcmulcplx(Field *field, const double rconst[2])
   if (nwpv != 2) nwpv = 1;
 
   size_t gridsize = gridInqSize(grid);
-  size_t len = nwpv * gridInqSize(grid);
 
   // z1 x z2 = (x1x2 - y1y2) + i(x1y2 + x2y1)
   for (size_t i = 0; i < gridsize; i++)
@@ -54,7 +53,6 @@ farcdivcplx(Field *field, const double rconst[2])
   if (nwpv != 2) nwpv = 1;
 
   size_t gridsize = gridInqSize(grid);
-  size_t len = nwpv * gridInqSize(grid);
 
   // z1 / z2 = (x1x2 + y1y2) / (x2x2 + y2y2) + i (y1x2 - x1y2) / (x2x2 + y2y2)
   for (size_t i = 0; i < gridsize; i++)
@@ -79,7 +77,6 @@ farcaddcplx(Field *field, const double rconst[2])
   if (nwpv != 2) nwpv = 1;
 
   size_t gridsize = gridInqSize(grid);
-  size_t len = nwpv * gridInqSize(grid);
 
   for (size_t i = 0; i < gridsize; i++)
     {
@@ -100,7 +97,6 @@ farcsubcplx(Field *field, const double rconst[2])
   if (nwpv != 2) nwpv = 1;
 
   size_t gridsize = gridInqSize(grid);
-  size_t len = nwpv * gridInqSize(grid);
 
   for (size_t i = 0; i < gridsize; i++)
     {
-- 
GitLab