Description

Test expected indentation in output (lst) file.

Contributor: Lutz Westermann, October 2025

Small Model of Type : GAMS

Category : GAMS Test library

Main file : output02.gms

$title 'Test indentation in output (lst) file (OUTPUT02,SEQ=989)

$onText
Test expected indentation in output (lst) file.

Contributor: Lutz Westermann, October 2025
$offText


$onEcho > test.gms
Set i /i123456789012345678901,i123456789012345678902/;
Alias (i,j,k,l);
Variable z, x(i,j,k,l);
Equation e;
e.. z =e= sum((i,j,k,l),x(i,j,k,l));

model mo /e/;
solve mo min z use lp;
$offEcho

$onEcho > want.txt
---- e  =E=

e..  z

      - x(i123456789012345678901,i123456789012345678901,i123456789012345678901,
          i123456789012345678901)

      - x(i123456789012345678901,i123456789012345678901,i123456789012345678901,
          i123456789012345678902)

      - x(i123456789012345678901,i123456789012345678901,i123456789012345678902,
          i123456789012345678901)

      - x(i123456789012345678901,i123456789012345678901,i123456789012345678902,
          i123456789012345678902)

      - x(i123456789012345678901,i123456789012345678902,i123456789012345678901,
          i123456789012345678901)

      - x(i123456789012345678901,i123456789012345678902,i123456789012345678901,
          i123456789012345678902)

      - x(i123456789012345678901,i123456789012345678902,i123456789012345678902,
          i123456789012345678901)

      - x(i123456789012345678901,i123456789012345678902,i123456789012345678902,
          i123456789012345678902)

      - x(i123456789012345678902,i123456789012345678901,i123456789012345678901,
          i123456789012345678901)

      - x(i123456789012345678902,i123456789012345678901,i123456789012345678901,
          i123456789012345678902)

      - x(i123456789012345678902,i123456789012345678901,i123456789012345678902,
          i123456789012345678901)

      - x(i123456789012345678902,i123456789012345678901,i123456789012345678902,
          i123456789012345678902)

      - x(i123456789012345678902,i123456789012345678902,i123456789012345678901,
          i123456789012345678901)

      - x(i123456789012345678902,i123456789012345678902,i123456789012345678901,
          i123456789012345678902)

      - x(i123456789012345678902,i123456789012345678902,i123456789012345678902,
          i123456789012345678901)

      - x(i123456789012345678902,i123456789012345678902,i123456789012345678902,
          i123456789012345678902) =E= 0 ; (LHS = 0)
$offEcho

$call.checkErrorLevel gams test.gms pw 80 lo=%GAMS.lo%
$call.checkErrorLevel sed -n '/---- e/,/(LHS = 0)/p' test.lst > have.txt
$call.checkErrorLevel diff -Z want.txt have.txt