代码搜索结果
找到约 10,000 项符合
F 的代码
delete.f90
program delete_half
USE DFLIB
implicit none
character(len=79) :: filename,text
character(len=79) :: buffer
character(len=79) :: probn
integer, parameter :: fileid = 10
integer :
dynapw.f90
program DynaPw
implicit none
integer n,ntime,npoin,resunit
integer ipoin,itime,i
real u0,dens,pi,lamta,ypoin,temp1,temp2,h,delta,time,omega,c,iomega,omega1,deltaT
real*8 t
real,allocatable::
f2812.gel
/******************************************************************/
/* Code Composer Studio supports five reserved GEL functions that */
/* automatically get executed if they are defined. They are:
f2812.gel
/******************************************************************/
/* Code Composer Studio supports five reserved GEL functions that */
/* automatically get executed if they are defined. They are:
f2812.gel
/******************************************************************/
/* Code Composer Studio supports five reserved GEL functions that */
/* automatically get executed if they are defined. They are: