Re: index function problem

character,dimension(150) :: text='IF A PROGRAMMER IS FOUND TO BE
INDISPENSABLE,&
THE BEST THING TO DO IS TO GET RID OF HIM AS SOON AS POSSIBLE'

No, it's character(len=150). With dimension(150), you make text an array.

dummy=index(text,pattern)

There, as INDEX is elemental, index(text,pattern) is an array of rank 1
and size 150. dummy being a scalar, the assignment is not valid.

--
FX
.

Relevant Pages

Re: linux doesnt like me
... perldoc -q "How do I tell the difference between errors from the shell and perl" ... #initialize array and store data in the array ... Why do you think that there is a carriage return to get rid of and why do you ... think that chomp() will get rid of it? ...
(perl.beginners)
Trouble with code that is broken over multiple lines (space_)
... .CommandText = Array(_ ... Sum(fct_CommissionAccrued.AccruedAmount) AS 'Sum of ... "rID AND fct_CommissionAccrued.CommissionTypeID = ...
(microsoft.public.excel.programming)
[RFC][PATCH] Put size in array to get rid of barriers in grow_ary()
... The grow_arycode has a number of explicit memory barriers, ... array itself, so that the array and the size cannot possibly get out ... Also uses rcu_assign_pointerto get rid of the remaining ... send the line "unsubscribe linux-kernel" in ...
(Linux-Kernel)
Re: global substitution with files
... Jeff Pang wrote: ... rid of spaces, and apostrophes and such. ... then re-open it and overwrite it with the array. ...
(perl.beginners)
Re: conditional Formula
... to clarify my previous post, you can get rid of the "--" for each array that ... >> monthly basis and I will only need to update the list. ...
(microsoft.public.excel.worksheet.functions)