代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/376037/9335859
f90 ex0832.f90
program ex0832
implicit none
integer, external :: func
write(*,*) func(2,3)
end program
pure integer function func(a,b)
implicit none
integer, intent(in) :: a,b
func = a+b
re
www.eeworm.com/read/376037/9335862
f90 ex0823.f90
program ex0823
implicit none
integer :: a=4
integer b
call div(a,b)
write(*,*) a,b
stop
end program
subroutine div(a,b)
implicit none
integer, intent(in) :: a ! 指定a是只读
www.eeworm.com/read/376037/9335872
f90 ex0436.f90
program ex0436
implicit none
real(kind=4) :: a
real(kind=8) :: b
a=1.0_4 ! 确定1.0这个数字是使用单精度
b=1.0_8 ! 确定1.0这个数字是使用双精度
write(*,*) a,b
stop
end
www.eeworm.com/read/376037/9335881
f90 ex0429.f90
program ex0429
implicit none
real pi
parameter(pi=3.14159)
write(*,"(F4.2)") sin(pi/6)
end
www.eeworm.com/read/376037/9335886
f90 ex0432.f90
program ex0432
implicit none
integer :: a=1
integer :: b=2
real :: c
c=real(a)/real(b) ! 经由库函数real把整数转换成浮点数
write(*,"(F5.2)") c
end
www.eeworm.com/read/376037/9335914
for ex0430.for
PROGRAM ex0430
IMPLICIT NONE
INTEGER A
REAL B
COMPLEX C
CHARACTER*(20) STR
DATA A,B,C,STR /1, 2.0, (1.0,2.0), 'FORTRAN 77'/
WRITE(*,*) A,B,C,STR
STOP
END
www.eeworm.com/read/376037/9335920
f90 ex0431.f90
program ex0431
implicit none
integer :: a=1
integer :: b=2
real :: c
c=a/b
! c=1/2=0, 虽然c是浮点数,但因为a,b是整数,计算a/b时会用整数去计算.
write(*,"(F5.2)") c
end
www.eeworm.com/read/364985/9884826
src dydzzy.src
DYDZZY:=proc(f)
# DYDZZY(f) is used to get the derivate of
# an implicit function
local Eq,deq,imderiv;
Eq:='Eq';
Eq:=f;
deq:=diff(Eq,x);
readlib(isolate);
imderiv:=isolate(deq,diff(y(x),
www.eeworm.com/read/363172/9966047
txt 08 编译器设置.txt
编译器选项设置:有ARM C,ARM C++,Thumb C和Thumb C++四种编译器,这几种编译器设置方法相同,以ARM C为例介绍.
1. Target and Source选项卡设置:
Architecture or Processor下拉列表框:用于选择目标系统中的ARM体系结构版本号或者处理器编号.
Floating Point下拉列表:用于选择系统中浮点部件的
www.eeworm.com/read/362372/10002103
f90 new_libr.f90
module new_library
contains
subroutine formblock_k(bigk,km,g,g_min)
! forms complete n*n matrix or submatrix
implicit none
real,intent(in)::km(:,:); integer,