procedure for experiment 7923100