Changeset 22728


Ignore:
Timestamp:
04/30/18 18:54:08 (7 years ago)
Author:
schlegel
Message:

CHG: add bottom layer flux to runoff

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/modules/SurfaceMassBalancex/Gembx.cpp

    r22614 r22728  
    821821
    822822                // upward longwave contribution
    823                 ulw = - SB * pow(Ts,4.0)* teValue * dt;
     823                ulw = - (SB * pow(Ts,4.0)* teValue) * dt ;
    824824                dT_ulw = ulw / TCs;
    825825               
     
    15131513
    15141514                //calculate Rsum:
    1515                 Rsum=cellsum(R,n);
     1515                Rsum=cellsum(R,n) + flxDn[n];
    15161516
    15171517                // delete all cells with zero mass
     
    15401540                xDelete<IssmDouble>(R);
    15411541        }
    1542    
     1542
    15431543        //Merging of cells as they are burried under snow.
    15441544        Zcum=xNew<IssmDouble>(n);
     
    16691669                                cellsplit(&d, n, j,1.0);
    16701670                                cellsplit(&a, n, j,1.0);
    1671                                 cellsplit(&EI, n, j,1.0);
    1672                                 cellsplit(&EW, n, j,1.0);
     1671                                cellsplit(&EI, n, j,.5);
     1672                                cellsplit(&EW, n, j,.5);
    16731673                                cellsplit(&re, n, j,1.0);
    16741674                                cellsplit(&gdn, n, j,1.0);
Note: See TracChangeset for help on using the changeset viewer.