4 calls from
INITASSIM
ASSIMPAR
1
STRLNTH
3