/[MITgcm]/MITgcm_contrib/jmc_script/def_subP.m
ViewVC logotype

Diff of /MITgcm_contrib/jmc_script/def_subP.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.1 by jmc, Tue Sep 30 22:10:26 2014 UTC revision 1.2 by jmc, Mon Oct 16 18:49:31 2017 UTC
# Line 1  Line 1 
1  function [xyP,xyB]=def_subP(n,dxRed,dyRed,dxB,dyB);  function [xyP,xyB]=def_subP(n,dxRed,dyRed,dxB,dyB);
2    % [xyP,xyB]=def_subP(n,dxRed,dyRed,dxB,dyB);
3    %
4  %     n = number of subplot in the page  %     n = number of subplot in the page
5  % dxRed = reduction of Horizon. size (x-dir) on the right side  % dxRed = reduction of Horizon. size (x-dir) on the right side
6  % dyRed = reduction of Vertical size (y-dir) splitted on both side  % dyRed = reduction of Vertical size (y-dir) splitted on both side
# Line 86  if n == -4, Line 88  if n == -4,
88  %-- to replace subplot(41?): [xyP]=def_subP(-4); axes('position',xyP(?,:));  %-- to replace subplot(41?): [xyP]=def_subP(-4); axes('position',xyP(?,:));
89   xyP(:,1)=0.10 ; xyP(:,2)=0.16/4;   xyP(:,1)=0.10 ; xyP(:,2)=0.16/4;
90   xyP(:,3)=0.78 ; xyP(:,4)=0.72/4;   xyP(:,3)=0.78 ; xyP(:,4)=0.72/4;
91   xyP(2:4,2)=xyP(1,2)+[1:3]*(0.98/4);  %xyP(2:4,2)=xyP(1,2)+[1:3]*(0.98/4); %- put the 1rst @ the bottom
92     xyP(1:3,2)=xyP(4,2)+[3:-1:1]*(0.98/4); %- put the 1rst @ the top
93  %-- reduction size in X dir:  %-- reduction size in X dir:
94   xyP(:,3)=xyP(:,3)*(1-dxRed);   xyP(:,3)=xyP(:,3)*(1-dxRed);
95  %----------  %----------
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22