Silverfrost Forums

Welcome to our forums

%tl tab locations

13 Oct 2018 8:48 #22664

Can somebody tell me what's wrong with line 12 in the following code, which generates a run time error 'Invalid tabulation error'. 😦

program test
implicit none
include<windows.ins>
integer i
integer, parameter :: dp=kind(1.d0)
real(kind=dp):: x=2.d0

i = winio@('%1tl&',30)                  ! This works
i = winio@('%ws%ta%rf&','Input',x)
i = winio@('%nl%cn%bt[OK]')

i = winio@('%2tl&',15,15)               ! This does not work
i = winio@('%ws%2ta%rf&','Input',x)
i = winio@('%nl%cn%bt[OK]')

end program test

Thanks

Ken

13 Oct 2018 11:35 #22665

Possibly because 15 is the same as 15?

(They are not 15 and 15+15)

Eddie

13 Oct 2018 1:16 #22666

Thanks Eddie, been starting at this one for a few hours and never saw the blindingly obvious (again). Ken

Please login to reply.