--- MITgcm_contrib/enderton/Diagnostics/DiagPlot.m 2005/02/01 17:05:25 1.2 +++ MITgcm_contrib/enderton/Diagnostics/DiagPlot.m 2005/02/02 15:38:21 1.3 @@ -40,9 +40,9 @@ % Loop over subplots and make plots. for inrow = 1:nrow - nexp = length(page{inrow}); if nexp ~= 1, nexp = nexp - 1; end - if nexp == 1, cmp = 'Sep'; else, cmp = page{inrow}{end}; end - if nexp == 1, ncol = 1; elseif cmp == 'Sbs', ncol = nexp; else ncol = 1; end + ntrl = length(page{inrow}); if ntrl ~= 1, ntrl = ntrl - 1; end + if ntrl == 1, cmp = 'Sep'; else, cmp = page{inrow}{end}; end + if ntrl == 1, ncol = 1; elseif cmp == 'Sbs', ncol = ntrl; else ncol = 1; end dx = (1-dxl-dxr-(ncol-1)*dxm)/ncol; dy = (1-dyb-dyt-(nrow-1)*dym)/nrow;