MACHINE Rename_Nvar(maxint)
CONSTRAINTS maxint <= 2147483646
SEES Bool_TYPE
VARIABLES Rename_Nvar
INVARIANT Rename_Nvar:0..maxint
INITIALISATION Rename_Nvar:=0
OPERATIONS
vv <-- Rename_VAL_NVAR =
BEGIN
vv:=Rename_Nvar
END;
Rename_STO_NVAR(vv) =
PRE
vv:0..maxint
THEN
Rename_Nvar:=vv
END;
uu <-- Rename_MIN_NVAR(vv) =
PRE
vv:0..maxint
THEN
uu:=min({Rename_Nvar,vv})
END;
uu <-- Rename_MAX_NVAR(vv) =
PRE
vv:0..maxint
THEN
uu:=max({Rename_Nvar,vv})
END;
bb <-- Rename_PRE_INC_NVAR =
BEGIN
bb:=bool(Rename_Nvar<maxint)
END;
Rename_INC_NVAR =
PRE
Rename_Nvar+1:0..maxint
THEN
Rename_Nvar:=Rename_Nvar+1
END;
bb <-- Rename_PRE_DEC_NVAR =
BEGIN
bb:=bool(Rename_Nvar>0)
END;
Rename_DEC_NVAR =
PRE
Rename_Nvar:1..maxint
THEN
Rename_Nvar:=Rename_Nvar-1
END;
bb <-- Rename_PRE_ADD_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar+vv <= maxint)
END;
Rename_ADD_NVAR(vv) =
PRE
vv:0..maxint &
Rename_Nvar+vv <= maxint
THEN
Rename_Nvar:=Rename_Nvar+vv
END;
bb <-- Rename_PRE_MUL_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar*vv <= maxint)
END;
Rename_MUL_NVAR(vv) =
PRE
vv:0..maxint &
Rename_Nvar*vv <= maxint
THEN
Rename_Nvar:=Rename_Nvar*vv
END;
bb <-- Rename_PRE_SUB_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar-vv >= 0)
END;
Rename_SUB_NVAR(vv) =
PRE
vv:0..maxint &
Rename_Nvar-vv >= 0
THEN
Rename_Nvar:=Rename_Nvar-vv
END;
bb <-- Rename_PRE_DIV_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(vv > 0)
END;
Rename_DIV_NVAR(vv) =
PRE
vv:1..maxint
THEN
Rename_Nvar:=Rename_Nvar/vv
END;
bb <-- Rename_PRE_MOD_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(vv > 0)
END;
Rename_MOD_NVAR(vv) =
PRE
vv:1..maxint
THEN
Rename_Nvar:=Rename_Nvar-vv*(Rename_Nvar/vv)
END;
bb <-- Rename_EQL_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar=vv)
END;
bb <-- Rename_NEQ_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar/=vv)
END;
bb <-- Rename_GTR_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar>vv)
END;
bb <-- Rename_GEQ_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar>=vv)
END;
bb <-- Rename_SMR_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar<vv)
END;
bb <-- Rename_LEQ_NVAR(vv) =
PRE
vv:0..maxint
THEN
bb:=bool(Rename_Nvar<=vv)
END;
/************** save/restore host byte order **************/
Rename_SAV_NVAR =
BEGIN
skip
END;
Rename_RST_NVAR =
BEGIN
Rename_Nvar :: 0..maxint
END;
/************** save/restore network byte order **************/
Rename_SAVN_NVAR =
BEGIN
skip
END;
Rename_RSTN_NVAR =
BEGIN
Rename_Nvar :: 0..maxint
END
END
Analysed Constructs
Hypertext Constructs Page
On-line Help
Help Contents Page
Index
Document Last Updated: Wed Aug 25 17:36:10 1999

B-Toolkit Beta 4.55