下载 >  行业 >  教育 > 计算绝对涡度程序
0分

计算绝对涡度程序

用于计算绝对涡度的fortran程序,THIS ROUTINE COMPUTES THE ABSOLUTE VORTICITY.
2013-03-27 上传大小:4KB
立即下载 开通VIP
分享
收藏 举报
温度.涡度平流计算程序,fortran

温度.涡度平流计算程序,fortran REAL,PARAMETER:: Omega=7.292e-5,R=6371e+3,PI=3.1415926,Delta=1.00 INTEGER,PARAMETER :: nx=111,ny=61,nz=7,nt=4 INTEGER WtTopLevel(NX,NY,NT) REAl lat(ny),lon(nx),sigmadeltD CHARACTER timefile(4)*8 ,levelfile(5)*1,P(NZ)*2 real,allocatable :: temper(:,:,:,:),q(:,:,:,:),u(:,:,:,:),v(:,:,:,:),height(:,:,:,:),qu(:,:,:,:),qv(:,:,:,:),adq(:,:,:,:),adqv(:,:,:,:),vorg(:,:,:,:),voro(:,:,:,:),div(:,:,:,:),temp(:,:,:,:),vorop(:,:,:,:) allocate (temper(NX,NY,NZ,NT),q(NX,NY,nz,NT),u(NX,NY,NZ,NT),v(NX,NY,NZ,NT),height(NX,NY,NZ,NT),qu(NX,NY,NZ,NT),qv(NX,NY,NZ,NT),adq(NX,NY,NZ,NT),adqv(NX,NY,NZ,NT),vorg(NX,NY,NZ,NT),voro(NX,NY,NZ,NT),div(NX,NY,NZ,NT),temp(NX,NY,NZ,NT),vorgp(NX,NY,NZ,NT) ) !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! DATA P/'00','92','85','70','50','40','30'/ DATA timefile/'00041300','00041312','00041400', '00041412'/ do i=1,nx lon(i)=50.0+(i-1)*Delta lon(i)=lon(i)*pi/180. enddo do i=1,ny lat(i)=10.0+(i-1)*Delta lat(i)=lat(i)*pi/180. enddo

立即下载
3积分/C币
matlab计算节点重要度

计算网络节点收缩后的重要度,并对电源和负荷节点进行归一化

立即下载
5积分/C币
涡格法计算气动力MATLAB

涡格法计算,适用范围0<=ma<=0.5

立即下载
4积分/C币
涡度法(数学)

涡度法 (数学)。。。

立即下载
10积分/C币
多涡卷混沌吸引子

Jerk系统的多涡卷混沌吸引子的产生,主要采用matlab仿真软件对状态方程进行仿真出图——多涡卷混沌吸引子

立即下载
2积分/C币
C语言涡格法

使用C语言涡格法计算任意二维翼型的升力、阻力、俯仰力矩系数等等

立即下载
5积分/C币
大涡模拟LES

基于商业CFD软件,采用大涡模拟LES,模拟凝聚器内流场及压力场

立即下载
1积分/C币
涡格法MATLAB程序

涡格法计算气动力程序

立即下载
3积分/C币
matlab计算图像锐度

就几行,用能量梯度函数计算的。评价时还要结合别的图像指标。

立即下载
3积分/C币
大涡模拟程序代码

大涡模拟的代码程序,对自己编程的有很好的指导作用

立即下载
3积分/C币
复杂网络度分布计算的Matlab程序

这个Matlab程序是一个对复杂网络的度分布进行计算的程序,用于复杂网络的分析。

立即下载
50积分/C币
平面度计算程序

平面度计算程序.可以自动计算出平板平面度的工具

立即下载
3积分/C币
涡格法fortran程序

涡格法 气动力计算

立即下载
3积分/C币
复杂网络节点度和度分布计算的MATLAB代码

用来计算复杂网络的节点度和度分布以及度的累积概率分布(记得把矩阵内容换成自己的哦)

立即下载
4积分/C币
微型涡喷发动机设计手册

微型涡喷发动机设计 手册 原理 制作 图纸

立即下载
3积分/C币
涡喷发动机3D图和CAD工程图

一款涡喷发动机3D图和CAD工程图,非常详细,有心的朋友可以做个试试,高温、高压、高转速,特别要注意安全防护。

立即下载
3积分/C币
MATLAB计算数据峰度和偏度

MATLAB计算数据峰度和偏度

立即下载
3积分/C币
平面度及平整度算法

平面度及平整度算法,已将编译成DLL,在多个专案验证无误,可以放心调用,C#、labview都可以

立即下载
5积分/C币
T700涡轴发动机介绍

T700涡轴发动机实时仿真 T700涡轴发动机实时仿真

立即下载
3积分/C币
Fortran计算大涡模拟流体力学

Fortran计算大涡模拟流体力学,湍流模型LES。

立即下载
3积分/C币
偏度峭度的 malab程序

简单的程序,用来计算一维时间序列的偏度和峭度值,matlab算法简单易懂,比较适合初学者,希望可以让他人直接调用。

立即下载
3积分/C币
不确定度计算(物理实验数据处理)

纯粹自己写的小代码,用来数据处理。是自己写的用来做物理实验计算不确定度,什么的,包括线性拟合

立即下载
3积分/C币
MATLAB语言在计算流体力学中的简单应用

通过编程计算阀腔内部的涡量、流函数及速度的分布,阐述MATLAB语言在计算流体力学中的的应用。

立即下载
3积分/C币
ansys三维涡流仿真实例2

好不容易做的一个例子,保存一下,呵呵。 et,1,97 et,2,97,1 !eddy mp,murx,1,1 mp,murx,2,1 mp,rsvx,2,1e-7 local,11,1,0,0,0,,0,,1,1, csys,11 wpcsys,-1 cylind,2.04/1000,3.08/1000,0,0.75/1000,0,360

立即下载
3积分/C币
度中心性算法

输入一个4000个节点的邻接表,先将其转化为邻接矩阵,然后根据邻接矩阵进行运算,运用度中心性算法分别计算出每个节点的度数,将度数进行标准化处理,之后选出度最大的结点,找到其在矩阵中的位置,存入一个新建的数组当中,存完后,对最大度结点进行一系列处理,删除与其相关联的所有邻边,也就是在矩阵中将第i行第i列的元素全部置为0,让i结点成为一个孤立节点,这一系列操作完成后,再次对剩余结点的邻接矩阵进行相似的处理,最后输出存放大度结点位置的数组,即完成验证。

立即下载
3积分/C币
谱峭度工具箱

谱峭度工具箱,由法国人编写,非常实用,故障诊断的利器,发论文的好帮手!

立即下载
30积分/C币
压实度计算压实度计算压实度计算

压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算压实度计算

立即下载
3积分/C币
度-度相关性 复杂网络同配系数

matlab函数求度-度相关性,也就是同配网络当 r > 0 度-度正相关 assortativeness,当 r < 0 度-度负相关 disassortativeness。

立即下载
4积分/C币
多目标优化的拥挤度算法

适用于NSGA-2算法中的拥挤度排序计算。上传为MATLAB代码

立即下载
3积分/C币
flapping,UVLM,matlab code

使用非定常涡格法(UVLM)计算一种简单扑翼机的升力。

立即下载
3积分/C币
关闭
img

spring mvc+mybatis+mysql+maven+bootstrap 整合实现增删查改简单实例.zip

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
点击完成任务获取下载码
输入下载码
为了良好体验,不建议使用迅雷下载
img

计算绝对涡度程序

会员到期时间: 剩余下载个数: 剩余C币: 剩余积分:0
为了良好体验,不建议使用迅雷下载
VIP下载
您今日下载次数已达上限(为了良好下载体验及使用,每位用户24小时之内最多可下载20个资源)

积分不足!

资源所需积分/C币 当前拥有积分
您可以选择
开通VIP
4000万
程序员的必选
600万
绿色安全资源
现在开通
立省522元
或者
购买C币兑换积分 C币抽奖
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
为了良好体验,不建议使用迅雷下载
确认下载
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 0 0
为了良好体验,不建议使用迅雷下载
VIP和C币套餐优惠
img

资源所需积分/C币 当前拥有积分 当前拥有C币
5 4 45
您的积分不足,将扣除 10 C币
为了良好体验,不建议使用迅雷下载
确认下载
下载
您还未下载过该资源
无法举报自己的资源

兑换成功

你当前的下载分为234开始下载资源
你还不是VIP会员
开通VIP会员权限,免积分下载
立即开通

你下载资源过于频繁,请输入验证码

您因违反CSDN下载频道规则而被锁定帐户,如有疑问,请联络:webmaster@csdn.net!

举报

若举报审核通过,可返还被扣除的积分

  • 举报人:
  • 被举报人:
  • *类型:
    • *投诉人姓名:
    • *投诉人联系方式:
    • *版权证明:
  • *详细原因: