代码搜索:implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/252425/12283223
mak corea.mak
# Generated by the VisualDSP++ IDDE
# Note: Any changes made to this Makefile will be lost the next time the
# matching project file is loaded into the IDDE. If you wish to preserve
# changes,
www.eeworm.com/read/230076/14306495
txt yuanma.txt
module NUMERICAL
use IMSL
implicit none
real ::zero=0.1!可容忍誤差
contains
real function bisect(guess_a,guess_b,ca,s,k,r,q,t)
real ::guess_a !區間值下界
real ::guess_b !區間值上界
real
www.eeworm.com/read/227522/14421566
m hist2res2.m
function [R]=hist2res2(H,fun)
% Evaluates Histogram data
% [R]=hist2res2(H)
%
% [y]=hist2res2(H,fun)
% estimates fun-statistic
%
% fun 'mean' mean
% 'std' standard deviation
% 'var' variance
% 'sem' s
www.eeworm.com/read/221868/14716720
f90 ex0605.f90
program ex0605
implicit none
real, parameter :: weight=45.0
real, parameter :: e = 0.001
real :: guess = 0.0
do while( abs(guess-weight) > e )
write(*,*) "Weight:"
read(*,*) g
www.eeworm.com/read/216987/14983547
f90 tensor3.f90
!------------------------------------------------------------------------------!
! MODULE : TENSOR3 Auteur : J. Gressier
! Date : July
www.eeworm.com/read/216987/14983556
f90 geo3d.f90
!------------------------------------------------------------------------------!
! MODULE : GEO3D Auteur : J. Gressier
! Date : Mai 2
www.eeworm.com/read/216987/14983593
f90 geo2d.f90
!------------------------------------------------------------------------------!
! MODULE : GEO2D Auteur : J. Gressier
! Date : Fevri
www.eeworm.com/read/208614/15242280
f90 sgldraw4.f90
module sgl_util
use sgl
implicit none
contains
subroutine Display()
call sglClearBuffer()
call sglColor3f(1.0,0,0)
call sglFilledRect(100,100, 120,200) ! 蜡烛
call sglFilledRectV(
www.eeworm.com/read/208614/15242323
f90 ex0605.f90
program ex0605
implicit none
real, parameter :: weight=45.0
real, parameter :: e = 0.001
real :: guess = 0.0
do while( abs(guess-weight) > e )
write(*,*) "Weight:"
read(*,*) g
www.eeworm.com/read/208614/15242353
f90 linear.f90
program main
use IMSL
implicit none
real :: A(3,3) = (/ 1,3,2,&
1,2,1,&
2,1,3 /)
real :: B(3,1) = (/ 4,6,6 /)
real :: X(3,1)
call lin_sol_gen(A,B,X)