Changeset 924 for library

Timestamp:

05/05/10 20:51:26 (15 years ago)

Author:

smidl

Message:

correction in MemDS and mgnorm

Location:

library/bdm

Files:

• base/datasources.cpp (modified) (1 diff)
• base/datasources.h (modified) (1 diff)
• stat/exp_family.h (modified) (1 diff)

library/bdm/base/datasources.cpp

@@ -44 +44 @@
         // DS::validate() has to be called after the dtsize attribute is set to proper value
         DS::validate();
+        log_level[logut]=0;
 }
 

library/bdm/base/datasources.h

@@ -53 +53 @@
         void set_drv ( const RV &drv, const RV &urv )
         {
+                if (urv._dsize()>0){
                 bdm_error ( "MemDS::urv is not supported" );
+                } else {
+                        DS::set_drv(drv,urv);
+                }
+                        
         }
 
         void write ( const vec &ut ) {
-                bdm_error ( "MemDS::write is not supported" );
+                if (ut.size()>0){
+                        bdm_error ( "MemDS::write is not supported" );
+                }
         }
 
         void write ( const vec &ut, const ivec &indices ) {
-                bdm_error ( "MemDS::write is not supported" );
+                if (ut.size()>0){
+                        bdm_error ( "MemDS::write is not supported" );
+                }
         }
 

library/bdm/stat/exp_family.h

@@ -1071 +1071 @@
 
                 set_parameters ( g, R );
-                validate();
+                //validate();
         }
         void validate() {
-                bdm_assert ( g->dimension() == this->dimension(), "incompatible function" );
+                this->iepdf.validate();
+                bdm_assert ( g->dimension() == this->iepdf.dimension(), "incompatible function" );
                 this->dim = g->dimension();
                 this->dimc = g->dimensionc();