Mercurial > forge

changeset 9693:ae1a6c55972e octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
control-devel: quicksave draft code
author paramaniac
date Wed, 14 Mar 2012 10:14:06 +0000
parents dee7b9b17fae
children 394860504360
files extra/control-devel/src/slib01ad.cc
diffstat 1 files changed, 34 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/extra/control-devel/src/slib01ad.cc	Wed Mar 14 09:00:49 2012 +0000
+++ b/extra/control-devel/src/slib01ad.cc	Wed Mar 14 10:14:06 2012 +0000
@@ -186,13 +186,41 @@
         int ldwork;
 
         ldwork = 0;
+        
+        if (alg == 'C')
+        {
+            if (batch == 'F' || batch == 'I')
+            {
+                if (conct == 'C')
+                    ldwork = (4*nobr-2)*(m+l);
+                else    // (conct == 'N')
+                    ldwork = 1;
+            }
+            else if (meth == 'M')   // && (batch == 'L' || batch == 'O')
+            {
+                if (conct == 'C' && batch == 'L')
+                    ldwork = max ((4*nobr-2)*(m+l), 5*l*nobr);
+                else if (jobd == 'M')
+                    ldwork = max ((2*m-1)*nobr, (m+l)*nobr, 5*l*nobr);
+                else    // (jobd == 'N')
+                    ldwork = 5*l*nobr;
+            }
+            else    // meth == 'N' && (batch == 'L' || batch == 'O')
+            {
+            
+            }
+        }
+        else if (alg == 'F')
+        {
+        
+        }
+        else    // (alg == 'Q')
+        {
+        
+        }
 
-        if (alg == 'C' && (batch == 'F' || batch == 'I') && conct = 'C')
-            ldwork = (4*nobr-2)*(m+l);
-        else if (alg == 'C' && (batch == 'F' || batch == 'I') && conct = 'N')
-            ldwork = 1;
-        else if (meth == 'M' && alg == 'C' && batch == 'L' && conct == 'C')
-            ldwork = max ((4*nobr-2)*(m+l), 5*l*nobr);
+
+
         else if ((meth == 'M' && jobd = 'M' && alg == 'C' && batch == 'O') || (batch == 'L' && conct == 'N'))
             ldwork = max ((2*m-1)*nobr, (m+l)*nobr, 5*l*nobr);
         else if ((meth == 'M' && jobd == 'N' && alg == 'C' && batch == 'O') || (batch == 'L' && conct == 'N'))