Ignore:
Timestamp:
10/16/13 14:32:53 (11 years ago)
Author:
Mathieu Morlighem
Message:

NEW: preparing Free surfaces flowband model

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/classes/Inputs/SegInput.cpp

    r16382 r16434  
    8585
    8686/*Object functions*/
     87/*FUNCTION SegInput::GetInputAverage{{{*/
     88void SegInput::GetInputAverage(IssmDouble* pvalue){
     89
     90        int        numnodes  = this->NumberofNodes();
     91        IssmDouble numnodesd = reCast<int,IssmDouble>(numnodes);
     92        IssmDouble value     = 0.;
     93
     94        for(int i=0;i<numnodes;i++) value+=values[i];
     95        value = value/numnodesd;
     96
     97        *pvalue=value;
     98}
     99/*}}}*/
    87100/*FUNCTION SegInput::GetInputValue(IssmDouble* pvalue,GaussSeg* gauss){{{*/
    88101void SegInput::GetInputValue(IssmDouble* pvalue,GaussSeg* gauss){
Note: See TracChangeset for help on using the changeset viewer.