Using sweep names and values with famMap()

The famMap() function can be used to extend a waveform-processing function to families of waveforms. I've found various examples on Support, Community, comp.cad.cadence, etc. on how to use this function to perform an operation on a family of waveforms, such as Andrew's nice explanation here. Rather than merely operating on data from each element in a family, I want to associate the sweep name and sweep value with data from each member of the family. Because the sweep depth can vary (i.e., length(sweepNames()) will vary), I tried to apply recursion with famMap().

The idea was that if the procedure argument was a waveform, I could strip off the sweep values from the waveform's XVec; if the argument was a family, I would use famGetSweepValues() and pass them into the function using famMap(). For simplicity, the code below is a stripped-down version of what I tried. This version attempts to print the "vds" parameter of FET instance "/Mn1" for each member of the family, while also printing the sweep values for each member.

-------------------------------------------------------------

;;; procedure to print vds

procedure( famVdsPrint( fileName cnrStr famVds)

cond(

  ; Waveform case - print the results
  (drIsWaveform(famVds)
  Xvec = drGetWaveformXVec(famVds)
  Xlen = drVectorLength(Xvec)
  Yvec_vds = drGetWaveformYVec(famVds)

  for(i 0 Xlen-1

    paramVal = strcat(cnrStr "_" sprintf(nil "%g" drGetElem(Xvec i)))
    vds = 1e3 * drGetElem(Yvec_vds i)
    fprintf(fileName "%s,%.1f\n" paramVal vds)
  )
)

; Waveform family case - apply recursion
(famIsFamily(famVds)
  foreach(sweepVal famGetSweepValues(famVds)
    famMap('famVdsPrint fileName strcat(sprintf(nil "%g" sweepVal) cnrStr) famValue(localFamVds sweepVal))
  ) 
)

; Error case
(t
  error("Error: procedure famVdsPrint can't handle %L\n" famVds)
)

)

)

-------------------------------------------------------------

[run a simulation with 3 nested parametric analyses, and open the results]

-------------------------------------------------------------

selectResult('dcOpInfo)

fam_vds = pv("/Mn1" "vds") ;

fileName = outfile("/myPath/myFileName.csv" "w")

famVdsPrint( fileName "" fam_vds)

-------------------------------------------------------------

That did not work. The waveform case works as intended, so the inner-most sweep is fine. The procedure correctly prints the "vds" values for each family member, but incorrectly prints only the outer-most sweep values as it loops through all the family members. Thinking that this might be a variable-scoping problem, I tried to make the variables local by modifying the family case as follows:

-------------------------------------------------------------

; Waveform family case - apply recursion

(famIsFamily(famVds)
  let( (localFamVds)
    localFamVds = famVds
    foreach(sweepVal famGetSweepValues(localFamVds)
      famMap('famVdsPrint fileName strcat(sprintf(nil "%g" sweepVal) cnrStr) famValue(localFamVds sweepVal))
    )
  )
)

-------------------------------------------------------------

Same failed result.

I am not set on any particular implementation. Another idea that occurred to me was to use famToList(fam_vds), but I could not figure out how to print the list elements recursively.

I would appreciate any help in associating family data with its sweep values. I did a fair amount of searching, but my apologies if this has been answered elsewhere. 

Best Regards,

Stephen Greenwood