diff --git a/define_bc.f90 b/define_bc.18.06.2009.f90
similarity index 98%
rename from define_bc.f90
rename to define_bc.18.06.2009.f90
index d1851986808b0a3e791a3aa36cfedd7b74dee17a..506212852d82b56706c18ed65d83f229db49b569 100644
--- a/define_bc.f90
+++ b/define_bc.18.06.2009.f90
@@ -151,7 +151,8 @@ case ('input.pipo')
    call define_bc_pipo (osolve%nnode,osolve%kfix,osolve%kfixt,osolve%x,osolve%y,osolve%z,osolve%u,osolve%v,osolve%w,osolve%temp,vo)
 
 case ('input.ritske')
-  call define_bc_ritske(osolve%nnode,osolve%kfix,osolve%kfixt,osolve%x,osolve%y,osolve%z,osolve%u,osolve%v,osolve%w,osolve%temp,vo)
+   call define_bc_ritske(osolve%nnode,osolve%kfix,osolve%kfixt,osolve%x,osolve%y,osolve%z,osolve%u,osolve%v,osolve%w,osolve%temp,&
+vo)
 
 case ('input.ritske_isurf')
    call define_bc_ritske_isurf (osolve%nnode,osolve%kfix,osolve%kfixt,osolve%x,osolve%y,osolve%z,osolve%u,osolve%v,osolve%w,&