eldo_user

Eldo Control Language
Library of Functions for Tasks
.option keep_eldo_cl_temp_waves=0
.option remove_eldo_cl_temp_files=3
.define_task t_save1 (file="")
set w1 = 0
set w2 = 0
/* Create a wdb file to save the waveforms. */
set wdb1 = wopen(file, "w")
set res = simulation(w1=@w1, w2=@w2)
if (res.simu_status == 0)
/* Copy the waveforms. */
wsave(wdb1, w1, "simu1")
wsave(wdb1, w2, "simu1")
fprint(stdout, "\nSimulation 1 succeeded.\n")
else fprint(stdout, "\nSimulation 1 failed.\n")
endif
/* Save and close. */
wclose(wdb1)
.end_define_task
.define_task t_save2
set w1 = 0
set w2 = 0
set res = simulation(w1=@w1, w2=@w2)
if (res.simu_status == 0)
/* Copy the waveforms in the main wdb file. */
wsave(wstdout, w1, "simu2")
wsave(wstdout, w2, "simu2")
fprint(stdout, "\nSimulation 2 succeeded.\n")
else
fprint(stdout, "\nSimulation 2 failed.\n")
endif
.end_define_task
.define_task t_read (file="", folder="")
set w1 = 0
set w2 = 0
set v = 0
set wdbId = wstdout
if (file != "")
/* Open the file in read mode. */
wdbId = wopen(file, "r")
fprint(stdout, "\nUsing " + file + " file to read.\n")
else
fprint(stdout, "\nUsing main wdb file to read.\n")
endif
w1 = wget(wdbId, folder + "/w1")
w2 = wget(wdbId, folder + "/w2")
v = yval(w1, 1)
fprint(stdout, "\tyval(w1, 1) = %.1f\n", v)
v = yval(w2, 1)
fprint(stdout, "\tyval(w2, 1) = %.1f\n", v)
if (file != "")
/* Close the file. */
wclose(wdbId)
endif
Eldo® User's Manual, 15.3 1001