代码搜索:implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/476406/6760791
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/476406/6760834
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/476406/6760864
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)
www.eeworm.com/read/409260/11338561
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/409260/11338631
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/409260/11338679
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)
www.eeworm.com/read/258562/11854091
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/258562/11854240
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/258562/11854362
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)
www.eeworm.com/read/343762/11928540
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