anchor.diff:  !               prospino.dat2  for long output including subchannels        !
   !               prospino.dat3  lo file for masses, flags, etc               !
   !----------------------------------------------------------------------------
  -  call PROSPINO_OPEN_CLOSE(1)                                                            ! close all input/output files 
  +  call PROSPINO_OPEN_CLOSE(1)                                                            ! close all input/output files
   
   end program main
   
  
positive.code: !  note: otherwise ipart1_in,ipart2_in have to set to one if not used       !
  !                                                                           !
  !----------------------------------------------------------------------------
  
  !----------------------------------------------------------------------------
    isquark1_in = 0                                                           !
    isquark2_in = 0                                                           !
  !                                                                           !
  !  for LO with light-squark flavor in the final state                       !
  !  isquark1_in     =  -5,-4,-3,-2,-1,+1,+2,+3,+4,+5                         !
  
negative.code:   real(kind=double)                    :: energy_in
    logical                              :: lfinal
    character(len=2)                     :: final_state_in
    character(len=32)                    :: arg
    integer                              :: stat
  
  !----------------------------------------------------------------------------
  !  inlo = 1       ! specify LO only[0] or complete NLO (slower)[1]          !
  !                ! results: LO     - LO, degenerate squarks, decoupling on  !
  !                !          NLO    - NLO, degenerate squarks, decoupling on !
  !                !          LO_ms  - LO, free squark masses, decoupling off !
  