From eefedc870735c9c8e1681fa25c72642dd4edd3dd Mon Sep 17 00:00:00 2001
From: Antoine Hoffmann <antoine.hoffmann@epfl.ch>
Date: Fri, 16 Jun 2023 11:23:29 +0200
Subject: [PATCH] remove useless FM call
---
src/CLA_mod.F90 | 1 -
1 file changed, 1 deletion(-)
diff --git a/src/CLA_mod.F90 b/src/CLA_mod.F90
index 68532d53..0489ed96 100644
--- a/src/CLA_mod.F90
+++ b/src/CLA_mod.F90
@@ -5,7 +5,6 @@ module CLA
! closure
USE prec_const
USE parallel
- USE FMZM ! For factorial
implicit none
! local variables for DLRA and SVD
COMPLEX(xp), DIMENSION(:,:), ALLOCATABLE :: A_buff,Bf,Br ! buffer and full/reduced rebuilt matrices
--
GitLab