aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/vasp/source/ops_flt.cpp
diff options
context:
space:
mode:
authorThomas Grill <xovo@users.sourceforge.net>2003-03-15 04:35:48 +0000
committerThomas Grill <xovo@users.sourceforge.net>2003-03-15 04:35:48 +0000
commitbc6f43fbe1b22b1c2c63a32372126e0eaaaa08b0 (patch)
tree030f3fe84055ef64ac92aeebf10d3414e6eff14b /externals/grill/vasp/source/ops_flt.cpp
parent8ff848cb30edff3c477beb375a23e5c400d47d91 (diff)
""
svn path=/trunk/; revision=475
Diffstat (limited to 'externals/grill/vasp/source/ops_flt.cpp')
-rw-r--r--externals/grill/vasp/source/ops_flt.cpp13
1 files changed, 3 insertions, 10 deletions
diff --git a/externals/grill/vasp/source/ops_flt.cpp b/externals/grill/vasp/source/ops_flt.cpp
index f92f585e..deecc5ff 100644
--- a/externals/grill/vasp/source/ops_flt.cpp
+++ b/externals/grill/vasp/source/ops_flt.cpp
@@ -149,10 +149,7 @@ BL VecOp::d_int(OpParam &p)
register S d = p.intdif.carry;
register I i;
- _D_LOOP(i,p.frames)
- *p.rddt = (d += *p.rsdt);
- p.rsdt += p.rss,p.rddt += p.rds;
- _E_LOOP
+ _DE_LOOP(i,p.frames, ( *p.rddt = (d += *p.rsdt), p.rsdt += p.rss,p.rddt += p.rds ) )
p.intdif.carry = d;
return true;
}
@@ -168,13 +165,9 @@ BL VecOp::d_dif(OpParam &p)
if(p.revdir)
post("%s - reversed operation direction due to overlap: opposite sample delay",p.opname);
- register S d = p.intdif.carry;
+ register S d = p.intdif.carry,d1;
register I i;
- _D_LOOP(i,p.frames)
- register S d1 = *p.rsdt;
- *p.rddt = d1-d,d = d1;
- p.rsdt += p.rss,p.rddt += p.rds;
- _E_LOOP
+ _DE_LOOP(i,p.frames, ( d1 = *p.rsdt, *p.rddt = d1-d,d = d1, p.rsdt += p.rss,p.rddt += p.rds ) )
p.intdif.carry = d;
return true;
}