The turmod command has to be entered first; then the $ is needed
  after LOAD( , or #, to ensure that it is not wiped out
turmod(lvel); Store(enut,wgap)
#$921
TEXT(As For Case 921, But With Turmod(lvel)
TITLE                                                                 
  PHOTON USE
  p;;;
 
  gr ou z 1
  msg contours of PRPS
  set prop off
  con prps z 1 fi;0.001
  pause;con off;red
  
  msg Vector field
  vec z 1 sh
  msg Press RETURN to continue
  pause;vec off;red
  con tem1 z 1 fi;0.001
  con tem1 z 1; int 50
  msg Temperature contours
  pause
  con wdis z 1 fi;0.001
  pause
  con enut z 1 fi;0.001
  ENDUSE