http://www.silverfrost.com/32/ftn95/ftn95_personal_edition.aspx
or
http://download.cnet.com/Silverfrost-FTN77/3000-2069_4-10537937.html (probably will not work on much above XP)
If you can run your code then you will almost certainly have created an executable. It may not be in the same directory as your Fortran - quite often in a sub-directory.
FTN95 can compile Fortran 77 code (Fortran 77 is a language standard). FTN77 is a Fortran 77 compiler and so FTN95 can compile the same code as FTN77. FTN95 is not FTN77 -- its FTN95!
So you can take any code that you compiled with FTN77 and compile it with FTN95.
You need to use FTN95 options :)
ftn95 programname.f95 /link
Is probably what you want. That will not link in the NAG library though. You can launch the online help with
ftn95 /help
Nice answer Hurkyl but not what the questioner wants - he wants the number of zeros to the right of the first one bit (and hence the number on the other side).
I thought I had figure it out but then realized logical operators aren't really allowed
i.e.
a = b < 3
probably implies a conditional
I would be curious to see the function -- given there are no loops or conditionals. Clearly that means no implied loops or conditionals (i.e. no function calls, intrinsics or conditional operators). I have heard it said you can do anything with a couple of logic operators but never seen a real...
Your code looks about right but if it doesn't work...
... have you tried debugging it? For example, just try printing the first 100 values in 's' and see if the 1s line up with the primes.
If you can get hold of a DOS compiler, then you could use Virtual PC to create an environment for it on your Vista machine.
http://www.microsoft.com/windows/virtual-pc/
KIND values are compiler specific (which seems pretty silly but that is what the standard says). minger's answer seems like the way to go -- although I quite like the real*8 and integer*8 type declarations.