Thank xwb and RenardPaul.
Since the length of the values can change, here is the code I tried. Little bit tedius but it seems to work.
__________________________________________
ws(1)=18.9
ws(2)=9999
ws(3)=1.3
n=3
do i=1,n
if (int(mod(ws(i),1.0)*10000).lt.0.0001) then...
Hi, how should I output real varibles Var/12.3,9999/ as 12.3 9999 by using F4.1 rather than 12.3 9999.9 by using F6.1. I am using Microsoft Visual Fortran.
Thanks
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.