Recent content by gullipe

See also: http://zuserver2.star.ucl.ac.uk/~apod/apod/ap131230.html

Hi j0zn Some years ago I made a fractal program in Fortran 77, see http://www.tek-tips.com/viewthread.cfm?qid=1584330 Happy New Year

Dear Perl11 If ASINH is not in your Fortran library (which it is probably not), then you can use this: !- DOUBLE PRECISION X DOUBLE PRECISION ASINH ASINH(X)=LOG(X+SQRT(X**2+1.))

Hi mikrom OK, I understand. I compiled the original code and run it, and it seems to work fine !

Hi NTC0394 Made some modifications a now it works up to 9. 10 gives XXXXXXXXXX and it crashes for 11 and above.. ! PROGRAM ROMAN IMPLICIT NONE INTEGER :: CHOICE CHARACTER(LEN=10) :: ROMN INTEGER :: ARABIC LOGICAL :: VALID PRINT *, " Enter Arabic numeral: " READ *, ARABIC CALL...

Hi again I have Compacq Visual Fortran, and when I compiled your program i got the following "warnings" only ! But it is at least clear that the variable JJREP that appears in the following statement (in line 372), should be JJREB: subroutine newpar(jjrel, jjchl, jjrep, jjchb, jjgmg)...

Hi Tony1984 I tryed to compile the program with a F77 compiler and got the following errors (and also found most of them): bay.for(80) : warning F4980: integer expected in format ("i,f" instead of "i10,f12.3" for instance) bay.for(83) : warning F4980: integer expected in format (only "f"...

Hi Norbert I also wish all the best in the future. G.Pétursson

Hi wellnis20 Do you mean that you want to find the first p so that 3**P >= n (equal or grater than n) ? Then it might be something like this that you need: program test_next_power_three integer next_power_three print *,'02 ->', next_power_three(2) print *,'03 ->', next_power_three(3) print...

Hi ya0037 I don't think that the TIFF format is the same as BMP, but you can convert the TIFF file to a BMP file with some image converter, and then work on the BMP file.

Hi ya0037 Here is program that reads a BMP-file and writes the result into three files (111.txt, 333.txt and 444.txt). You are welcome to use it or some parts of it. Program BMP implicit none character*4000 str character*24 skra,skraL,skraR integer*4 lskra,lskraL,lskraR integer*4...

Hi miki2012 There is a missing comma after gg(150) in the first line of the common statement. It should be: common /vdc/ aa(150),bb(150),cc(150),dd(150),gg(150), That explains the syntax error. The code compiles fine in my Microsoft Fortran Optimizing Compiler Version 5.10

Hi again Well, what I said above only applies to programs that I have already compiled, but got "divide by zoro" during runtime ... but I see now that you got this during compilation ...

Hi alcantara20 In a case like this I usually put in a number of write statements in the program (here and there): write (*,*) '01' write (*,*) '02' write (*,*) '03' .... and continue to do so until I have located the statement where the error is.

Hi gmcke1 If you are building a Windows program, it is enough to put this into the resouce file (xxxx.RC), if I remember correctly: Icon1 ICON Icon1.ICO Icon2 ICON Icon2.ICO Icon3 ICON Icon3.ICO Icon4 ICON Icon4.ICO Then all these icons will be displayed under Properties ... Change Icon ...