Changeset 14811


Ignore:
Timestamp:
04/30/13 12:23:47 (12 years ago)
Author:
Eric.Larour
Message:

CHG: allow transient forcings for thickness

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/m/classes/geometry.m

    r14640 r14811  
    2525                end % }}}
    2626                function md = checkconsistency(obj,md,solution,analyses) % {{{
    27 
    28                         md = checkfield(md,'geometry.surface'  ,'NaN',1,'size',[md.mesh.numberofvertices 1]);
    29                         md = checkfield(md,'geometry.bed'      ,'NaN',1,'size',[md.mesh.numberofvertices 1]);
    30                         md = checkfield(md,'geometry.thickness','NaN',1,'size',[md.mesh.numberofvertices 1],'>',0);
    31                         if any((obj.thickness-obj.surface+obj.bed)>10^-9),
    32                                 md = checkmessage(md,['equality thickness=surface-bed violated']);
    33                         end
    34                         if solution==TransientSolutionEnum() & md.transient.isgroundingline,
    35                                 md = checkfield(md,'geometry.bathymetry','NaN',1,'size',[md.mesh.numberofvertices 1]);
     27                               
     28                        if (solution==TransientSolutionEnum() & md.transient.isgia) | (solution==GiaSolutionEnum()),
     29                                md = checkfield(md,'geometry.thickness','forcing',1,'NaN',1,'>=',0);
     30                        else
     31                                md = checkfield(md,'geometry.surface'  ,'NaN',1,'size',[md.mesh.numberofvertices 1]);
     32                                md = checkfield(md,'geometry.bed'      ,'NaN',1,'size',[md.mesh.numberofvertices 1]);
     33                                md = checkfield(md,'geometry.thickness','NaN',1,'size',[md.mesh.numberofvertices 1],'>',0);
     34                                if any((obj.thickness-obj.surface+obj.bed)>10^-9),
     35                                        md = checkmessage(md,['equality thickness=surface-bed violated']);
     36                                end
     37                                if solution==TransientSolutionEnum() & md.transient.isgroundingline,
     38                                        md = checkfield(md,'geometry.bathymetry','NaN',1,'size',[md.mesh.numberofvertices 1]);
     39                                end
    3640                        end
    3741                end % }}}
Note: See TracChangeset for help on using the changeset viewer.