fixed stl spell error and seg fault on s_circle

Author: okBrian

examples/2D_ibm_stl_MFCCharacter/Character_IBM.STL renamed to examples/2D_ibm_stl_MFCCharacter/Character_IBM.stl

@@ -80,7 +80,7 @@
     'patch_ib(1)%model_filepath'        : 'Character_IBM.stl',
     'patch_ib(1)%model_translate(1)'    : -0.0469828735,
     'patch_ib(1)%model_translate(2)'    : -0.0094892600,
-    'patch_ib(1)%model_model_spc'       : 200,
+    'patch_ib(1)%model_spc'             : 200,
     'patch_ib(1)%model_threshold'       : 0.99,
     'patch_ib(1)%slip'                  : 'F',
     # # ========================================================================

examples/2D_ibm_stl_MFCCharacter/case.py

@@ -276,7 +276,7 @@ contains
                          .and. &
                          patch_icpp(patch_id)%alter_patch(patch_id_fp(i, j, 0))) &
                         .or. &
-                        (.not. ib .and. patch_id_fp(i, j, 0) == smooth_patch_id)) &
+                        (.not. present(ib) .and. patch_id_fp(i, j, 0) == smooth_patch_id)) &
                         then
 
                         call s_assign_patch_primitive_variables(patch_id, i, j, 0, &