Visual Studio does not show the output of the Fortran programFortran 90 kind parameterShould I add the Visual Studio .suo and .user files to source control?What are the various “Build action” settings in Visual Studio project properties and what do they do?How do I add an existing directory tree to a project in Visual Studio?Using Git with Visual StudioHow do you count the lines of code in a Visual Studio solution?.gitignore for Visual Studio Projects and SolutionsDifference between Build Solution, Rebuild Solution, and Clean Solution in Visual Studio?How do you auto format code in Visual Studio?Writing to output window of Visual StudioCan you force Visual Studio to always run as an Administrator in Windows 8?
Compelling story with the world as a villain
Why doesn't 'd /= d' throw a division by zero exception?
Network helper class with retry logic on failure
What is the difference between Major and Minor Bug?
Was there ever a treaty between 2 entities with significantly different translations to the detriment of one party?
Why did Khan ask Admiral James T. Kirk about Project Genesis?
How do the Etherealness and Banishment spells interact?
Are the A380 engines interchangeable (given they are not all equipped with reverse)?
Why is 7 Bd3 in the Cambridge Springs QGD more often met with 7...Ne4 than 7...dxc4?
Where was Carl Sagan working on a plan to detonate a nuke on the Moon? Where was he applying when he leaked it?
Is MOSFET active device?
Why do banks “park” their money at the European Central Bank?
Prove your innocence
What is a CirKle Word™?
How to respectfully refuse to assist co-workers with IT issues?
What is the difference between "Grippe" and "Männergrippe"?
How to determine car loan length as a function of how long I plan to keep a car
Asymmetric table
Are the players on the same team as the DM?
How do I, an introvert, communicate to my friend and only colleague, an extrovert, that I want to spend my scheduled breaks without them?
How do I prevent other wifi networks from showing up on my computer?
Numbers Decrease while Letters Increase
Transposing from C to Cm?
Round towards zero
Visual Studio does not show the output of the Fortran program
Fortran 90 kind parameterShould I add the Visual Studio .suo and .user files to source control?What are the various “Build action” settings in Visual Studio project properties and what do they do?How do I add an existing directory tree to a project in Visual Studio?Using Git with Visual StudioHow do you count the lines of code in a Visual Studio solution?.gitignore for Visual Studio Projects and SolutionsDifference between Build Solution, Rebuild Solution, and Clean Solution in Visual Studio?How do you auto format code in Visual Studio?Writing to output window of Visual StudioCan you force Visual Studio to always run as an Administrator in Windows 8?
.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;
0
I make this code to solve Runge-Kutta, my compiler does not show anything wrong, but does not give me anything to check if is really correct.
I not sure if the code is OK, but, I use the Debug option and it does not show me anything. It only told me
The program '[1328] Console2.exe' has exited with code 0 (0x0).
Program Runge-Kutta
INTEGER i, n
PARAMETER (n=101,m=101)
REAL (kind=8) eta(i), psi(i), teta(i)
REAL (kind=8) k1(i), k2(i), k3(i), k4(i), l1(i), l2(i), l3(i), l4(i)
REAL (kind=8) f(i), g(i)
REAL (kind=8) h
-----------------definition of parameters--------------------
PARAMETER (h=0.01)
------------------ initial conditions---------------------
eta(1)= 0.d0
teta(1)= 0.d0
eta(n)= 1
teta(n)= 1
psi(1)= 0.d0
declaración función a evaluar
FUNCTION f(eta(i), psi(i), teta(i))
DO i=1, n
f= psi(i)
ENDDO
ENDFUNCTION
FUNCTION g(eta(i), psi(i), teta(i))
DO i=1, n
g=-(1/2) eta(i) psi(i)
ENDDO
ENDFUNCTION
obtain values of K
DO i=1, n
k1(i)= h * f
l1(i)= h * g
!k2(n)= h * f(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!l2(n)= h * g(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!k3(n)= h * f(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!l3(n)= h * g(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!k4(n)= h * f(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
!l4(n)= h * g(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
teta(i+1)= teta(i) + (1/6)*(k1(i)) !+ 2 * k2(i)+2* k3(i) +k4(i))
psi(i+1)= psi(i) + (1/6)*(l1(i)) !+ 2* l2(i)+2* l3(i) +l4(i))
ENDDO
If(n==100)then
----------------------------------------- archivos DATOS ------------------------------
OPEN(unit=12,file='datos RK.dat')
WRITE(12,*)'TITLE = "Grid" '
WRITE(12,*)'VARIABLES = "x"'
WRITE(12,*)'"RK"' ! variable
WRITE(12,*)'ZONE T= "Matrix"'
---------------------------------------- ESCRITURA DE LAS VARIABLES ----------------------------------
DO i=1,n
WRITE(12,*) teta(i), psi(i)
END DO
CLOSE(unit=12)
End Program Runge-Kutta
visual-studio fortran fortran90
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
|
show 1 more comment
0
I make this code to solve Runge-Kutta, my compiler does not show anything wrong, but does not give me anything to check if is really correct.
I not sure if the code is OK, but, I use the Debug option and it does not show me anything. It only told me
The program '[1328] Console2.exe' has exited with code 0 (0x0).
Program Runge-Kutta
INTEGER i, n
PARAMETER (n=101,m=101)
REAL (kind=8) eta(i), psi(i), teta(i)
REAL (kind=8) k1(i), k2(i), k3(i), k4(i), l1(i), l2(i), l3(i), l4(i)
REAL (kind=8) f(i), g(i)
REAL (kind=8) h
-----------------definition of parameters--------------------
PARAMETER (h=0.01)
------------------ initial conditions---------------------
eta(1)= 0.d0
teta(1)= 0.d0
eta(n)= 1
teta(n)= 1
psi(1)= 0.d0
declaración función a evaluar
FUNCTION f(eta(i), psi(i), teta(i))
DO i=1, n
f= psi(i)
ENDDO
ENDFUNCTION
FUNCTION g(eta(i), psi(i), teta(i))
DO i=1, n
g=-(1/2) eta(i) psi(i)
ENDDO
ENDFUNCTION
obtain values of K
DO i=1, n
k1(i)= h * f
l1(i)= h * g
!k2(n)= h * f(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!l2(n)= h * g(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!k3(n)= h * f(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!l3(n)= h * g(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!k4(n)= h * f(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
!l4(n)= h * g(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
teta(i+1)= teta(i) + (1/6)*(k1(i)) !+ 2 * k2(i)+2* k3(i) +k4(i))
psi(i+1)= psi(i) + (1/6)*(l1(i)) !+ 2* l2(i)+2* l3(i) +l4(i))
ENDDO
If(n==100)then
----------------------------------------- archivos DATOS ------------------------------
OPEN(unit=12,file='datos RK.dat')
WRITE(12,*)'TITLE = "Grid" '
WRITE(12,*)'VARIABLES = "x"'
WRITE(12,*)'"RK"' ! variable
WRITE(12,*)'ZONE T= "Matrix"'
---------------------------------------- ESCRITURA DE LAS VARIABLES ----------------------------------
DO i=1,n
WRITE(12,*) teta(i), psi(i)
END DO
CLOSE(unit=12)
End Program Runge-Kutta
visual-studio fortran fortran90
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
1
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
BTW, do not learnreal(8), it is ugly.
– Vladimir F
Mar 27 at 22:03
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57
|
show 1 more comment
0
0
0
I make this code to solve Runge-Kutta, my compiler does not show anything wrong, but does not give me anything to check if is really correct.
I not sure if the code is OK, but, I use the Debug option and it does not show me anything. It only told me
The program '[1328] Console2.exe' has exited with code 0 (0x0).
Program Runge-Kutta
INTEGER i, n
PARAMETER (n=101,m=101)
REAL (kind=8) eta(i), psi(i), teta(i)
REAL (kind=8) k1(i), k2(i), k3(i), k4(i), l1(i), l2(i), l3(i), l4(i)
REAL (kind=8) f(i), g(i)
REAL (kind=8) h
-----------------definition of parameters--------------------
PARAMETER (h=0.01)
------------------ initial conditions---------------------
eta(1)= 0.d0
teta(1)= 0.d0
eta(n)= 1
teta(n)= 1
psi(1)= 0.d0
declaración función a evaluar
FUNCTION f(eta(i), psi(i), teta(i))
DO i=1, n
f= psi(i)
ENDDO
ENDFUNCTION
FUNCTION g(eta(i), psi(i), teta(i))
DO i=1, n
g=-(1/2) eta(i) psi(i)
ENDDO
ENDFUNCTION
obtain values of K
DO i=1, n
k1(i)= h * f
l1(i)= h * g
!k2(n)= h * f(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!l2(n)= h * g(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!k3(n)= h * f(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!l3(n)= h * g(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!k4(n)= h * f(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
!l4(n)= h * g(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
teta(i+1)= teta(i) + (1/6)*(k1(i)) !+ 2 * k2(i)+2* k3(i) +k4(i))
psi(i+1)= psi(i) + (1/6)*(l1(i)) !+ 2* l2(i)+2* l3(i) +l4(i))
ENDDO
If(n==100)then
----------------------------------------- archivos DATOS ------------------------------
OPEN(unit=12,file='datos RK.dat')
WRITE(12,*)'TITLE = "Grid" '
WRITE(12,*)'VARIABLES = "x"'
WRITE(12,*)'"RK"' ! variable
WRITE(12,*)'ZONE T= "Matrix"'
---------------------------------------- ESCRITURA DE LAS VARIABLES ----------------------------------
DO i=1,n
WRITE(12,*) teta(i), psi(i)
END DO
CLOSE(unit=12)
End Program Runge-Kutta
visual-studio fortran fortran90
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
I make this code to solve Runge-Kutta, my compiler does not show anything wrong, but does not give me anything to check if is really correct.
I not sure if the code is OK, but, I use the Debug option and it does not show me anything. It only told me
The program '[1328] Console2.exe' has exited with code 0 (0x0).
Program Runge-Kutta
INTEGER i, n
PARAMETER (n=101,m=101)
REAL (kind=8) eta(i), psi(i), teta(i)
REAL (kind=8) k1(i), k2(i), k3(i), k4(i), l1(i), l2(i), l3(i), l4(i)
REAL (kind=8) f(i), g(i)
REAL (kind=8) h
-----------------definition of parameters--------------------
PARAMETER (h=0.01)
------------------ initial conditions---------------------
eta(1)= 0.d0
teta(1)= 0.d0
eta(n)= 1
teta(n)= 1
psi(1)= 0.d0
declaración función a evaluar
FUNCTION f(eta(i), psi(i), teta(i))
DO i=1, n
f= psi(i)
ENDDO
ENDFUNCTION
FUNCTION g(eta(i), psi(i), teta(i))
DO i=1, n
g=-(1/2) eta(i) psi(i)
ENDDO
ENDFUNCTION
obtain values of K
DO i=1, n
k1(i)= h * f
l1(i)= h * g
!k2(n)= h * f(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!l2(n)= h * g(eta(i) + (h/2), psi(i) + (l1(i)/2), teta(i) + (k1(i)/2))
!k3(n)= h * f(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!l3(n)= h * g(eta(i) + (h/2), psi(i) + (l2(i)/2), teta(i) + (k2(i)/2))
!k4(n)= h * f(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
!l4(n)= h * g(eta(i) + h, psi(i) + l3(i), teta(i) + k3(i))
teta(i+1)= teta(i) + (1/6)*(k1(i)) !+ 2 * k2(i)+2* k3(i) +k4(i))
psi(i+1)= psi(i) + (1/6)*(l1(i)) !+ 2* l2(i)+2* l3(i) +l4(i))
ENDDO
If(n==100)then
----------------------------------------- archivos DATOS ------------------------------
OPEN(unit=12,file='datos RK.dat')
WRITE(12,*)'TITLE = "Grid" '
WRITE(12,*)'VARIABLES = "x"'
WRITE(12,*)'"RK"' ! variable
WRITE(12,*)'ZONE T= "Matrix"'
---------------------------------------- ESCRITURA DE LAS VARIABLES ----------------------------------
DO i=1,n
WRITE(12,*) teta(i), psi(i)
END DO
CLOSE(unit=12)
End Program Runge-Kutta
visual-studio fortran fortran90
visual-studio fortran fortran90
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
edited Mar 27 at 18:29
Vladimir F
42.7k4 gold badges42 silver badges73 bronze badges
42.7k4 gold badges42 silver badges73 bronze badges
asked Mar 27 at 18:18
ConanConan
11 bronze badge
asked Mar 27 at 18:18
ConanConan
11 bronze badge
asked Mar 27 at 18:18
ConanConan
11 bronze badge
11 bronze badge
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
1
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
BTW, do not learnreal(8), it is ugly.
– Vladimir F
Mar 27 at 22:03
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57
|
show 1 more comment
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
1
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
BTW, do not learnreal(8), it is ugly.
– Vladimir F
Mar 27 at 22:03
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
1
1
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
BTW, do not learn
real(8), it is ugly.– Vladimir F
Mar 27 at 22:03
BTW, do not learn
real(8), it is ugly.– Vladimir F
Mar 27 at 22:03
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57
|
show 1 more comment
0
active
oldest
votes
Your Answer
StackExchange.ifUsing("editor", function ()
StackExchange.using("externalEditor", function ()
StackExchange.using("snippets", function ()
StackExchange.snippets.init();
);
);
, "code-snippets");
StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "1"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);
else
createEditor();
);
function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: true,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: 10,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);
);
draft saved
draft discarded
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f55384056%2fvisual-studio-does-not-show-the-output-of-the-fortran-program%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
0
active
oldest
votes
0
active
oldest
votes
active
oldest
votes
active
oldest
votes
Is this question similar to what you get asked at work? Learn more about asking and sharing private information with your coworkers using Stack Overflow for Teams.
Is this question similar to what you get asked at work? Learn more about asking and sharing private information with your coworkers using Stack Overflow for Teams.
draft saved
draft discarded
Thanks for contributing an answer to Stack Overflow!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
To learn more, see our tips on writing great answers.
draft saved
draft discarded
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fstackoverflow.com%2fquestions%2f55384056%2fvisual-studio-does-not-show-the-output-of-the-fortran-program%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Please confirm, you do do not see any output when you run the code? How exactly do you run it? What are you clicking at or which command are you using?
– Vladimir F
Mar 27 at 18:31
1
What kind of output do you expect? Your program writes everything in a file, not on screen. You got a message telling you it exited without error, now go get your file.
– Jean-Claude Arbaut
Mar 27 at 20:30
BTW, do not learn
real(8), it is ugly.– Vladimir F
Mar 27 at 22:03
Really apreciate your coments, i'm clicking in a comand say attach, the program don't tell me about any error, but I have more errors, thank I'll ask when I study more how to programing. I think i need more theory.
– Conan
Mar 29 at 16:52
Can you recommended any page, books, site anything to study Fortran?
– Conan
Mar 29 at 16:57