#!/usr/bin/perl $ALF_InstallDir = ".."; require ("$ALF_InstallDir/source/OpenALF.BOM.pl"); &ALF_InitLexical; &FileIn("$ALF_InstallDir/standard/IEEE1603_2003.annexB.alf",'ALF_ReadLexical'); &ALF_CreateData('test'); &ALF_InitLexical; &FileIn("$ALF_InstallDir/examples/delaycalc.alf",'ALF_ReadLexical'); &ALF_CreateData('test'); require ("$ALF_InstallDir/source/OpenALF.CircuitAnalysis.pl"); require ("$ALF_InstallDir/examples/testcase1.pl"); &ALF_LibraryPreparation( &ALF_FindMatchingObject('test','LIBRARY') # library ); &ALF_CircuitAnalysis( 'myDesign', # design root 'test', # ALF root 'sample_netlist_1', # netlist for testcase 'sample_constraint_1', # constraint for testcase 'average', # evaluation method: average | maximum | minimum 'energy','delay' # evaluation target );