Search results for query: *

Thank you mikrom! From this I will be able to solve my problems.

I want to become this code a little bit fast. Actually, in the final code, each loop will be 10000 times larger than this one. now I have : "1000*(10 + 200)*20/2" and I want: "1000*20*10" which looks lik possible.

...OPEN(unit= u_file, file= "p_sen.dat", action = "write") k = 0 angle= angle_i DO n = 1, p call ran1(harvest) x = harvest*PI y = sin(x) WRITE(u_file, *) x, y k = k + 1 angle= angle + v_angle END DO CLOSE(unit=u_file) ! area_mc =...

...angle= angulo_i OPEN(unit= u_file, file= "p_sen.dat", action = "write") k = 0 DO n = 1, p call ran1(harvest) x = harvest*PI y = sin(x) WRITE(u_file, *) x, y k = k + 1 angle= angle + v_angle END DO area_mc = ????????? ! area of...

Thanks dude

Using Monte Carlos Method, how to make a program to calculate the integral points of sin(x) from 0 to pi and how to calculate the errors?

I am trying to calculate the integral of sin(x) from 0 to pi, using Monte Carlo. I want to call ran() or some rotine of the Numerical Recipes such as ran0.f90, ran1.f90 and so on.

Hi guys! I would like to know how to use DFPORT,but I don't know how to use it. Please write it with an example. Thank you in advance

Hi guys! I am a super beginner at flash and actionscritp. I am trying to create a program that read 2 numbers from the user and print the sum of them. Thank you in advance!

The program is still not working :(

I think you using MODULE can save your life or better, something like this: !***************************************** ! Multiplier Function Definition !***************************************** MODULE matrix_module contains function matrix_multiple(x,y,n) implicit none real,intent(in) ...

...part_real_c z_imag = part_imag_c DO iteracoes = 1, iterations_max z_sqrt = z_real*z_real + z_imag*z_imag IF (z_sqrt .lt. value_max) exit WRITE(unit = unit_out, fmt= *) z_real, z_imag...

...part_real_c z_imag = part_imag_c DO iteracoes = 1, iterations_max z_imag = 2.0 * z_real * z_imag + part_imag_c z_real_w = z_real * z_real - z_imag * z_imag + part_real_c z_real = z_real_w...

Thank you gullipe!Congratulations for your code! I'd like to create a postscript file instead ppm picture. How to do this? Xwb thank for your tip, I'll try.

...BELONG = .TRUE. DO I=1,N C_REAL ! I do not know how start C_REAL C_IMAG ! AND C_IMAG END DO Z_REAL=C_REAL Z_IMAG=CI Z_REAL2=ZR*ZR Z_IMAG2=Z_IMAG*Z_IMAG DO I=0, MAX_INTERATIONS IF ((ZRS + ZIS) <= 4.0)THEN Z_REAL2 = Z_REAL * Z_REAL Z_IMAG2 = Z_IMAG *...

I am sorry guys for this poorly made question. I wanted to know if is possible create a program like the windows programs from fortran, click-open-programs or something like this... Is possible create a way of using a program without to use the terminal? Is possible create a graphic interface to...

Is possible to create an execuble program from a fortran program? If yes, how can I do it? Thank you in advance

Is possible do this using the same program struture?

Great FJacq! How to do this without using character? I mean without using the folliwng: CHARACTER(8) :: dat read(dat,'(i4,i2,i2)') current_year,current_month,current_day

FJacq your idea to this was very good! Thank you!! mikrom I going to try from today use subroutines. It become the program pretty organized. Thank you again for your tips!