From 119899f104c4e1c0aa4ba649c0cb3d97d8751be3 Mon Sep 17 00:00:00 2001 From: Edoardo Apra Date: Thu, 22 Oct 2015 05:29:56 +0000 Subject: [PATCH] missed one blas file --- src/util/GNUmakefile | 2 +- src/util/{dfill.f => dfill.F} | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) rename src/util/{dfill.f => dfill.F} (89%) diff --git a/src/util/GNUmakefile b/src/util/GNUmakefile index a87a903b06..991ae2a657 100644 --- a/src/util/GNUmakefile +++ b/src/util/GNUmakefile @@ -234,7 +234,7 @@ endif USES_BLAS = util.fh ga_it_lsolve.F ga_maxelt.F ga_mix.F ga_iter_diag.F \ ga_orthog.F dabsmax.F ga_normf.F corr_mk_ref.F ga_it2.F ga_lkain_ext.F util_file_name.F dgefa.f util_patch_test.F stpr_sjacobi.F util_dgeev.F \ - util_test_cholesky.F + util_test_cholesky.F dfill.F ga_lkain_2cpl3_ext.F ga_it2.F ifdef SPEECH LIB_DEFINES += -DSPEECH diff --git a/src/util/dfill.f b/src/util/dfill.F similarity index 89% rename from src/util/dfill.f rename to src/util/dfill.F index 4561550632..8b605f9469 100644 --- a/src/util/dfill.f +++ b/src/util/dfill.F @@ -5,7 +5,7 @@ C> The DCOPY call that implements this routine is the preferred C> initialization mechanism for performance reasons. C> subroutine dfill(n,val,a,ia) -C$Id$ +C$Id: dfill.f 26932 2015-03-09 23:07:47Z d3y133 $ implicit none integer n, ia double precision val, a(*)