# HG changeset patch # User David Bateman # Date 1206194381 -3600 # Node ID 205e43d9d9da89a3841c9e669969aa4f5b7d2a10 # Parent 431f3788f5c4f02f7e13473117d92987111f5e47 Remove reference to dlartv diff --git a/libcruft/ChangeLog b/libcruft/ChangeLog --- a/libcruft/ChangeLog +++ b/libcruft/ChangeLog @@ -1,3 +1,7 @@ +2008-03-22 David Bateman + + * qrupdate/dch1up.f: Remove unused external reference to dlartv. + 2008-03-18 John W. Eaton * qrupdate/zqrqhv.f (zqrqhv): Call xzdotc instead of zdotc. diff --git a/libcruft/qrupdate/dch1up.f b/libcruft/qrupdate/dch1up.f --- a/libcruft/qrupdate/dch1up.f +++ b/libcruft/qrupdate/dch1up.f @@ -37,7 +37,7 @@ integer n double precision R(n,n),u(n) double precision w(n) - external dlartg,dlartv + external dlartg double precision rr,ui,t integer i,j