]> Creatis software - CreaPhase.git/blob - octave_packages/secs2d-0.0.8/ThDDGOX/ThDDGOXTWN0STD.m
Add a useful package (from Source forge) for octave
[CreaPhase.git] / octave_packages / secs2d-0.0.8 / ThDDGOX / ThDDGOXTWN0STD.m
1 function x = ThDDGOXTWN0STD (imesh,Simesh,Sinodes,Sielements,idata)
2   Nnodes    = columns(Simesh.p);
3   Nelements = columns(Simesh.t);
4   x = 1.5 * idata.un * ones(Nelements,1) ./ idata.vsatn^2;
5 endfunction
6