Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Subroutine problem
PROGRAM TEST IMPLICIT NONE INTEGER::A,B,S READ*,A,B S=0 CALL FUN(A,B,S) PRINT*,S END PROGRAM TEST SUBROUTINE FUN(A,B,S) IMPLICIT NONE INTEGER::A,B,S S=A+B END SUBROUTINE FUN
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Taylors method of three order
Rabeya
A_02 JACOBI METHOD
LU gauss
euler-cromer
expx
Blasius Euler Code
Gauss forward elimination
Fortran!
Practice 4 I
Please log in to post a comment.