shear

PURPOSE ^

SHEAR - compute strain rate components

SYNOPSIS ^

function [ux,uy,vx,vy]=shear(index,alpha,beta,u,v)

DESCRIPTION ^

SHEAR - compute strain rate components

   this routine calculates quantities used by visc grad and
   viscosity2 to compute the viscosity

   Usage:
      [ux,uy,vx,vy]=shear(index,alpha,beta,u,v)

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function [ux,uy,vx,vy]=shear(index,alpha,beta,u,v)
0002 %SHEAR - compute strain rate components
0003 %
0004 %   this routine calculates quantities used by visc grad and
0005 %   viscosity2 to compute the viscosity
0006 %
0007 %   Usage:
0008 %      [ux,uy,vx,vy]=shear(index,alpha,beta,u,v)
0009 
0010 summation=[1;1;1];
0011 ux=(u(index).*alpha)*summation;
0012 uy=(u(index).*beta)*summation;
0013 vx=(v(index).*alpha)*summation;
0014 vy=(v(index).*beta)*summation;

Generated on Sun 29-Mar-2009 20:22:55 by m2html © 2003