read `Ising2D.txt`:

plotsetup(gif,plotoutput=`oP1.gif`,plotoptions=`portrait,noborder`):
Digits:=10:

xS:=1: xT:=2: yS:=1: yT:=2: res:=0.01: K:=6:

PlotAppxOnsFunTable(xS,xT,yS,yT,res,K);

quit: