I want to translate my matlab code fortran?

2 次查看（过去 30 天）
Anu G
Anu G 2018-12-24
评论： Anu G 2018-12-26
theta=0:10:60; % Note: if you reduce the step size you will get a smoother plot
rho=0.465;
%d=25; wrong
%k=0.99*(1+(1i*0.66));
k=real(0.97+0.6402i);
poftheta=sqrt((k.^2)-(cos(theta).^2));
y=(rho*sin(theta))./(poftheta);
roftheta=((y-1)./(y+1));
% ^---- missed dot
r0=-20*log10(mod(roftheta));
% ^----- here
grid on
plot(theta,r0)
  2 个评论
Image Analyst
Image Analyst 2018-12-24
What do you mean by "fortran" in your subject line and tag. Do you want to translate this code INTO the FORTRAN programming language? If so, why, and it looks simple enough so why can't you do it?

请先登录，再进行评论。

请先登录，再回答此问题。

采纳的回答

KSSV
KSSV 2018-12-24
编辑：KSSV 2018-12-24
Read the documentation of mod. It takes two inputs, you have to decide what should be the input. For demo, below I have taken mod(n,2).
theta=0:10:60; % Note: if you reduce the step size you will get a smoother plot
rho=0.465;
%d=25; wrong
%k=0.99*(1+(1i*0.66));
k=real(0.97+0.6402i);
poftheta=sqrt((k.^2)-(cos(theta).^2));
y=(rho*sin(theta))./(poftheta);
roftheta=((y-1)./(y+1));
% ^---- missed dot
r0=-20*log10(mod(roftheta,2));
% ^----- here
grid on
plot(theta,r0)

更多回答（0 个）

类别

在 Help Center 和 File Exchange 中查找有关 Fortran with MATLAB 的更多信息

标签

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by