Re: [NTG-context] Metafun : save memory content ?

19 Jul 2022

...
On 19 Jul 2022, at 04:28, Fabrice L via ntg-context  wrote:
Complementary question : I saw that the « pos_a » « pos_b » of the example could not take numerical value, for example pos_1, pos_2.. How can I use metafun to write a macro to save the contents of hundreds of variable in this object, something like :
getparameters "MyData » [
  for i=1 upto 100 :
      pos_decimal(i) = ThePosition[i],
  endfor ;
] ;
If this is possible, then this is wonderful and open news doors !
I've adapted this example from the metafun-p manual by adding some "write" statements.

\starttext
\startMPpage

numeric done[][], i, j, n ; n := 0 ;
forever :
	i := round(uniformdeviate(10)) ;
	j := round(uniformdeviate(10)) ;
	if unknown done[i][j] :
		drawdot
			(i*cm,j*cm)
			withpen pencircle scaled 0.5cm
			withcolor darkred;
		n := n + 1 ;
		done[i][j] := n ;

		write "done[" & tostring(i) & "][" & tostring(j) & "] := " & tostring(n) & " ;" to "mp_test_file.txt" ;

	fi ;
	exitif n = 10 ;

endfor ;

write EOF to "mp_test_file.txt" ;

\stopMPpage
\stoptext

This results in the expected graphic but also a local file (in the same directory as the source) called "mp_test_file.txt" that contains:

done[9][1] := 1 ;
done[4][3] := 2 ;
done[5][3] := 3 ;
done[5][1] := 4 ;
done[2][9] := 5 ;
done[8][6] := 6 ;
done[9][10] := 7 ;
done[9][7] := 8 ;
done[10][2] := 9 ;
done[6][5] := 10 ;

I think, with a bit of judicious use of "write" statements to add some ConTeXt / MP setup code, it would be possible to include the output from the previous run as MP source of the next run.

Hope this helps, or at least provides some food for thought.

(Note you need to delete the mp_test_file.txt before re-running else it fails.)

—
Bruce Horrocks
Hampshire, UK