Here's a sample of the file.input:
****BEG OF file.input****
F := IPF 19;
fp : File List F := open("file.out", "output");
x := (solve([[1,13,14,15],[1,11,18,4],[1,14,10,4],[1,6,17,16]] ::
SquareMatrix(4, F),[13,8,6,14] :: Vector F)).particular;
if x case "failed" then x := [0,0,0,0];
write!(fp,x);
x := (solve([[17,13,14,15],[17,11,18,4],[17,14,10,4],[17,6,17,16]] ::
SquareMatrix(4, F),[13,8,6,14] :: Vector F)).particular;
if x case "failed" then x := [0,0,0,0];
write!(fp,x);
x := (solve([[2,13,0,7],[15,7,6,13],[11,0,14,2],[12,3,2,10]] ::
SquareMatrix(4, F),[15,15,4,12] :: Vector F)).particular;
if x case "failed" then x := [0,0,0,0];
write!(fp,x);
x := (solve([[14,3,12,15],[11,15,0,14],[17,16,1,13],[4,5,15,17]] ::
SquareMatrix(4, F),[10,10,12,6] :: Vector F)).particular;
if x case "failed" then x := [0,0,0,0];
write!(fp,x);
x := (solve([[3,8,10,2],[8,14,16,0],[9,5,12,14],[5,2,1,5]] ::
SquareMatrix(4, F),[15,8,11,3] :: Vector F)).particular;
if x case "failed" then x := [0,0,0,0];
write!(fp,x);
)sys sleep 1
close! (fp);
****END OF file.input****
And the file.out:
****BEG OF file.out****
(5 8 8 14)
(7 8 8 14)
(18 12 1 10)
(9 15 11 2)
(18 2 4 0)
(4) -> (4) ->
(5) -> (6) -> (6) ->
(7) -> (7) ->
(8) -> (9) -> (9) ->
(10) -> (10) ->
(11) -> (12) -> (12) ->
(13) -> (13) ->
(14) -> (15) -> (15) ->
(16) -> (16) ->
(17) -> (18) -> (18) ->
(19) -> (19) -> (19) ->
(20) ->
****END OF file.out****
On Tuesday, November 23, 2021 at 1:40:46 PM UTC-6 [email protected] wrote:
> > Tried the suggested output format settings and the system-generated
> > messages still appeared following the solutions. I'm not sure why the
> > "write!" function is so rigid and inflexible not allowing some basic
> > formatting....!
>
> Sorry to say, but you have not given any input and no exact
> specification of what you want to get out. With so few information I am
> unable to give any further advice.
>
> Ralf
>
--
You received this message because you are subscribed to the Google Groups
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To view this discussion on the web visit
https://groups.google.com/d/msgid/fricas-devel/58620166-3e05-4939-814a-ebfcebee80b6n%40googlegroups.com.
