#include<civlc.cvh>

int main(){
  int x;
  $scope scp;

  $choose{
    $when(scp<$here) x++;
  }
}