model30.cpp

Go to the documentation of this file.

/*
 * $Id: model30.cpp 542 2012-07-10 21:04:06Z johnoel $
 *
 * Author: David Fournier
 * Copyright (c) 2008-2012 Regents of the University of California 
 */
#include <admodel.h>

void param_init_matrix::allocate(const ad_integer& rmin,
  const ad_integer& rmax, const index_type& cmin,
  const index_type& cmax, int phase_start,const char *s)
  {
    named_dvar_matrix::allocate(rmin,rmax,cmin,cmax,s);
    initial_params::allocate(phase_start);
    if (ad_comm::global_bparfile)
    {
      *(ad_comm::global_bparfile) >> dvar_matrix(*this);
    }
    else if (ad_comm::global_parfile)
    {
      if (allocated(*this)) 
        *(ad_comm::global_parfile) >> dvar_matrix(*this);
    }
    else
    {
      if (allocated(*this)) 
      for (int i=indexmin();i<=indexmax();i++)
        if (allocated((*this)(i)))
          (*this)(i)=(initial_value);
    }
  }

void param_init_matrix::allocate(const ad_integer& rmin,
  const ad_integer& rmax, const index_type& cmin,
  const index_type& cmax, const char *s)
  {
    allocate(rmin,rmax,cmin,cmax,1,s);
  }