 !
 ! Values of TO_SHOCKS(TRAD_COMM,REG) - an array of size 28x3
 !--------------------------------
 !
 
 ! (Entries are written one "row" at a time - maximum of 4 per line.)
 
 
 28 3  real row_order;
 
 ! The matrix TO_SHOCKS(%1,%2) with %1 in TRAD_COMM and %2 in REG. ++++++++++++

 !%2= MOR            E_U             ROW
    0.000000        0.000000        0.000000     !%1=grn
    0.000000        0.000000        0.000000     !%1=vfn
    0.000000        0.000000        0.000000     !%1=osd
    0.000000        0.000000        0.000000     !%1=sgr
    0.000000        0.000000        0.000000     !%1=oag
    0.000000        0.000000        0.000000     !%1=pfb
    0.000000        0.000000        0.000000     !%1=lvk
    0.000000        0.000000        0.000000     !%1=fsh
    0.000000        0.000000        0.000000     !%1=for
    0.000000        0.000000        0.000000     !%1=cog
    0.000000        0.000000        0.000000     !%1=mnr
    14.83479664	    2.389910768	    0.448641776
    -3.592198355	2.221520702	    0.474606574
    -15.55887286	2.578452199	    0.442378283
    -26.01162527	2.464186797	    0.462286359
    2.934490981	    2.554955221	    0.441296834
    -38.27596444	-1.097895108	0.160182578
    11.90962855	    -0.00961497	    0.210769023
    14.623248	    2.009649965	    0.144483284
    -5.906824575	1.377804509	    -0.071683065
    2.324172482	    2.439309267	    0.362194682
    -4.436457507	-3.090926725	0.02567155
    -5.042465903	1.0810393	    0.329541055
    16.16207948	    -2.121062405	-1.565541214
    1.145729148	    -0.618961711	-0.053423291
    -13.14035545	2.146489318	    0.036754978
