% Schematic28.m %
clear; clc; clf;
figure(1)
hold('all');
plot([-0.2 1.2],[0.2 0.2],'k')
plot([-0.2 1.2],[0.8 0.8],'k')
plot([0.2 0.2],[-0.2 1.2],'k')
plot([0.8 0.8],[-0.2 1.2],'k')
plot(0.5,0.2,'kd','MarkerSize',8)
plot(0.5,0.8,'kd','MarkerSize',8)
plot(1.1,0.2,'kd','MarkerSize',8)
plot(1.1,0.8,'kd','MarkerSize',8)
plot(0.2,0.5,'kO','MarkerSize',8)
plot(0.8,0.5,'kO','MarkerSize',8)
plot(0.2,1.1,'kO','MarkerSize',8)
plot(0.8,1.1,'kO','MarkerSize',8)
plot(0.5,0.5,'ks','MarkerSize',8)
text('Interpreter','latex','String','$$w_{i,j-1/2}$$','Position',[0.33 0.1],'FontSize',25)
text('Interpreter','latex','String','$$w_{i,j+1/2}$$','Position',[0.33 0.7],'FontSize',25)
text('Interpreter','latex','String','$$w_{i+1,j-1/2}$$','Position',[0.88 0.1],'FontSize',25)
text('Interpreter','latex','String','$$w_{i+1,j+1/2}$$','Position',[0.88 0.7],'FontSize',25)
text('Interpreter','latex','String','$$u_{i-1/2,j}$$','Position',[-0.1 0.45],'FontSize',25)
text('Interpreter','latex','String','$$u_{i+1/2,j}$$','Position',[0.85 0.45],'FontSize',25)
text('Interpreter','latex','String','$$u_{i-1/2,j+1}$$','Position',[-0.1 1.05],'FontSize',25)
text('Interpreter','latex','String','$$u_{i+1/2,j+1}$$','Position',[0.85 1.05],'FontSize',25)
text('Interpreter','latex','String','$$\phi_{ij}$$','Position',[0.53 0.52],'FontSize',25)
text('Interpreter','latex','String','$$p_{ij}$$','Position',[0.45 0.43],'FontSize',25)
line([-0.35 -0.35+0.3],[-0.25 -0.25],'color','k','linewidth',2)
line([-0.35 -0.35],[-0.25 0],'color','k','linewidth',2)
plot(-0.35+0.3,-0.248,'k>','linewidth',0.01,'MarkerEdgeColor','k','MarkerFaceColor','k')
plot(-0.348,-0.013,'k^','linewidth',0.01,'MarkerEdgeColor','k','MarkerFaceColor','k')
text('Interpreter','latex','String','$$r$$', 'Position',[-0.15 -0.205],'FontSize',25)
text('Interpreter','latex','String','$$z$$', 'Position',[-0.33 -0.08],'FontSize',25)
axis image; box on; axis off
set(gcf,'PaperPositionMode','auto')