Is there a repetition syntax for field formats in fprint?
I would like to compress repeating format fields so my format string doesn't
get so long and confusing....

example can:

printf "%10.3f%10.3f%10.3f\n", $1,$2,$3

be compressed into 3 fields in the same manner a fortran 3f10.3 ?

Rex

In article <-ZSdnTjyNZoECP3ZnZ2dneKdnZydnZ2d@comcast.com>,
	"trexx" <foo@foo.com> writes:
> Is there a repetition syntax for field formats in fprint?

No.

> I would like to compress repeating format fields so my format string doesn't
> get so long and confusing....
> 
> example can:
> 
> printf "%10.3f%10.3f%10.3f\n", $1,$2,$3
> 
> be compressed into 3 fields in the same manner a fortran 3f10.3 ?

function rep(n,s  ,r)
{
    r = ""
    while( n-- > 0 ) r = r s
    return r
}

printf( rep(3,"%10.3f") "\n", $1,$2,$3 )
-- 
Heiner Marxen				http://www.drb.insel.de/~heiner/

Heiner Marxen wrote:

> In article <-ZSdnTjyNZoECP3ZnZ2dneKdnZydnZ2d@comcast.com>,
> 	"trexx" <foo@foo.com> writes:
> 
>>Is there a repetition syntax for field formats in fprint?
> 
> 
> No.
> 
> 
>>I would like to compress repeating format fields so my format string doesn't
>>get so long and confusing....
>>
>>example can:
>>
>>printf "%10.3f%10.3f%10.3f\n", $1,$2,$3
>>
>>be compressed into 3 fields in the same manner a fortran 3f10.3 ?
> 
> 
> function rep(n,s  ,r)
> {
>     r = ""
>     while( n-- > 0 ) r = r s
>     return r
> }
> 
> printf( rep(3,"%10.3f") "\n", $1,$2,$3 )
Alternatively, if s does not contain a space:

function rep(n, s       , r)
{
	r = sprintf("%*s", n, " ")
	gsub(/ /, s, r)
	return r
}

In article <FX48g.6$A82.1@dfw-service2.ext.ray.com>,
martin cohen  <mjcohen@acm.org> wrote:
....
>function rep(n, s       , r)
>{
>	r = sprintf("%*s", n, " ")
	r = sprintf("%*s", n, "")
>	gsub(/ /, s, r)
>	return r
>}
>

>Alternatively, if s does not contain a space:

Spaces don't matter.  gsub() does the right thing.