--- a/scripts/finance/pv.m	Tue Jan 18 19:57:13 2000 +0000
+++ b/scripts/finance/pv.m	Wed Jan 19 06:59:23 2000 +0000
@@ -37,14 +37,14 @@
 function v = pv (r, n, p, l, m)
 
   if ((nargin < 3) || (nargin > 5))
-    usage ("pv (r, n, p [, l] [, method])");
+    usage ("pv (r, n, p, l, method)");
   endif
 
-  if !(is_scalar (r) && (r > -1))
+  if (! (is_scalar (r) && (r > -1)))
     error ("pv:  r must be a scalar > -1");
-  elseif !(is_scalar (n) && (n > 0))
+  elseif (! (is_scalar (n) && (n > 0)))
     error ("pv:  n must be a positive scalar");
-  elseif !is_scalar (p)
+  elseif (! is_scalar (p))
     error ("pv:  p must be a scalar.");
   endif
 
@@ -56,19 +56,19 @@
 
   if (nargin > 3)
     if (nargin == 5)
-      if !isstr (m)
+      if (! isstr (m))
         error ("pv:  `method' must be a string");
       endif
-    elseif isstr (l)
+    elseif (isstr (l))
       m = l;
       l = 0;
     else
       m = "e";
     endif
-    if strcmp (m, "b")
+    if (strcmp (m, "b"))
       v = v * (1 + r);
     endif
-    if is_scalar (l)
+    if (is_scalar (l))
       v = v + pvl (r, n, l);
     else
       error ("pv:  l must be a scalar");