lssq_img Subroutine

private subroutine lssq_img(tab, scal)

Note

The function lssq_img subtracts a least square 2D polynomial from tab. It:

  • reads the degrees in the Job file
  • calculates and subtracts the least square 2D polynomial
  • creates a new folder
  • stores the new surface in the new folder.

Example:

if degrees are (5,8) and the working directory sur, the resulting surface is sur/DEG_05_08/file_X1_005_Y1_008.sur

Arguments

Type IntentOptional Attributes Name
real(kind=R8), intent(inout), dimension(:,:) :: tab

array of the surface
type(SCALE_SURF), intent(inout) :: scal

SCALE_SURF object of the input surface