libName = "cmos28shp"	; device library name
tech_lib = "cmos28shp"
techFileID = techOpenTechFile( "cmos28shp" "tech.db" "r")
lib = ddGetObj(libName)				  ;;  Verify the library existance
if(lib == nil  then
    fprintf(stderr "ERROR: Invalid library. %L .\n" libName)
    return(nil)
else