28   PetscInt  bmx, bmy;                 /* Size of plate under the surface */  member
75   user.bmy = user.my / 2;  in main()
77   PetscCall(PetscOptionsGetInt(NULL, NULL, "-bmy", &user.bmy, &flg));  in main()
80 …T ", bmy:%" PetscInt_FMT ", height:%g\n", user.mx, user.my, user.bmx, user.bmy, (double)user.bheig…  in main()
727   PetscInt   mx = user->mx, my = user->my, bmy, bmx;  in MSA_Plate()  local
733   user->bmy = PetscMax(0, user->bmy);  in MSA_Plate()
734   user->bmy = PetscMin(my, user->bmy);  in MSA_Plate()
737   bmy       = user->bmy;  in MSA_Plate()
753         t1  = (2.0 * i - mx) * bmy;  in MSA_Plate()
755         t3  = bmx * bmx * bmy * bmy;  in MSA_Plate()
764 …i >= (mx - bmx) / 2 && i < mx - (mx - bmx) / 2 && j >= (my - bmy) / 2 && j < my - (my - bmy) / 2) …  in MSA_Plate()