/****************************************************/
 /*LIBRARY = "tsmc13rf"*/
 /*W.Bialas 2019*/
/****************************************************/

procedure( CERNTsmcEnableModelNameEdit(theLibrary theCell)
    let( ( libId cellId cdfBaseId cdfUserId parId defModelName userParId)
    unless( cellId = ddGetObj( theLibrary theCell )
        error( "Could not get cell %s." CELL )
    )

    cdfBaseId = cdfGetBaseCellCDF( cellId )
    if(cdfBaseId then
      parId = cdfFindParamByName(cdfBaseId "model")
      if(parId then
        defModelName = get(parId "defValue")
        if(defModelName then

          when( cdfUserId = cdfGetUserCellCDF( cellId )
            cdfDeleteCDF( cdfUserId )
          )
          cdfUserId  = cdfCreateUserCellCDF( cellId )

          cdfCopyParam(cdfUserId parId)
          userParId = cdfFindParamByName(cdfUserId "model")
          userParId~>editable = "t"

        )
      )
    )
    )
)


procedure(CERNTsmcEnableModelNameEditInAllMos()
let( (allMos)
allMos = '(  "nmos1v" "nmos1v_dfm" "nmos1v_dfmx" "nmos1v_mis" "nmos1v_mis_dfm" "nmos1v_mis_dfmx" "nmos1v_misx" 
            "nmos1vdnw_dfm" "nmos1vdnw_dfmx" "nmos1vdnw_mis_dfm" "nmos1vdnw_mis_dfmx" "nmos1vhvt" "nmos1vhvt_dfm" 
            "nmos1vhvt_dfmx" "nmos1vhvt_mis" "nmos1vhvt_mis_dfm" "nmos1vhvt_mis_dfmx" "nmos1vhvt_misx" 
            "nmos1vhvtdnw_dfm" "nmos1vhvtdnw_dfmx" "nmos1vhvtdnw_mis_dfm" "nmos1vhvtdnw_mis_dfmx" 
            "nmos1vhvtx" "nmos1vlvt" "nmos1vlvt_dfm" "nmos1vlvt_dfmx" "nmos1vlvt_mis" "nmos1vlvt_mis_dfm" 
            "nmos1vlvt_mis_dfmx" "nmos1vlvt_misx" "nmos1vlvtdnw_dfm" "nmos1vlvtdnw_dfmx" "nmos1vlvtdnw_mis_dfm" 
            "nmos1vlvtdnw_mis_dfmx" "nmos1vlvtx" "nmos1vn" "nmos1vn_dfm" "nmos1vn_dfmx" "nmos1vnx" "nmos1vx" 
            "nmos2v" "nmos2v_dfm" "nmos2v_dfmx" "nmos2v_mis" "nmos2v_mis_dfm" "nmos2v_mis_dfmx" "nmos2v_misx" 
            "nmos2vdnw_dfm" "nmos2vdnw_dfmx" "nmos2vdnw_mis_dfm" "nmos2vdnw_mis_dfmx" "nmos2vlvt" "nmos2vlvt_dfm" 
            "nmos2vlvt_dfmx" "nmos2vlvt_mis" "nmos2vlvt_mis_dfm" "nmos2vlvt_mis_dfmx" "nmos2vlvt_misx" 
            "nmos2vlvtdnw_dfm" "nmos2vlvtdnw_dfmx" "nmos2vlvtdnw_mis_dfm" "nmos2vlvtdnw_mis_dfmx" 
            "nmos2vlvtx" "nmos2vn" "nmos2vn_dfm" "nmos2vn_dfmx" "nmos2vnx" "nmos2vx" "nmoscap" 
            "nmoscap_25" "pmos1v" "pmos1v_dfm" "pmos1v_dfmx" "pmos1v_mis" "pmos1v_mis_dfm" 
            "pmos1v_mis_dfmx" "pmos1v_misx" "pmos1vhvt" "pmos1vhvt_dfm" "pmos1vhvt_dfmx" 
            "pmos1vhvt_mis" "pmos1vhvt_mis_dfm" "pmos1vhvt_mis_dfmx" "pmos1vhvt_misx" "pmos1vhvtx" 
            "pmos1vlvt" "pmos1vlvt_dfm" "pmos1vlvt_dfmx" "pmos1vlvt_mis" "pmos1vlvt_mis_dfm" 
            "pmos1vlvt_mis_dfmx" "pmos1vlvt_misx" "pmos1vlvtx" "pmos1vx" "pmos2v" "pmos2v_dfm" 
            "pmos2v_dfmx" "pmos2v_mis" "pmos2v_mis_dfm" "pmos2v_mis_dfmx" "pmos2v_misx" "pmos2vlvt" 
            "pmos2vlvt_dfm" "pmos2vlvt_dfmx" "pmos2vlvt_mis" "pmos2vlvt_mis_dfm" "pmos2vlvt_mis_dfmx" 
            "pmos2vlvt_misx" "pmos2vlvtx" "pmos2vx" "rfnmos1v" "rfnmos1v_mis" "rfnmos2v" "rfnmos2v_mis" 
            "rfpmos1v" "rfpmos1v_mis" "rfpmos1v_nw" "rfpmos1v_nw_mis" "rfpmos2v" "rfpmos2v_mis" "rfpmos2v_nw" "rfpmos2v_nw_mis" 
 )
 foreach(theMosDevice allMos
  CERNTsmcEnableModelNameEdit("tsmc13rf" theMosDevice) 
 ) ;; end foreach
);; end let 

)

;;CERNTsmcEnableModelNameEdit("tsmc13rf" "nmos1v")
;;CERNTsmcEnableModelNameEdit("tsmc13rf" "pmos1v")